projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Fix slots around the time
[spider.git]
/
cmd
/
show
/
debug_ring.pl
diff --git
a/cmd/show/debug_ring.pl
b/cmd/show/debug_ring.pl
index 272da35c2bb7d69ca86a07f391c5d7e33ac146d8..a8a2900eb224f0729a188b26ac047114e6f41f33 100644
(file)
--- a/
cmd/show/debug_ring.pl
+++ b/
cmd/show/debug_ring.pl
@@
-12,10
+12,11
@@
my $n;
my $doclear;
for (@args) {
my $doclear;
for (@args) {
+ say "arg: $_";
$n = 0+$_ if /^\d+$/;
$doclear++ if /^clear$/;
}
$n = 0+$_ if /^\d+$/;
$doclear++ if /^clear$/;
}
-DXDebug::dbgprintring($n);
+
my $lines =
DXDebug::dbgprintring($n);
DXDebug::dbgclearring() if $doclear;
DXDebug::dbgclearring() if $doclear;
-return (1,
'Contents of debug ring buffer logged. View with watchdbg.'
);
+return (1,
qq{Contents of $lines lines of debug ring buffer logged. View with watchdbg.}
);