mirrors/zsh
1
0
Fork 0
mirror of git://git.code.sf.net/p/zsh/code synced 2025-10-23 04:30:24 +02:00
Code Releases Activity

17535: use-perl style for _make

Browse source
This commit is contained in:
Peter Stephenson 2002-08-14 15:18:19 +00:00
parent fc88981cf7
commit 513088857a
3 changed files with 34 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

20
Completion/Unix/Command/_make
View file

@ -1,7 +1,8 @@
#compdef make gmake pmake dmake
local prev="$words[CURRENT-1]" file expl tmp is_gnu
local prev="$words[CURRENT-1]" file expl tmp is_gnu cmdargs useperl
zstyle -t ":completion:${curcontext}:" use-perl && useperl=1
_pick_variant -r is_gnu gnu=GNU unix -v -f
if [[ "$prev" = -[CI] ]]; then
@ -25,7 +26,22 @@ else
if [[ -n "$file" ]] && _tags targets; then
if [[ $is_gnu = gnu ]] &&
zstyle -t ":completion:${curcontext}:targets" call-command; then
tmp=( $(_call_program targets "$words[1]" -nsp --no-print-directory -f "$file" .PHONY 2> /dev/null | awk '/^[a-zA-Z0-9][^\/\t=]+:/ {print $1}' FS=:) )
if [[ -n $useperl ]]; then
cmdargs=(perl -F: -ane '/^[a-zA-Z0-9][^\/\t=]+:/ && print "$F[0]\n"')
else
cmdargs=(awk '/^[a-zA-Z0-9][^\/\t=]+:/ {print $1}' FS=:)
fi
tmp=( $(_call_program targets "$words[1]" -nsp --no-print-directory -f "$file" .PHONY 2> /dev/null | $cmdargs) )
elif [[ -n $useperl ]]; then
tmp=(
$(perl -ne '@matches = /^(?:([a-zA-Z0-9]+[^\/\t=\s]+)\s*)+:/ and
print join(" ", @matches);
if (/^\.include\s+\<bsd\.port\.(subdir\.|pre\.)?mk>/ ||
/^\.include\s+\".*mk\/bsd\.pkg\.(subdir\.)?mk\"/) {
print "fetch fetch-list extract patch configure build install reinstall deinstall package describe checkpatch checksum makesum\n";
}
' $file)
)
else
tmp=(
$(awk '/^[a-zA-Z0-9][^\/\t=]+:/ {print $1}