keep all namespaces clean

[p5sagit/Devel-REPL.git] / lib / Devel / REPL / Plugin / DDS.pm

diff --git a/lib/Devel/REPL/Plugin/DDS.pm b/lib/Devel/REPL/Plugin/DDS.pm
index 9a32449..ee60a84 100644 (file)
--- a/lib/Devel/REPL/Plugin/DDS.pm
+++ b/lib/Devel/REPL/Plugin/DDS.pm
@@ -1,14 +1,17 @@
+use strict;
+use warnings;
 package Devel::REPL::Plugin::DDS;
 
 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 {