[Bast-commits] r5512 - in trunk/Devel-REPL: . lib/Devel/REPL/Plugin

[Sartak at dev.catalyst.perl.org]

Author: Sartak
Date: 2009-02-18 00:59:26 +0000 (Wed, 18 Feb 2009)
New Revision: 5512

Modified:
   trunk/Devel-REPL/
   trunk/Devel-REPL/lib/Devel/REPL/Plugin/DDS.pm
Log:
 r80228 at onn:  sartak | 2009-02-17 19:59:17 -0500
 Typo fix :/



Property changes on: trunk/Devel-REPL
___________________________________________________________________
Name: svk:merge
   - 08e7d58d-de06-4458-8c15-335e402ab116:/local/Devel-REPL:80226
6d2a1d83-d666-409f-9dbf-d3bfcf4e9009:/local/bast/broken_internets/Devel-REPL:80567
   + 08e7d58d-de06-4458-8c15-335e402ab116:/local/Devel-REPL:80228
6d2a1d83-d666-409f-9dbf-d3bfcf4e9009:/local/bast/broken_internets/Devel-REPL:80567

Modified: trunk/Devel-REPL/lib/Devel/REPL/Plugin/DDS.pm
===================================================================
--- trunk/Devel-REPL/lib/Devel/REPL/Plugin/DDS.pm	2009-02-18 00:58:40 UTC (rev 5511)
+++ trunk/Devel-REPL/lib/Devel/REPL/Plugin/DDS.pm	2009-02-18 00:59:26 UTC (rev 5512)
@@ -9,7 +9,7 @@
   my $to_dump = (@_ > 1) ? [@_] : $_[0];
   my $out;
   if (ref $to_dump) {
-    if (overload::Method($to_dump, '""') {
+    if (overload::Method($to_dump, '""')) {
       $out = "$to_dump";
     } else {
       my $dds = Data::Dump::Streamer->new;