mirror of
https://github.com/tmux/tmux.git
synced 2026-10-16 16:44:30 +00:00
84 lines
2.1 KiB
Bash
84 lines
2.1 KiB
Bash
#!/bin/sh
|
|
|
|
# A pane prompt redrawn after the pane scrolls stays beside the side status
|
|
# line. With side-status left the pane is not full width, so scrolling is
|
|
# redrawn as damage, which draws the prompt again over the pane.
|
|
|
|
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"
|
|
|
|
DIR=$(mktemp -d) || exit 1
|
|
TRIGGER=$DIR/trigger
|
|
CAPTURE=$DIR/capture
|
|
|
|
cleanup()
|
|
{
|
|
$TMUX2 kill-server >/dev/null 2>&1
|
|
$TMUX kill-server >/dev/null 2>&1
|
|
rm -rf "$DIR"
|
|
}
|
|
trap cleanup 0 1 15
|
|
|
|
fail()
|
|
{
|
|
echo "$*" >&2
|
|
[ -s "$CAPTURE" ] && cat "$CAPTURE" >&2
|
|
exit 1
|
|
}
|
|
|
|
wait_outer_has()
|
|
{
|
|
i=0
|
|
while [ "$i" -lt 50 ]; do
|
|
$TMUX2 capture-pane -p -t outer:0.0 >"$CAPTURE" 2>/dev/null
|
|
grep -q "$1" "$CAPTURE" && return 0
|
|
sleep 0.1
|
|
i=$((i + 1))
|
|
done
|
|
fail "outer client did not show $1"
|
|
}
|
|
|
|
# The pane waits for the trigger, then prints enough lines to scroll.
|
|
$TMUX new-session -d -s inner -n work -x 60 -y 20 "sh -c '
|
|
while [ ! -e $TRIGGER ]; do sleep 0.1; done
|
|
i=0
|
|
while [ \$i -lt 40 ]; do i=\$((i + 1)); echo line\$i; done
|
|
exec sleep 100'" || exit 1
|
|
$TMUX set -g status off || exit 1
|
|
$TMUX set -g automatic-rename off || exit 1
|
|
$TMUX set -g side-status left || exit 1
|
|
$TMUX2 new-session -d -s outer -x 60 -y 20 '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
|
|
|
|
i=0
|
|
while [ "$i" -lt 50 ]; do
|
|
CLIENT=$($TMUX list-clients -F '#{client_name}' 2>/dev/null)
|
|
[ -n "$CLIENT" ] && break
|
|
sleep 0.1
|
|
i=$((i + 1))
|
|
done
|
|
[ -n "$CLIENT" ] || fail "inner client did not attach"
|
|
|
|
$TMUX command-prompt -b -P -t "$CLIENT" -p PROMPTX 'display -p %%' ||
|
|
exit 1
|
|
wait_outer_has PROMPTX
|
|
|
|
: >"$TRIGGER"
|
|
wait_outer_has line40
|
|
sleep 0.5
|
|
|
|
# The bottom row is the side status line followed by the prompt.
|
|
$TMUX2 capture-pane -p -t outer:0.0 >"$CAPTURE" || exit 1
|
|
want="$(printf '%13s' '')│PROMPTX"
|
|
got=$(tail -n 1 "$CAPTURE")
|
|
[ "$got" = "$want" ] || fail "bottom row is '$got', expected '$want'"
|
|
|
|
exit 0
|