X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fkill.pl;h=dd4760594a3effeb471af28634c0f07ae46d7b14;hb=63b5e2134b2ffba051682618f88b09d5ee5457c7;hp=c2062ba4bd69e0327ad98fac206f5e1b66f75279;hpb=3eb722692c2c1e9de84752391d5b6330e062c7e6;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) {