From eac4538f1f78b3d014539dc548fc6322e8337429 Mon Sep 17 00:00:00 2001 From: Dirk Koopman Date: Fri, 21 Jan 2022 18:45:17 +0000 Subject: [PATCH] fix console.pl max scroll depth --- perl/console.pl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/perl/console.pl b/perl/console.pl index b71d8a68..e828c405 100755 --- a/perl/console.pl +++ b/perl/console.pl @@ -533,7 +533,7 @@ $SIG{__DIE__} = \&sig_term; $Text::Wrap::columns = $cols; $conn->send_later("A$call|$connsort width=$cols enhanced"); -$conn->send_later("I$call|set/page $maxshist"); +$conn->send_later("I$call|set/page " . ($maxshist-5)); $conn->send_later("I$call|set/nobeep"); #Msg->set_event_handler(\*STDIN, "read" => \&rec_stdin); -- 2.43.0