cpan2dist: Don't hang if no package list files exist.

This commit is contained in:
Ville Skyttä 2011-10-23 11:13:50 +03:00
parent e8d0b1ffdb
commit c922626d4b

View File

@ -30,9 +30,8 @@ _cpan2dist()
[[ -d "$dir" && -r "$dir/02packages.details.txt.gz" ]] && \
packagelist="$dir/02packages.details.txt.gz"
done
COMPREPLY=( $( zgrep "^${cur//-/::}" \
$packagelist 2>/dev/null \
| awk '{print $1}' | sed -e 's/::/-/g' ) )
[[ $packagelist ]] && COMPREPLY=( $( zgrep "^${cur//-/::}" \
$packagelist 2>/dev/null | awk '{print $1}' | sed -e 's/::/-/g' ) )
fi
} &&
complete -F _cpan2dist -o default cpan2dist