File: perltidy

package info (click to toggle)
bash-completion 1%3A2.8-6
  • links: PTS, VCS
  • area: main
  • in suites: buster
  • size: 8,860 kB
  • sloc: exp: 9,759; makefile: 1,104; sh: 261; perl: 56; python: 47; xml: 29; ansic: 7; ruby: 2
file content (53 lines) | stat: -rw-r--r-- 1,276 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
# perltidy(1) completion                                   -*- shell-script -*-

_perltidy()
{
    local cur prev words cword
    _init_completion -n = || return

    case $prev in
        -h|--help)
            return
            ;;
        -o)
            _filedir
            return
            ;;
    esac

    case $cur in
        -pro=*)
            cur="${cur#*=}"
            _filedir
            return
            ;;
        -ole=*)
            COMPREPLY=( $( compgen -W 'dos win mac unix' -- "${cur#*=}" ) )
            return
            ;;
        -bt=*|-pt=*|-sbt=*|-bvt=*|-pvt=*|-sbvt=*|-bvtc=*|-pvtc=*|-sbvtc=*|\
        -cti=*|-kbl=*|-vt=*)
            COMPREPLY=( $( compgen -W '0 1 2' -- "${cur#*=}" ) )
            return
            ;;
        -vtc=*)
            COMPREPLY=( $( compgen -W '0 1' -- "${cur#*=}" ) )
            return
            ;;
        -cab=*)
            COMPREPLY=( $( compgen -W '0 1 2 3' -- "${cur#*=}" ) )
            return
            ;;
        -*=)
            return
            ;;
    esac

    if [[ $cur == -* ]]; then
        COMPREPLY=( $( compgen -W '$( _parse_help "$1" )' -- "$cur" ) )
        [[ $COMPREPLY == *= ]] && compopt -o nospace
    else
        _filedir 'p[lm]'
    fi
} &&
complete -F _perltidy perltidy