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

[sparky]

Author: sparky
Date: Tue Feb 15 00:38:53 2011
New Revision: 12151

Modified:
   toys/rsget.pl/RSGet/Line.pm
Log:
- collapse whitespaces before printing


Modified: toys/rsget.pl/RSGet/Line.pm
==============================================================================
--- toys/rsget.pl/RSGet/Line.pm	(original)
+++ toys/rsget.pl/RSGet/Line.pm	Tue Feb 15 00:38:53 2011
@@ -210,7 +210,7 @@
 	my $text = shift;
 	$text = "" unless defined $text;
 	$text =~ s/\n+$//sg;
-	$text =~ s/\n/ /sg;
+	$text =~ s/\s+/ /sg;
 	$text =~ s/\0/***/g;
 	$active{ $line }->[1] = $text;