]> gb7djk.dxcluster.net Git - spider.git/blob - cmd/show/debug.pl
Started on the dx cluster database stuff
[spider.git] / cmd / show / debug.pl
1 #
2 # show the debug status
3 #
4 # $Id$
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 ' ', dbglist();   # generate space delimited list
13
14 return (1, "debug levels: $set");
15
16