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

[sparky]

Author: sparky
Date: Sun Dec 19 20:43:52 2010
New Revision: 12002

Modified:
   toys/rsget.pl/RSGet/Line.pm
Log:
- fix file logging


Modified: toys/rsget.pl/RSGet/Line.pm
==============================================================================
--- toys/rsget.pl/RSGet/Line.pm	(original)
+++ toys/rsget.pl/RSGet/Line.pm	Sun Dec 19 20:43:52 2010
@@ -85,7 +85,7 @@
 	}
 
 	print @print unless $nooutput;
-	print $log_fh join "\n", @newdead, ''
+	print $log_fh join "\n", ( map { $_->[0] } @newdead ), ''
 		if $log_fh;
 	if ( @newdead ) {
 		push @dead, @newdead;