From ae5ac5edea6f4c49e89291e4e973283c252fa59c Mon Sep 17 00:00:00 2001 From: Andrey Borzenkov Date: Wed, 8 May 2002 15:55:36 +0000 Subject: Merge 17080,17076,17075,17074,16461,16434,16437,16258,16247,16253 --- Completion/Unix/Command/_init_d | 11 +++++++---- 1 file changed, 7 insertions(+), 4 deletions(-) (limited to 'Completion/Unix/Command/_init_d') diff --git a/Completion/Unix/Command/_init_d b/Completion/Unix/Command/_init_d index b8bd0c61f..3556b85a4 100644 --- a/Completion/Unix/Command/_init_d +++ b/Completion/Unix/Command/_init_d @@ -1,21 +1,24 @@ #compdef -P */(init|rc[0-9S]#).d/* -local magic cmds what +local magic cmds what script # This should probably be system specific... +script=$words[1] +[[ $script = */* ]] || script=/etc/init.d/$script + # If the file starts with `#!' we hope that this is a shell script # and get lines looking like foo|bar) with the words in $what. what='(st(art|op|atus)|(force-|)re(start|load)|debug_(up|down)|dump(|_stats)|add|delete|clean|list)' -[[ -f $words[1] ]] && read -u0k 2 magic < $words[1] && [[ $magic = '#!' ]] && - cmds=( ${${(j:|:s:|:)${(M)${(f)"$(< $words[1])"}:#[[:blank:]]#\'#${~what}(\|${~what})#\'#\)*}}//[^a-z_-]} ) +read -u0k 2 magic < $script && [[ $magic = '#!' ]] && + cmds=( ${${(j:|:s:|:)${(M)${(f)"$(< $script)"}:#[[:blank:]]#(\'|)${~what}(\|{~what})#(\'|)\)}}//[^a-z_]} ) # This would be the pattern to use every line of the form foo). # Some people say this might match too many lines... # -# cmds=( ${${(j:|:s:|:)${(M)${(f)"$(< $words[1])"}:#[[:blank:]]#(\'|)[a-z_|]##(\'|)\)}}//[^a-z_]} ) +# cmds=( ${${(j:|:s:|:)${(M)${(f)"$(< $script)"}:#[[:blank:]]#(\'|)[a-z_|]##\'|)\)}}//[^a-z_]} ) (( $#cmds )) || zstyle -a ":completion:${curcontext}:commands" commands cmds || cmds=(start stop) -- cgit 1.4.1