X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fkill.pl;fp=cmd%2Fkill.pl;h=dd4760594a3effeb471af28634c0f07ae46d7b14;hb=de987b900c04d852acec5e1af9a4326b16533253;hp=c2062ba4bd69e0327ad98fac206f5e1b66f75279;hpb=632bda2671a8b0cf73b1a0bffa7b906c8744b14f;p=spider.git diff --git a/cmd/kill.pl b/cmd/kill.pl index c2062ba4..dd476059 100644 --- a/cmd/kill.pl +++ b/cmd/kill.pl @@ -40,7 +40,7 @@ while (@f) { my $from = $1; my $to = $2; @refs = grep { !($self->priv < 5 && $_->to ne $call && $_->from ne $call) } DXMsg::get_all() unless @refs; - @refs = grep { $_->msgno >= $from && $_->msgno < $to } @refs; + @refs = grep { $_->msgno >= $from && $_->msgno <= $to } @refs; } elsif ($f =~ /^fr/io) { $f = shift @f; if ($f) {