cpan2dist: Don't hang if no package list files exist.
This commit is contained in:
parent
e8d0b1ffdb
commit
c922626d4b
@ -30,9 +30,8 @@ _cpan2dist()
|
|||||||
[[ -d "$dir" && -r "$dir/02packages.details.txt.gz" ]] && \
|
[[ -d "$dir" && -r "$dir/02packages.details.txt.gz" ]] && \
|
||||||
packagelist="$dir/02packages.details.txt.gz"
|
packagelist="$dir/02packages.details.txt.gz"
|
||||||
done
|
done
|
||||||
COMPREPLY=( $( zgrep "^${cur//-/::}" \
|
[[ $packagelist ]] && COMPREPLY=( $( zgrep "^${cur//-/::}" \
|
||||||
$packagelist 2>/dev/null \
|
$packagelist 2>/dev/null | awk '{print $1}' | sed -e 's/::/-/g' ) )
|
||||||
| awk '{print $1}' | sed -e 's/::/-/g' ) )
|
|
||||||
fi
|
fi
|
||||||
} &&
|
} &&
|
||||||
complete -F _cpan2dist -o default cpan2dist
|
complete -F _cpan2dist -o default cpan2dist
|
||||||
|
Loading…
x
Reference in New Issue
Block a user