Less clutter

gisle · Jan 2, 2009 · d87175f · d87175f
1 parent 50dc94a
commit d87175f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/Data/Dump/Trace.pm b/lib/Data/Dump/Trace.pm
@@ -84,7 +84,7 @@ sub mcall {
     my $o = shift;
     my $method = shift;
     my $oname = ref($o) ? $obj_name{overload::StrVal($o)} || "\$o" : $o;
-    print YELLOW, $oname, "->", $method, dumpav(@_), RESET;
+    print YELLOW, $oname, "->", $method, @_ ? dumpav(@_) : "", RESET;
     if (!defined wantarray) {
         print "\n";
         $o->$method(@_);