]> dxcluster.net Git - spider.git/blob - cmd/set/debug.pl
first cut at outgoing ax25 / external connects
[spider.git] / cmd / set / debug.pl
1 #
2 # add a debug level
3 #
4 # $Id$
5 #
6
7 my ($self, $line) = @_;
8 return (0) if $self->priv < 9;
9
10 dbgadd(split /\s+/, $line);
11 my $set = join ' ', dbglist();
12
13 return (1, "Debug Levels now: $set");