1
0
mirror of git://git.code.sf.net/p/zsh/code synced 2024-10-02 08:51:18 +02:00

zsh-workers:8515

This commit is contained in:
Tanaka Akira 1999-11-03 11:01:23 +00:00
parent 34048139f9
commit 818c8db904
3 changed files with 0 additions and 105 deletions

@ -1,26 +0,0 @@
#autoload
local expl disp jobs job jids
if [[ "$1" = -r ]]; then
jids=( "${(@k)jobstates[(R)running*]}" )
shift
_description expl 'running job'
elif [[ "$1" = -s ]]; then
jids=( "${(@k)jobstates[(R)running*]}" )
shift
_description expl 'suspended job'
else
[[ "$1" = - ]] && shift
jids=( "${(@k)jobtexts}" )
_description expl job
fi
disp=()
jobs=()
for job in "$jids[@]"; do
disp=( "$disp[@]" "[${(l:2:: :)job}] ${jobtexts[$job]}" )
jobs=( "$jobs[@]" "$job" )
done
compadd "$@" "$expl[@]" -ld disp - "$jobs[@]"

@ -1,3 +0,0 @@
#defcomp fg jobs
complist -j -P '%'

@ -1,76 +0,0 @@
#autoload
# This builds a display-list for the `-y' option of `compadd' and
# `compgen' out of the arguments it gets. The first argument is
# taken as the name of a parameter and the string built is stored
# into it.
# The second argument is the name of an array whose elements each
# contains a string to complete, optionally followed by a colon
# and a description. The display list created will contain one
# line per string with the description after it, all nicely
# aligned. Strings without descriptions are put at the end in a
# column-oriented fashion.
# All arguments after the second one are given as arguments to
# `compadd'.
# This function will also do the matching required to find out
# which strings will be included in the list. All elements that
# don't match will be removed from the array. This means that the
# special parameters `PREFI' and `SUFFIX' have to be set up
# correctly before this function is called.
local _param="$1" _arr _len _i _tmp _simple
# Remove all descriptions not matched by the string on the line.
if [[ "${2[1]}" = \( ]]; then
_arr=( ${(o)=2[2,-2]} )
else
_arr=( "${(@Po)2}" )
fi
compadd -D _arr "${(@)argv[3,-1]}" - "${(@)_arr%%:*}"
[[ "${2[1]}" != \( ]] && eval "${2}=( \"\$_arr[@]\" )"
if (( $#_arr )); then
# There are strings left, first get the length of the longest of
# them (to be able to align them) and collect all strings without
# descriptions.
_simple=()
_len=1
for _i in "$_arr[@]"; do
_tmp="${#_i%%:*}"
if [[ "$_i" = *:?* ]]; then
[[ _tmp -gt _len ]] && _len="$_tmp"
else
_simple=( "$_simple[@]" "${_i%:}" )
fi
done
# Now we build the list in `_tmp', adding one line per string.
_tmp=''
for _i in "$_arr[@]"; do
[[ "$_i" = *:?* ]] && _tmp="$_tmp
${(r:_len:: :)_i%%:*} -- ${_i#*:}"
done
# If there were strings without descriptions, we just add them by
# calling `print -c'.
(( $#_simple )) && _tmp="${_tmp}
$(print -c - $_simple)"
eval "${_param}=${(q)_tmp[2,-1]}"
return 0
else
# None of the strings matches what's on the line, signal this by
# setting the parameter to an empty string and by the return value.
eval "${_param}=''"
return 1
fi