fix console.pl max scroll depth

This commit is contained in:
Dirk Koopman 2022-01-21 18:45:17 +00:00
parent 7e9852009e
commit eac4538f1f

View File

@ -533,7 +533,7 @@ $SIG{__DIE__} = \&sig_term;
$Text::Wrap::columns = $cols; $Text::Wrap::columns = $cols;
$conn->send_later("A$call|$connsort width=$cols enhanced"); $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"); $conn->send_later("I$call|set/nobeep");
#Msg->set_event_handler(\*STDIN, "read" => \&rec_stdin); #Msg->set_event_handler(\*STDIN, "read" => \&rec_stdin);