diff options
-rw-r--r-- | ChangeLog | 7 | ||||
-rw-r--r-- | Completion/Unix/Command/_init_d | 4 |
2 files changed, 9 insertions, 2 deletions
diff --git a/ChangeLog b/ChangeLog index 6dbde8354..ebea335e1 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,10 @@ +2002-01-29 Clint Adams <clint@zsh.org> + + * 16514: Completion/Unix/Command/_init_d: do not attempt + to read file if it doesn't exist, match pipe-separated lists + and characters following the parenthesis, and don't wantonly + remove hyphens from completions. + 2002-01-28 Sven Wischnowsky <wischnow@zsh.org> * 16507: Completion/Zsh/Type/_command_names: slight improvement diff --git a/Completion/Unix/Command/_init_d b/Completion/Unix/Command/_init_d index 280b0a9af..b8bd0c61f 100644 --- a/Completion/Unix/Command/_init_d +++ b/Completion/Unix/Command/_init_d @@ -9,8 +9,8 @@ local magic cmds what what='(st(art|op|atus)|(force-|)re(start|load)|debug_(up|down)|dump(|_stats)|add|delete|clean|list)' -read -u0k 2 magic < $words[1] && [[ $magic = '#!' ]] && - cmds=( ${${(j:|:s:|:)${(M)${(f)"$(< $words[1])"}:#[[:blank:]]#(\'|)${~what}(|${~what})#(\'|)\)}}//[^a-z_]} ) +[[ -f $words[1] ]] && read -u0k 2 magic < $words[1] && [[ $magic = '#!' ]] && + cmds=( ${${(j:|:s:|:)${(M)${(f)"$(< $words[1])"}:#[[:blank:]]#\'#${~what}(\|${~what})#\'#\)*}}//[^a-z_-]} ) # This would be the pattern to use every line of the form <space>foo). # Some people say this might match too many lines... |