From 7eb1577bd16502b1dc33097ad52a2514bc306e6d Mon Sep 17 00:00:00 2001
From: Tanaka Akira <akr@users.sourceforge.net>
Date: Thu, 10 May 2001 09:19:33 +0000
Subject: * 14295: Completion/Unix/Command/_cvs: support new cvs subcommands
 `rannotate' and `rlog' introduced by cvs-1.11.1.

---
 Completion/Unix/Command/_cvs | 33 +++++++++++++++++++++++++++++++--
 1 file changed, 31 insertions(+), 2 deletions(-)

(limited to 'Completion')

diff --git a/Completion/Unix/Command/_cvs b/Completion/Unix/Command/_cvs
index f649aa8e7..e46c2f0b5 100644
--- a/Completion/Unix/Command/_cvs
+++ b/Completion/Unix/Command/_cvs
@@ -78,7 +78,7 @@ _cvs_add () {
 
 (( $+functions[_cvs_admin] )) ||
 _cvs_admin () {
-  # "+ib::c:a:A:e:l::u::LUn:N:m:o:s:t::IqxV:k:"
+  # "+ib::c:a:A:e::l::u::LUn:N:m:o:s:t::IqxV:k:"
   _arguments -s \
     -{i,x} \
     '(-U)-L[set lock strict]' \
@@ -89,7 +89,7 @@ _cvs_admin () {
     '-c+:comment leader (not used):' \
     '-a+:login names (not work with CVS):' \
     '-A+:access list to append (not work with CVS):' \
-    '-e+:access list to erase (not work with CVS):' \
+    '-e-:access list to erase (not work with CVS):' \
     '-l-[lock]:revision to lock:' \
     '-u-[unlock]:revision to unlock:' \
     '-n+[name revision]:symbolic-name(\:revision):' \
@@ -124,6 +124,18 @@ _cvs_annotate () {
     '*:file:_cvs_files'
 }
 
+(( $+functions[_cvs_rannotate] )) ||
+_cvs_rannotate () {
+  # "+lr:D:fR"
+  _arguments -s \
+    '(-R)-l[don'\''t recursive]' \
+    '-f[use head revision]' \
+    '(-l)-R[recursive]' \
+    '(-f -D)-r+[specify revision]:tag:_cvs_revisions' \
+    '(-f -r)-D+[specify date]:date:_cvs_D' \
+    '*:file:_cvs_modules'
+}
+
 (( $+functions[_cvs_checkout] )) ||
 _cvs_checkout () {
   # "+ANnk:d:flRpQqcsr:D:j:P"
@@ -389,6 +401,23 @@ _cvs_log () {
     '*:file:_cvs_files'
 }
 
+(( $+functions[_cvs_rlog] )) ||
+_cvs_rlog () {
+  # "+bd:hlNRr::s:tw::"
+  _arguments -s \
+    '-b[default branch]' \
+    '(-t)-h[header]' \
+    '(-R)-l[don'\''t recursive]' \
+    '(-l)-R[recursive]' \
+    '-N[don'\''t list tags]' \
+    '(-h)-t[header with descriptive text]' \
+    '-d+[specify dates]:dates:' \
+    '-r-[specify revisions]:revisions:' \
+    '-s+[specify states]:states:(Exp Stab Rel dead)' \
+    '-w-[specify logins]:logins:' \
+    '*:file:_cvs_modules'
+}
+
 (( $+functions[_cvs_login] )) ||
 _cvs_login () {
   false
-- 
cgit 1.4.1