mikeslab/Iosevka
1
0
Fork 0
Code Issues Pull requests Projects Releases 1 Packages Wiki Activity Actions 1

Fix shape of curly k under Slab shape.

Browse source
This commit is contained in:
Belleve Invis 2020-01-14 00:45:36 -08:00
parent d7eff9e973
commit 6eea2fb7cf
2 changed files with 8 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

5
changes/3.0.0-alpha.5.md
View file

@ -1,3 +1,4 @@
* Add variant selector for `f`: `v-f-serifed`
* Add variant selectors for `r`: `v-r-standard`, `v-r-serifed`, `v-r-top-serifed`
* Add variant selector for `f`: `v-f-serifed`.
* Add variant selectors for `r`: `v-r-standard`, `v-r-serifed`, `v-r-top-serifed`.
* Fix various `r`-related glyphs' shape.
* Fix shape of curly `k` under Slab shape.

8
glyphs/letters-unified-basic.ptl
View file

@ -1471,6 +1471,7 @@ export : define [apply] : begin
do "k and related ============================================================================"
local [KBalance straightBar] : if straightBar [if SLAB (WIDTH / 16) (WIDTH / 32)] 0
local [KBalanceRight straightBar] : if straightBar [if SLAB (-WIDTH / 32) (WIDTH / 32)] 0
local [KBalanceRightCursive straightBar] : if straightBar [if SLAB (WIDTH / 16) (WIDTH / 32)] 0
define [KLegShape top straightBar] : glyph-construction
local turn (top * 0.99)
local fine : adviceBlackness 3.5
@ -1522,9 +1523,9 @@ export : define [apply] : begin
include : RightwardTopSerif topSerifX top (SIDEJUT + HALFSTROKE * 0.5 * HVCONTRAST)
include : RightwardBottomSerif bottomSerifX 0 SIDEJUT
define [KCurlyShape top straightBar] : glyph-construction
define [KCurlyLoopAndLegShape top straightBar] : glyph-construction
define kshLeft : SB + [KBalance straightBar]
define kshRight : RIGHTSB + [KBalanceRight straightBar] + 0.2 * STROKE
define kshRight : RIGHTSB + [KBalanceRightCursive straightBar] + 0.2 * STROKE
define Ok 0
define arcFine SHOULDERFINE
@ -1612,9 +1613,10 @@ export : define [apply] : begin
if (!para.isItalic) : begin
include : CenterBottomSerif (SB + [KBalance straightBar] + HALFSTROKE * HVCONTRAST) 0 JUT
tag-contour 'serifLB'
define [LowerKCursiveShape straightBar] : glyph-construction
include : VBarLeft (SB + [KBalance straightBar]) 0 CAP
include : KCurlyShape XH straightBar
include : KCurlyLoopAndLegShape XH straightBar
if SLAB : begin
include : LeftwardTopSerif (SB + [KBalance straightBar]) CAP SIDEJUT