From 298eb1a82c403fd374f31ba2b32f8dc6f3cfad74 Mon Sep 17 00:00:00 2001
From: Peter Stephenson <pws@users.sourceforge.net>
Date: Fri, 11 Jan 2008 21:06:28 +0000
Subject: N.J.Mann: users/12420: completion for cvs commit -f

---
 ChangeLog                    |  5 +++++
 Completion/Unix/Command/_cvs | 11 ++++++++++-
 2 files changed, 15 insertions(+), 1 deletion(-)

diff --git a/ChangeLog b/ChangeLog
index ab841aee1..92c54d8b4 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2008-01-11  Peter Stephenson  <p.w.stephenson@ntlworld.com>
+
+	* "N.J. Mann" <njm@njm.f2s.com>: users/12420:
+	Completion/Unix/Command/_cvs: completion for cvs commit -f.
+
 2008-01-10  Peter Stephenson  <pws@csr.com>
 
 	* users/12412: Src/builtin.c, Src/parse.c, Test/C02cond.ztst:
diff --git a/Completion/Unix/Command/_cvs b/Completion/Unix/Command/_cvs
index c5fd75050..01edbd30e 100644
--- a/Completion/Unix/Command/_cvs
+++ b/Completion/Unix/Command/_cvs
@@ -170,7 +170,16 @@ _cvs_commit() {
     '(-F)-m+[message]:message:_cvs_m' \
     '(-m)-F+[message file]:log message file:_files' \
     '-r+[specify revision]:tag:_cvs_revisions' \
-    '*:modified file:_cvs_files_modified'
+    '*:modified file:_cvs_commit_arg'
+}
+
+(( $+functions[_cvs_commit_arg] )) ||
+_cvs_commit_arg() {
+  if (( $+opt_args[-f] )); then
+    _cvs_files
+  else
+    _cvs_files_modified
+  fi
 }
 
 (( $+functions[_cvs_diff] )) ||
-- 
cgit 1.4.1