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

slideshow/pict repair

Browse Source 
Merge to v5.3.1
This commit is contained in:
Matthew Flatt 2012-10-11 16:22:50 -06:00
parent a150140684
commit a755479d59
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/texpict/balloon.rkt
View File

@ -153,7 +153,7 @@
(define pip-wrap-balloon
(lambda (p corner dx dy [color balloon-color] [c-rad corner-size]
#:factor [factor 1])
(pin-balloon (wrap-balloon p corner dx dy color c-rad) (blank 0) 0 0 #:factor factor)))
(pin-balloon (wrap-balloon p corner dx dy color c-rad #:factor factor) (blank 0) 0 0)))
(define (do-place-balloon flip-proc? balloon p to find-to)
(let-values ([(x y) (if (and (number? to)