X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fconsole.pl;h=14c95bac6b14505493d4891098c1a8b117187b7c;hb=6d0ecd3545795aecacff640efc5ccc4e01be892b;hp=d01cd5390e8a88af39b8324dfe67c76ecd66a999;hpb=b1f9b4650ed8fdeb1e03834f076f3040ce65776a;p=spider.git diff --git a/perl/console.pl b/perl/console.pl index d01cd539..14c95bac 100755 --- a/perl/console.pl +++ b/perl/console.pl @@ -134,6 +134,7 @@ sub doresize $inscroll = 0; $spos = @sh < $pagel ? 0 : @sh - $pagel; show_screen(); + $conn->send_later("C$call|$cols") if $conn; } # cease communications