From: minima <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;
 		}