mirror of
https://github.com/tmux/tmux.git
synced 2026-10-16 16:44:30 +00:00
90 lines
2.2 KiB
Bash
90 lines
2.2 KiB
Bash
#!/bin/sh
|
|
|
|
# Text before and after an empty or completely trimmed list is drawn with
|
|
# the selected alignment, including mouse ranges in the surviving text.
|
|
|
|
PATH=/bin:/usr/bin
|
|
TERM=screen
|
|
LC_ALL=C.UTF-8
|
|
export PATH TERM LC_ALL
|
|
|
|
[ -z "$TEST_TMUX" ] && TEST_TMUX=$(readlink -f ../tmux)
|
|
TMUX="$TEST_TMUX -LtestA$$ -f/dev/null"
|
|
TMUX2="$TEST_TMUX -LtestB$$ -f/dev/null"
|
|
|
|
cleanup()
|
|
{
|
|
$TMUX2 kill-server >/dev/null 2>&1
|
|
$TMUX kill-server >/dev/null 2>&1
|
|
}
|
|
trap cleanup 0 1 15
|
|
|
|
check()
|
|
{
|
|
$TMUX set -g 'status-format[0]' "$1" || exit 1
|
|
i=0
|
|
while [ "$i" -lt 50 ]; do
|
|
got=$($TMUX2 capture-pane -p -t outer:0.0 | head -n 1)
|
|
[ "$got" = "$2" ] && return
|
|
sleep 0.1
|
|
i=$((i + 1))
|
|
done
|
|
echo "format '$1': got '$got', expected '$2'" >&2
|
|
exit 1
|
|
}
|
|
|
|
click()
|
|
{
|
|
$TMUX set -g @clicked none || exit 1
|
|
seq=$(printf '\033[<0;%s;1M\033[<0;%s;1m' "$1" "$1")
|
|
$TMUX2 send-keys -t outer:0.0 -l "$seq" || exit 1
|
|
i=0
|
|
while [ "$i" -lt 50 ]; do
|
|
got=$($TMUX show -gv @clicked)
|
|
[ "$got" = "$2" ] && break
|
|
sleep 0.1
|
|
i=$((i + 1))
|
|
done
|
|
[ "$got" = "$2" ] || {
|
|
echo "column $1: range '$got', expected '$2'" >&2
|
|
exit 1
|
|
}
|
|
sleep 0.5
|
|
}
|
|
|
|
$TMUX new-session -d -s inner -x 20 -y 8 'sleep 100' || exit 1
|
|
$TMUX set -g status-position top || exit 1
|
|
$TMUX set -g mouse on || exit 1
|
|
$TMUX bind -n MouseDown1Status \
|
|
set -gF @clicked '#{mouse_status_range}' || exit 1
|
|
$TMUX2 new-session -d -s outer -x 20 -y 8 'sleep 100' || exit 1
|
|
$TMUX2 set -g status off || exit 1
|
|
$TMUX2 respawn-pane -k -t outer:0.0 "$TMUX attach -t inner" || exit 1
|
|
sleep 1
|
|
|
|
for align in left centre right; do
|
|
case "$align" in
|
|
left) padding=0 ;;
|
|
centre) padding=7 ;;
|
|
right) padding=13 ;;
|
|
esac
|
|
want="$(printf '%*s' "$padding" '')prepost"
|
|
format="#[align=$align,range=user|pre]pre#[norange]"
|
|
format=$format'#[list=on]#[nolist]'
|
|
format=$format'#[range=user|post]post#[norange]'
|
|
check "$format" "$want"
|
|
click "$((padding + 1))" pre
|
|
click "$((padding + 4))" post
|
|
|
|
# The list has text and a range, but no room remains for it.
|
|
format="#[align=$align,range=user|pre]0123456789#[norange]"
|
|
format=$format'#[list=on]#[range=user|hidden]'
|
|
format=$format'HHHHHHHHHHHHHHHHHHHH#[norange]#[nolist]'
|
|
format=$format'#[range=user|post]abcdefghij#[norange]'
|
|
check "$format" 0123456789abcdefghij
|
|
click 1 pre
|
|
click 11 post
|
|
done
|
|
|
|
exit 0
|