From 63b336243fdf5e60058472fa456ed11e75280189 Mon Sep 17 00:00:00 2001
From: Oliver Kiddle <opk@users.sourceforge.net>
Date: Wed, 21 Jan 2004 13:53:28 +0000
Subject: 19387: add (-.) glob qualifier to globs where only files are directly
 applicable

---
 Completion/Unix/Command/_sccs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'Completion/Unix/Command/_sccs')

diff --git a/Completion/Unix/Command/_sccs b/Completion/Unix/Command/_sccs
index 40463b2f1..8d7babfb7 100644
--- a/Completion/Unix/Command/_sccs
+++ b/Completion/Unix/Command/_sccs
@@ -10,7 +10,7 @@ _sccs_files() {
   PREFIX="$pref"
   IPREFIX="$ipref"
   _wanted sccs-files expl 'sccs file' _files -W ${PROJECTDIR:-~+} \
-      -g 's.*' && ret=0
+      -g 's.*(-.)' && ret=0
   
   return ret
 }
@@ -49,7 +49,7 @@ subcmds=(
 
 ropt='-r+[specify sccs delta id]:sccs delta id'
 copt='-c+[specify date]:date-stamp'
-sfiles=":file:_files -g s.\*"
+sfiles=':file:_files -g "s.*(-.)"'
 
 if [[ $service = sccs ]]; then
   _arguments -C -A "-*" \
-- 
cgit v1.2.3