Skip to content
Browse files

Fix detection of annotation

  • Loading branch information...
1 parent cd47be7 commit 01e0f56298e7505efa430a953ee91c9696fa70f8 @ckeen committed May 23, 2011
Showing with 1 addition and 1 deletion.
  1. +1 −1 pastiche.scm
View
2 pastiche.scm
@@ -237,7 +237,7 @@
(fold (let ((c (length snippets)))
(lambda (p s)
(set! c (sub1 c))
- (++ (print-snippet p annotation?: (not (= c (- (length (car snippets)) 1))) count: c) s)))
+ (++ (print-snippet p annotation?: (= c (- (length snippets) 1)) count: c) s)))
""
snippets))

0 comments on commit 01e0f56

Please sign in to comment.
Something went wrong with that request. Please try again.