ui.baseline-alignment: Don't divide f by 2. Also, can't put ``0 or`` after

``max-cap-height`` because it breaks something else.
db4
Doug Coleman 2015-08-19 17:20:45 -05:00
parent 3649dd2764
commit f6c1d00c37
1 changed files with 1 additions and 1 deletions

View File

@ -61,7 +61,7 @@ TUPLE: gadget-metrics height ascent descent cap-height ;
:: combine-metrics ( graphics-height ascent descent cap-height -- ascent' descent' )
ascent [
cap-height 2 / :> mid-line
cap-height 0 or 2 / :> mid-line
graphics-height 2 /
[ ascent mid-line - max mid-line + floor >integer ]
[ descent mid-line + max mid-line - ceiling >integer ] bi