ui.text.core-text: fix jumping "def".

db4
John Benediktsson 2012-12-11 08:06:02 -08:00
parent be661c89e3
commit e01ff14fa0
1 changed files with 3 additions and 3 deletions

View File

@ -12,13 +12,13 @@ SINGLETON: core-text-renderer
<PRIVATE
: unscale ( m -- n )
retina? get-global [ 2 /i ] when ; inline
retina? get-global [ 2.0 / ] when ; inline
: scale ( m -- n )
retina? get-global [ 2 * ] when ; inline
retina? get-global [ 2.0 * ] when ; inline
: scale-dim ( dim -- dim' )
retina? get-global [ [ 2 /i ] map ] when ; inline
retina? get-global [ [ 2.0 / ] map ] when ; inline
: scale-metrics ( metrics -- metrics' )
retina? get-global [