suzanne.soy/gui
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix merge mistake

Browse Source 
original commit: 1db27b474f32f0c136f91b509b02b4a48da0f2dd
This commit is contained in:
Matthew Flatt 2010-11-05 15:14:23 -06:00
parent a4d31e5e86
commit e4ffaabd35
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
collects/mrlib/image-core.rkt
View File

@ -719,8 +719,8 @@ has been moved out).
(curve-segment-e-pull shape)
(scale-color (curve-segment-color shape) x-scale y-scale))])
(render-poly/line-segment/curve-segment this-one dc dx dy))]
[(or (bitmap? shape) (np-atomic-shape? shape))
(let* ([shape (if (bitmap? shape)
[(or (ibitmap? shape) (np-atomic-shape? shape))
(let* ([shape (if (ibitmap? shape)
(make-flip #f shape)
shape)]
[this-one (scale-np-atomic x-scale y-scale shape)])