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
|
# (C) 2010 magicant
# Completion script for the "paste" command.
# Supports POSIX 2008, GNU coreutils 8.4, FreeBSD 8.1, OpenBSD 4.8, NetBSD 5.0,
# Mac OS X 10.6.4, SunOS 5.10, HP-UX 11i v3.
function completion/paste {
case $("${WORDS[1]}" --version 2>/dev/null) in
(*'coreutils'*) typeset type=GNU ;;
(*) typeset type="$(uname 2>/dev/null)" ;;
esac
case $type in
(GNU) typeset long=true ;;
(*) typeset long= ;;
esac
typeset OPTIONS ARGOPT PREFIX
OPTIONS=( #>#
"d: ${long:+--delimiters:}; specify delimiter characters"
"s ${long:+--serial}; concatenate all lines in each input file"
) #<#
case $type in (GNU)
OPTIONS=("$OPTIONS" #>#
"--help"
"--version"
) #<#
esac
command -f completion//parseoptions ${long:+-es}
case $ARGOPT in
(-)
command -f completion//completeoptions
;;
(d|--delimiters)
typeset word="${TARGETWORD#"$PREFIX"}"
word=${word//\\\\}
case $word in (*\\*)
PREFIX=${TARGETWORD%\\*} #>>#
complete -T -P "$PREFIX" -D "empty string" '\0'
complete -T -P "$PREFIX" -D "newline" '\n'
complete -T -P "$PREFIX" -D "tab" '\t'
complete -T -P "$PREFIX" -D "backslash" '\\'
esac #<<#
;;
(*)
complete -f
;;
esac
}
# vim: set ft=sh ts=8 sts=8 sw=8 et:
|
