forgot the flip check (caught by the test suites)

original commit: 7fead2875a4c4503344a06a688b83e40561f0d3b
2010-09-02 12:20:19 -05:00 · 2010-09-02 12:20:19 -05:00 · 33957b3b3c
commit 33957b3b3c
parent 62f4b7e9d5
1 changed files with 1 additions and 1 deletions
--- a/collects/mrlib/image-core.rkt
+++ b/collects/mrlib/image-core.rkt
@ -830,7 +830,7 @@ the mask bitmap and the original bitmap are all together in a single bytes!

 (define (do-rotate bitmap flip?)
  (cond
-    [(zero? (bitmap-angle bitmap))
+    [(and (not flip?) (zero? (bitmap-angle bitmap)))
     ;; don't rotate anything in this case.
     (void)]
    [else