[Bast-commits] r4508 - trunk/Devel-REPL/lib/Devel/REPL/Plugin

[matthewt at dev.catalyst.perl.org]

Author: matthewt
Date: 2008-06-20 19:55:06 +0100 (Fri, 20 Jun 2008)
New Revision: 4508

Modified:
   trunk/Devel-REPL/lib/Devel/REPL/Plugin/Packages.pm
Log:
fix from Sartak for end-of-line comment bug reported by jrockway

Modified: trunk/Devel-REPL/lib/Devel/REPL/Plugin/Packages.pm
===================================================================
--- trunk/Devel-REPL/lib/Devel/REPL/Plugin/Packages.pm	2008-06-19 15:48:39 UTC (rev 4507)
+++ trunk/Devel-REPL/lib/Devel/REPL/Plugin/Packages.pm	2008-06-20 18:55:06 UTC (rev 4508)
@@ -26,7 +26,8 @@
   my $line = $self->$orig(@args);
   # add a BEGIN block to set the package around at the end of the sub
   # without mangling the return value (we save it off into a global)
-  $line .= '; BEGIN { $Devel::REPL::Plugin::Packages::PKG_SAVE = __PACKAGE__; }';
+  $line .= '
+; BEGIN { $Devel::REPL::Plugin::Packages::PKG_SAVE = __PACKAGE__; }';
   return $line;
 };