r80228@onn: sartak | 2009-02-17 19:59:17 -0500

 Typo fix :/

git-svn-id: http://dev.catalyst.perl.org/repos/bast/trunk/Devel-REPL@5512 bd8105ee-0ff8-0310-8827-fb3f25b6796d

diff --git a/lib/Devel/REPL/Plugin/DDS.pm b/lib/Devel/REPL/Plugin/DDS.pm
index 20ead7e..b9c3f33 100644 (file)
--- a/lib/Devel/REPL/Plugin/DDS.pm
+++ b/lib/Devel/REPL/Plugin/DDS.pm
@@ -9,7 +9,7 @@ around 'format_result' => sub {
   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;