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

[sparky]

Author: sparky
Date: Thu Oct 22 23:46:24 2009
New Revision: 10827

Modified:
   toys/rsget.pl/RSGet/Processor.pm
Log:
- fix perl part


Modified: toys/rsget.pl/RSGet/Processor.pm
==============================================================================
--- toys/rsget.pl/RSGet/Processor.pm	(original)
+++ toys/rsget.pl/RSGet/Processor.pm	Thu Oct 22 23:46:24 2009
@@ -92,7 +92,7 @@
 				next;
 			}
 			if ( $part eq "perl" ) {
-				push @{$parts{perl}}, $_, <F_IN>;
+				push @{$parts{perl}}, $_."\n", <F_IN>;
 				last;
 			} elsif ( $part eq "start" and /^stage_.*?:/ ) {
 				push @{$parts{start}}, $_;