Fix "No arguments!" error in Plugin::DDS when nothing to dump (fixes: #71205)

[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..d32a5c3 100644 (file)
--- a/lib/Devel/REPL/Plugin/DDS.pm
+++ b/lib/Devel/REPL/Plugin/DDS.pm
@@ -8,7 +8,7 @@ around 'format_result' => sub {
    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 {