SVN: toys/rsget.pl/RSGet/Line.pm

[sparky]

Author: sparky
Date: Mon Dec 20 21:54:35 2010
New Revision: 12015

Modified:
   toys/rsget.pl/RSGet/Line.pm
Log:
- fix redraw on SIGWINCH


Modified: toys/rsget.pl/RSGet/Line.pm
==============================================================================
--- toys/rsget.pl/RSGet/Line.pm	(original)
+++ toys/rsget.pl/RSGet/Line.pm	Mon Dec 20 21:54:35 2010
@@ -279,7 +279,8 @@
 		term_size();
 		my $start = $term_size_rows ? $#dead - $term_size_rows : 0;
 		$start = 0 if $start < 0;
-		print join( "\n", @dead[($start..$#dead)] ), "\n";
+		my $colorend = color_term();
+		print join( "\n", map { color_term( $_->[1] ) . $_->[0] . $colorend } @dead[($start..$#dead)] ), "\n";
 		update();
 	};