From f77d7a9123b6169803d3379905c015cf0cb8cb49 Mon Sep 17 00:00:00 2001
From: Tanaka Akira <akr@users.sourceforge.net>
Date: Thu, 26 Aug 1999 11:07:42 +0000
Subject: zsh-workers/7495

---
 Completion/Cvs/_cvs_modules | 12 ++++++++++++
 1 file changed, 12 insertions(+)
 create mode 100644 Completion/Cvs/_cvs_modules

(limited to 'Completion/Cvs/_cvs_modules')

diff --git a/Completion/Cvs/_cvs_modules b/Completion/Cvs/_cvs_modules
new file mode 100644
index 000000000..f662f8a6e
--- /dev/null
+++ b/Completion/Cvs/_cvs_modules
@@ -0,0 +1,12 @@
+#autoload
+
+local root=$CVSROOT
+[[ -f CVS/Root ]] && root=$(<CVS/Root)
+
+if [[ $root = :* || ! -d $root ]]; then
+  _message "module name"
+else
+  compadd - \
+    $root/^CVSROOT(:t) \
+    ${${(M)${(f)"$(<$root/CVSROOT/modules)"}:#[^#]*}%%[ 	]*}
+fi
-- 
cgit 1.4.1