From aef116e3b3644f2b86b8c34150bb19fe5afe669f Mon Sep 17 00:00:00 2001
From: root <Knut Auvor Grythe knut@auvor.no>
Date: Tue, 31 Mar 2015 15:14:26 +0200
Subject: Make paging stop hanging smanagrun

---
 include/nms.pm | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'include/nms.pm')

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 };
 }
 
-- 
cgit v1.2.3