From 9b97dadc0160313bfc961f17c63a0a19f1d89509 Mon Sep 17 00:00:00 2001
From: Nicholas Marriott <nicholas.marriott@gmail.com>
Date: Mon, 27 Jul 2026 15:26:26 +0100
Subject: [PATCH] Test for pipe-pane.

---
 regress/pipe-pane.sh | 52 ++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 52 insertions(+)
 create mode 100644 regress/pipe-pane.sh

diff --git a/regress/pipe-pane.sh b/regress/pipe-pane.sh
new file mode 100644
index 000000000..ee302ffbb
--- /dev/null
+++ b/regress/pipe-pane.sh
@@ -0,0 +1,52 @@
+#!/bin/sh
+
+# Tests of pipe-pane behaviour.
+
+PATH=/bin:/usr/bin
+TERM=screen
+LANG=C.UTF-8
+LC_ALL=C.UTF-8
+export TERM LANG LC_ALL
+
+[ -z "$TEST_TMUX" ] && TEST_TMUX=$(readlink -f ../tmux)
+TMUX="$TEST_TMUX -LtestA$$ -f/dev/null"
+$TMUX kill-server 2>/dev/null
+
+fail()
+{
+	echo "$1"
+	$TMUX kill-server 2>/dev/null
+	exit 1
+}
+
+check_ok()
+{
+	if ! $TMUX "$@"; then
+		fail "Command failed: $*"
+	fi
+}
+
+check_alive()
+{
+	if [ "$($TMUX display-message -p alive 2>&1)" != "alive" ]; then
+		fail "Server died"
+	fi
+}
+
+# A pipe-pane -I child may write after the pane process has exited. With
+# remain-on-exit, the pane stays around but its bufferevent has been freed.
+check_ok new-session -d -s pipe -x 80 -y 24 'sleep 0.2'
+check_ok set-option -t pipe:0 remain-on-exit on
+check_ok pipe-pane -t pipe:0.0 -I 'sleep 0.6; printf x'
+
+i=0
+while [ "$($TMUX display-message -p -t pipe:0.0 '#{pane_dead}')" != "1" ]; do
+	i=$((i + 1))
+	[ "$i" -gt 50 ] && fail "Pane did not die"
+	sleep 0.1
+done
+
+sleep 0.7
+check_alive
+
+$TMUX kill-server 2>/dev/null