< -> <= :)

[spider.git] / cmd / catchup.pl

diff --git a/cmd/catchup.pl b/cmd/catchup.pl
index e2f439040921652d9198cf7f719a93e51c55a7cf..20020067b8d90a87e4750c24cc0c0ae7e70d4231 100644 (file)
--- 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;
                }