hamradio/spider
1
0
Fork 0
mirror of git://scm.dxcluster.org/scm/spider synced 2024-09-21 07:47:10 +00:00
Code Issues Packages Projects Releases Wiki Activity

adjustments ...

Browse Source
This commit is contained in:
minima 2001-10-02 16:15:28 +00:00
parent 1283d7c748
commit 36bd2cf344
2 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
cmd/stat/msg.pl
View File

@ -13,9 +13,9 @@ return (1, $self->msg('e5')) if $self->priv < 1;
if (@list == 0) {
my $ref;
push @out, "Work Queue Keys";
push @out, map { " $_" } sort DXMsg::get_all_fwq();
push @out, map { " $_" } sort (DXMsg::get_all_fwq());
push @out, "Busy Queue Data";
foreach my $key (sort DXMsg::get_all_busy()) {
foreach my $key (sort (DXMsg::get_all_busy())) {
$ref = DXMsg::get_busy($key);
if ($ref) {
my $msgno = $ref->msgno;

1
perl/DXMsg.pm
View File

@ -1187,6 +1187,7 @@ sub import_msgs
my @out = import_one($main::me, \@msg, $splitit);
Log('msg', @out);
}
queue_msg(0);
}
# import one message as a list in bbs (as extended) mode