diff options
| author | David Paleino <dapal@debian.org> | 2011-11-03 12:32:52 +0100 |
|---|---|---|
| committer | David Paleino <dapal@debian.org> | 2011-11-03 12:32:52 +0100 |
| commit | 2c8171c38d87ddef31c92a76547d3fdf773a1337 (patch) | |
| tree | 5e720d5a06ead72ed55454bf6647a712a761ed91 /completions/cpan2dist | |
| parent | 9920a8faedf704420571d8072ccab27e9dac40ba (diff) | |
| download | bash-completion-2c8171c38d87ddef31c92a76547d3fdf773a1337.tar.gz | |
Imported Upstream version 1.90upstream/1.90
Diffstat (limited to 'completions/cpan2dist')
| -rw-r--r-- | completions/cpan2dist | 31 |
1 files changed, 8 insertions, 23 deletions
diff --git a/completions/cpan2dist b/completions/cpan2dist index 13f568af..f6a67ac6 100644 --- a/completions/cpan2dist +++ b/completions/cpan2dist @@ -1,12 +1,9 @@ -# bash completion for cpan2dist +# bash completion for cpan2dist -*- shell-script -*- -have cpan2dist && _cpan2dist() { - local cur prev packagelist cpandirs - - COMPREPLY=() - _get_comp_words_by_ref cur prev + local cur prev words cword + _init_completion || return case $prev in --format) @@ -23,30 +20,18 @@ _cpan2dist() esac if [[ "$cur" == -* ]]; then - COMPREPLY=( $( compgen -W '--help --skiptest --force --install \ - --verbose --keepsource --makefile --buildprereq \ - --archive --flushcache --defaults --edit-metafile \ - --format --ban --banlist --ignore --ignorelist \ - --modulelist --logfile --timeout --set-config \ - --set-program --dist-opts --default-banlist \ - --default-ignorelist' -- $cur ) ) + COMPREPLY=( $( compgen -W '$( _parse_help "$1" )' -- "$cur" ) ) else - cpandirs=( "$HOME/.cpanplus/" "$HOME/.cpan/source/modules/" ) + local cpandirs=( "$HOME/.cpanplus/" "$HOME/.cpan/source/modules/" ) + local packagelist for dir in ${cpandirs[@]}; do [[ -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 -# Local variables: -# mode: shell-script -# sh-basic-offset: 4 -# sh-indent-comment: t -# indent-tabs-mode: nil -# End: # ex: ts=4 sw=4 et filetype=sh |