diff options
Diffstat (limited to 'lib/perl5db.pl')
-rw-r--r-- | lib/perl5db.pl | 8 |
1 files changed, 1 insertions, 7 deletions
diff --git a/lib/perl5db.pl b/lib/perl5db.pl index 03f9d44d4e..4d05e6d930 100644 --- a/lib/perl5db.pl +++ b/lib/perl5db.pl @@ -1752,13 +1752,7 @@ sub list_versions { } $version{$file} .= $INC{$file}; } - do 'dumpvar.pl' unless defined &main::dumpValue; - if (defined &main::dumpValue) { - local $frame = 0; - &main::dumpValue(\%version); - } else { - print $OUT "dumpvar.pl not available.\n"; - } + dumpit($OUT,\%version); } sub sethelp { |