X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fset%2Fdebug.pl;h=f88434e2f1fd7783512f18168d1b93cade5f2bc0;hb=668e4252d23e2eda2a6b234f1031e1c1a5f43d15;hp=e5c4658b12bec6d237fa836367c442afcae772a8;hpb=6b6a8002929017b6d4217f68fa492a2d728ee1fe;p=spider.git diff --git a/cmd/set/debug.pl b/cmd/set/debug.pl index e5c4658b..f88434e2 100644 --- a/cmd/set/debug.pl +++ b/cmd/set/debug.pl @@ -4,12 +4,10 @@ # $Id$ # -use DXDebug; - -$self = shift; +my ($self, $line) = @_; return (0) if $self->priv < 9; -dbgadd(split); +dbgadd(split /\s+/, $line); my $set = join ' ', dbglist(); return (1, "Debug Levels now: $set");