Fix off by one error, thanks mflatt

This commit is contained in:
Jay McCarthy 2010-05-04 12:22:45 -06:00
parent c2c72ce7a9
commit 2bb3f5f6d7

View File

@ -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))))