projects
/
spider.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
957b9c4edede7e29af454f725dd3b0a5b1f733d1
[spider.git]
/
cmd
/
show
/
debug.pl
1
#
2
# show the debug status
3
#
4
#
5
#
6
7
use DXDebug;
8
9
my $self = shift;
10
return (0) if ($self->priv < 9); # only console users allowed
11
12
my $set = join ' ', sort (dbglist()); # generate space delimited list
13
14
return (1, "debug levels: $set");
15
16