diff options
author | root <Knut Auvor Grythe knut@auvor.no> | 2015-03-31 15:14:26 +0200 |
---|---|---|
committer | root <Knut Auvor Grythe knut@auvor.no> | 2015-03-31 15:14:26 +0200 |
commit | aef116e3b3644f2b86b8c34150bb19fe5afe669f (patch) | |
tree | 7847206cb1683239b4b93ba33a80d07bd538e837 | |
parent | 8a76ac019ac8f9c1409c4a34a74a4a38ae025d8c (diff) |
Make paging stop hanging smanagrun
-rwxr-xr-x | include/nms.pm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/include/nms.pm b/include/nms.pm index e334679..479e013 100755 --- a/include/nms.pm +++ b/include/nms.pm @@ -67,8 +67,11 @@ sub switch_connect_ssh($) { -cmd_remove_mode => 1, -output_record_separator => "\r"); $telnet->waitfor(-match => $telnet->prompt, - -errmode => "return") + -errmode => "return") or die "login failed: " . $telnet->lastline; + + $telnet->cmd("set cli screen-length 0"); + return { telnet => $telnet, ssh => $ssh, pid => $pid, pty => $pty }; } |