ui.pens.image: allow float math.

master
John Benediktsson 2020-05-18 20:57:03 -07:00
parent cf5bc20b1b
commit 2d71fd9e22
1 changed files with 1 additions and 1 deletions

View File

@ -12,7 +12,7 @@ TUPLE: image-pen image fill? ;
M: image-pen draw-interior
[ dim>> ] [ [ image>> ] [ fill?>> ] bi ] bi*
[ draw-scaled-image ] [
[ image-dim [ - 2 /i ] 2map ] keep
[ image-dim [ - 2 / ] 2map ] keep
'[ _ draw-image ] with-translation
] if ;