From 7fead2875a4c4503344a06a688b83e40561f0d3b Mon Sep 17 00:00:00 2001
From: Robby Findler <robby@racket-lang.org>
Date: Thu, 2 Sep 2010 12:20:19 -0500
Subject: [PATCH] forgot the flip check (caught by the test suites)

---
 collects/mrlib/image-core.rkt | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/collects/mrlib/image-core.rkt b/collects/mrlib/image-core.rkt
index 6259dacef4..1fb72cf419 100644
--- 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