From 2bb3f5f6d7e71e41c4d43ad7911516f73c45d229 Mon Sep 17 00:00:00 2001 From: Jay McCarthy Date: Tue, 4 May 2010 12:22:45 -0600 Subject: [PATCH] Fix off by one error, thanks mflatt --- collects/meta/drdr/scm.ss | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/meta/drdr/scm.ss b/collects/meta/drdr/scm.ss index 4cd6367403..95bb4abc91 100644 --- a/collects/meta/drdr/scm.ss +++ b/collects/meta/drdr/scm.ss @@ -179,7 +179,7 @@ (define (scm-revisions-after cur-rev) (define newest-rev (newest-push)) - (for/list ([rev (in-range (add1 cur-rev) newest-rev)] + (for/list ([rev (in-range (add1 cur-rev) (add1 newest-rev))] #:when (let ([info (push-info rev)]) (and info (hash-has-key? (push-data-branches info) master-branch))))