From 883413b6b27164cc9bb4d80c396c19ae3b6234dc Mon Sep 17 00:00:00 2001 From: Robby Findler Date: Fri, 18 Jun 2010 16:19:54 -0500 Subject: [PATCH] removed a bogus case in the definition of np-atomic-shape predicate original commit: 0c0009465ec61cfa09126614b3282ae69dc2b1dd --- collects/mrlib/image-core.rkt | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/collects/mrlib/image-core.rkt b/collects/mrlib/image-core.rkt index f9517d7d..70ade946 100644 --- a/collects/mrlib/image-core.rkt +++ b/collects/mrlib/image-core.rkt @@ -429,9 +429,7 @@ has been moved out). (text? shape) (and (flip? shape) (boolean? (flip-flipped? shape)) - (bitmap? (flip-shape shape))) - (point? shape))) ;; does this belong here? - + (bitmap? (flip-shape shape))))) ;; normalize-shape : shape (atomic-shape -> atomic-shape) -> normalized-shape ;; normalizes 'shape', calling 'f' on each atomic shape in the normalized shape.