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
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
|
#%Module
module-whatis [module-info name]
if {[info exists env(TESTSUITE_COMPLETE)]} {
switch -- $env(TESTSUITE_COMPLETE) {
compbad1 {
complete
}
compbad2 {
complete bash
}
compbad3 {
complete bash cmd
}
compbad4 {
complete bash {} {-o default -F _cmd}
}
compbreak1 - compbreak2 {
complete bash cmd {-o default -F _cmd}
break
}
compcomb1 {
complete bash cmd {-o default -F _cmd}
}
comp1 {
complete bash cmd {-o default -F _cmd}
complete tcsh cmd {some arg list for tcsh}
complete fish cmd {some arg list for fish}
complete fish cmd {other arg list for fish}
complete zsh cmd {some arg list for zsh}
complete unksh cmd {some arg list for unksh}
complete pwsh cmd {some arg list for pwsh}
}
comp2 {
complete [module-info shell] cmd {some arg list for shell}
complete [module-info shell] cmd {other arg list for shell}
}
comp3 {
switch -- [module-info shell] {
bash {
set-function _cmd {local cur="$2" prev="$3" cmds opts;
COMPREPLY=();
case "$cur" in
-*) COMPREPLY=( $(compgen -W "-h -v --help --version" -- "$cur") );;
esac;}
set-function cmd {echo cmd}
complete bash cmd {-o default -F _cmd}
}
tcsh {
set-alias cmd {echo cmd}
complete tcsh cmd {'n/-h/n/' 'n/--help/n/' \
'n/-V/n/' 'n/--version/n/' \
"p/1/(-h -V --help --version)/"}
}
fish {
set-function cmd {echo cmd}
complete fish cmd {-s V -l version --description 'Command version'}
complete fish cmd {-s h -l help --description 'Command help'}
}
pwsh {
set-function cmd {echo cmd}
#FIXME: should be improved with completion of --version/--help options
}
}
}
}
}
|
