X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FDevel-REPL.git;a=blobdiff_plain;f=lib%2FDevel%2FREPL%2FPlugin%2FDDS.pm;h=20ead7eef6f2580524ad3ef8a992d215633425e6;hp=fe35319613d16230c79aa3144b86b3b55fb961a4;hb=bbea729e0b9c3eb63931565b7047b447e3e45b88;hpb=44e1719786d9d4384e01f659f8104baf1560b3a0

diff --git a/lib/Devel/REPL/Plugin/DDS.pm b/lib/Devel/REPL/Plugin/DDS.pm
index fe35319..20ead7e 100644
--- a/lib/Devel/REPL/Plugin/DDS.pm
+++ b/lib/Devel/REPL/Plugin/DDS.pm
@@ -9,10 +9,14 @@ around 'format_result' => sub {
   my $to_dump = (@_ > 1) ? [@_] : $_[0];
   my $out;
   if (ref $to_dump) {
-    my $dds = Data::Dump::Streamer->new;
-    $dds->Freezer(sub { "$_[0]"; });
-    $dds->Data($to_dump);
-    $out = $dds->Out;
+    if (overload::Method($to_dump, '""') {
+      $out = "$to_dump";
+    } else {
+      my $dds = Data::Dump::Streamer->new;
+      $dds->Freezer(sub { "$_[0]"; });
+      $dds->Data($to_dump);
+      $out = $dds->Out;
+    }
   } else {
     $out = $to_dump;
   }