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

svn: r16995

Browse Source 
original commit: 54adde155a338d2820f6e9a2d422fdcdb3951022
This commit is contained in:
Robby Findler 2009-11-23 17:05:09 +00:00
parent 353a1ddddc
commit 84ae3db260
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/private/text.ss
View File

@ -475,7 +475,7 @@ WARNING: printf is rebound in the body of the unit to always
[top (rectangle-top rectangle)]
[right (if (number? (rectangle-right rectangle))
(rectangle-right rectangle)
view-x)]
(+ view-x view-width))]
[bottom (rectangle-bottom rectangle)]
[width (max 0 (- right left))]
[height (max 0 (- bottom top))])