From: minima Date: Wed, 25 Oct 2000 21:04:23 +0000 (+0000) Subject: < -> <= :) X-Git-Tag: R_1_45~85 X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=85c3c8b016c16c0b759457201ba2b60315e18236;p=spider.git < -> <= :) --- diff --git a/cmd/catchup.pl b/cmd/catchup.pl index e2f43904..20020067 100644 --- a/cmd/catchup.pl +++ b/cmd/catchup.pl @@ -29,7 +29,7 @@ foreach my $msgno (@f) { @ref = DXMsg::get_all(); last; } elsif (my ($f, $t) = $msgno =~ /(\d+)-(\d+)/) { - while ($f < $t) { + while ($f <= $t) { $ref = DXMsg::get($f++); push @ref, $ref if $ref; } diff --git a/cmd/uncatchup.pl b/cmd/uncatchup.pl index 40461071..fb54f7e2 100644 --- a/cmd/uncatchup.pl +++ b/cmd/uncatchup.pl @@ -29,7 +29,7 @@ foreach my $msgno (@f) { @ref = DXMsg::get_all(); last; } elsif (my ($f, $t) = $msgno =~ /(\d+)-(\d+)/) { - while ($f < $t) { + while ($f <= $t) { $ref = DXMsg::get($f++); push @ref, $ref if $ref; }