increment $VERSION after 1.003028 release
[p5sagit/Devel-REPL.git] / lib / Devel / REPL / Plugin / DDS.pm
index 9a32449..7940219 100644 (file)
@@ -1,14 +1,20 @@
+use strict;
+use warnings;
 package Devel::REPL::Plugin::DDS;
+# ABSTRACT: Format results with Data::Dump::Streamer
+
+our $VERSION = '1.003029';
 
 use Devel::REPL::Plugin;
 use Data::Dump::Streamer ();
+use namespace::autoclean;
 
 around 'format_result' => sub {
    my $orig = shift;
    my $self = shift;
    my @to_dump = @_;
    my $out;
-   if (@to_dump != 1 || ref $to_dump[0]) {
+   if (@to_dump > 1 || ref $to_dump[0]) {
       if (@to_dump == 1 && overload::Method($to_dump[0], '""')) {
          $out = "@to_dump";
       } else {
@@ -27,9 +33,7 @@ around 'format_result' => sub {
 
 __END__
 
-=head1 NAME
-
-Devel::REPL::Plugin::DDS - Format results with Data::Dump::Streamer
+=pod
 
 =head1 SYNOPSIS
 
@@ -50,4 +54,3 @@ Devel::REPL::Plugin::DDS - Format results with Data::Dump::Streamer
  $
 
 =cut
-