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

no message

Browse Source 
original commit: bb1eb32cb159ee240a087cc25f18239245098444
This commit is contained in:
Robby Findler 2000-12-13 18:40:54 +00:00
parent fcc59c4ecf
commit 080e69820f
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/framework/canvas.ss
View File

@ -104,7 +104,7 @@
;; console printer ;; console printer
(let ([fallback (let ([fallback
(lambda () (lambda ()
(send edit get-snip-position (send edit get-snip-location
s left-edge-box top-edge-box))]) s left-edge-box top-edge-box))])
(cond (cond
[(not width?) (fallback)] [(not width?) (fallback)]