Add a ring buffer to debugging + other things

[spider.git] / cmd / show / cmd_cache.pl

diff --git a/cmd/show/cmd_cache.pl b/cmd/show/cmd_cache.pl
index 25321e9a66f502640ebd835c7b3524b5b409b7ab..5e7fd9ec8f11d1d9566fc6a8b15e1953a6f2e327 100644 (file)
--- a/cmd/show/cmd_cache.pl
+++ b/cmd/show/cmd_cache.pl
@@ -12,9 +12,9 @@ my $line = shift;
 return (1, $self->msg('e5')) if $self->priv < 9;
 
 my @out = sprintf "%-20s %s", "Command", "Path";
-for (sort keys %cmd_cache) {
+for (sort keys %DXCommandmode::cmd_cache) {
        next if $line && $_ !~ m|\Q$line|i;
-       my $v = $cmd_cache{$_};
+       my $v = $DXCommandmode::cmd_cache{$_};
        $v =~ s|,|/|g;
        push @out, sprintf "%-20s %s", $_, "$v.pl";
 }