spider/cmd/debug.pl
djk 8aa1d22330 1. Added msg command to allow the changing of To, From, Subject and so on the
messages. This seems particularly important just now as a whole raft of G3's
seem to be putting out non private bulls to callsigns.
2. While I am at set messages to TO fields that appear to be users to private
if they have been sent as bulls.
3. Add DISTROs, if a callsign field appears in /spider/msg/distro in upper
use that as a list of callsigns to send further. Note this is potentially
recursive as callsigns in a distro can be distros.
1999-08-29 20:18:29 +00:00

16 lines
247 B
Perl

#
# go INSTANTLY into debug mode (if you are in the debugger!)
#
# remember perl -d cluster.pl to use this
#
# Copyright (c) 1998 Dirk Koopman G1TLH
#
# $Id$
#
my $self = shift;
return (1, $self->msg('e5')) if $self->priv < 9;
$DB::single = 1;