Fix placement of above marks over Cyrillic Small Ge, Te, and Ya (#1157).
This commit is contained in:
parent
b35dc36869
commit
227ebac506
5 changed files with 13 additions and 5 deletions
1
changes/7.3.1.md
Normal file
1
changes/7.3.1.md
Normal file
|
@ -0,0 +1 @@
|
||||||
|
* Fix placement of above marks over Cyrillic Small Ge, Te, and Ya (#1157).
|
|
@ -35,6 +35,10 @@ glyph-block Letter-Greek-Upper-Gamma: begin
|
||||||
topRightSerifed { SLAB-TR false }
|
topRightSerifed { SLAB-TR false }
|
||||||
serifed { SLAB-ALL true }
|
serifed { SLAB-ALL true }
|
||||||
|
|
||||||
|
define CyrlGeMarks : object
|
||||||
|
capital : MarkSet.OfZone { .top (CAP + Accent / 2) .bot 0 }
|
||||||
|
e : MarkSet.OfZone { .top (XH + Accent / 2) .bot 0 }
|
||||||
|
|
||||||
foreach { suffix { slabType doSB } } [Object.entries GammaConfig] : do
|
foreach { suffix { slabType doSB } } [Object.entries GammaConfig] : do
|
||||||
create-glyph "grek/Gamma.\(suffix)" : glyph-proc
|
create-glyph "grek/Gamma.\(suffix)" : glyph-proc
|
||||||
include : MarkSet.capital
|
include : MarkSet.capital
|
||||||
|
@ -70,13 +74,13 @@ glyph-block Letter-Greek-Upper-Gamma: begin
|
||||||
include : CyrHookDescender (GammaBarLeft + Stroke * HVContrast) (overflow -- (MidJutCenter - HalfStroke * HVContrast))
|
include : CyrHookDescender (GammaBarLeft + Stroke * HVContrast) (overflow -- (MidJutCenter - HalfStroke * HVContrast))
|
||||||
|
|
||||||
create-glyph "cyrl/Ge.\(suffix)" : glyph-proc
|
create-glyph "cyrl/Ge.\(suffix)" : glyph-proc
|
||||||
include : MarkSet.capital
|
include : CyrlGeMarks.capital
|
||||||
include : GammaShape CAP slabType
|
include : GammaShape CAP slabType
|
||||||
eject-contour 'serifRT'
|
eject-contour 'serifRT'
|
||||||
include : VBarRight (RightSB - OX) CAP (CAP + Accent)
|
include : VBarRight (RightSB - OX) CAP (CAP + Accent)
|
||||||
|
|
||||||
create-glyph "cyrl/ge.upright.\(suffix)" : glyph-proc
|
create-glyph "cyrl/ge.upright.\(suffix)" : glyph-proc
|
||||||
include : MarkSet.e
|
include : CyrlGeMarks.e
|
||||||
include : GammaShape XH slabType
|
include : GammaShape XH slabType
|
||||||
eject-contour 'serifRT'
|
eject-contour 'serifRT'
|
||||||
include : VBarRight (RightSB - OX) XH (XH + Accent)
|
include : VBarRight (RightSB - OX) XH (XH + Accent)
|
||||||
|
|
|
@ -209,6 +209,9 @@ glyph-block Letter-Latin-S : begin
|
||||||
[Just SLAB-INWARD] : ArcEndInwardSerifR RightSB bot sw hook
|
[Just SLAB-INWARD] : ArcEndInwardSerifR RightSB bot sw hook
|
||||||
__ : glyph-proc
|
__ : glyph-proc
|
||||||
|
|
||||||
|
define CyrlGeMarks : object
|
||||||
|
e : MarkSet.OfZone { .top (XH + Accent / 2) .bot 0 }
|
||||||
|
|
||||||
define SConfig : object
|
define SConfig : object
|
||||||
serifless { SLAB-NONE SLAB-NONE }
|
serifless { SLAB-NONE SLAB-NONE }
|
||||||
unilateralSerifed { SLAB-CLASSICAL SLAB-NONE }
|
unilateralSerifed { SLAB-CLASSICAL SLAB-NONE }
|
||||||
|
@ -272,7 +275,7 @@ glyph-block Letter-Latin-S : begin
|
||||||
include : RevSAutoSlabEnd doBS 0 [AdviceStroke2 2 3 XH] Hook
|
include : RevSAutoSlabEnd doBS 0 [AdviceStroke2 2 3 XH] Hook
|
||||||
|
|
||||||
create-glyph "cyrl/ge.italic.\(suffix)" : glyph-proc
|
create-glyph "cyrl/ge.italic.\(suffix)" : glyph-proc
|
||||||
include : MarkSet.e
|
include : CyrlGeMarks.e
|
||||||
include : RevSmallSStroke SLAB-CLASSICAL doBS [AdviceStroke2 2 3 XH] Ess
|
include : RevSmallSStroke SLAB-CLASSICAL doBS [AdviceStroke2 2 3 XH] Ess
|
||||||
include : ArcStartSerifL SB XH [AdviceStroke2 2 3 XH] Hook Accent
|
include : ArcStartSerifL SB XH [AdviceStroke2 2 3 XH] Hook Accent
|
||||||
include : RevSAutoSlabEnd doBS 0 [AdviceStroke2 2 3 XH] Hook
|
include : RevSAutoSlabEnd doBS 0 [AdviceStroke2 2 3 XH] Hook
|
||||||
|
|
|
@ -206,7 +206,7 @@ glyph-block Letter-Latin-Upper-R : begin
|
||||||
if fOpen [RevPShape.OpenGap CAP (mul -- 1) (bp -- bpCap)] [glyph-proc]
|
if fOpen [RevPShape.OpenGap CAP (mul -- 1) (bp -- bpCap)] [glyph-proc]
|
||||||
|
|
||||||
create-glyph "cyrl/ya.\(suffix)" : glyph-proc
|
create-glyph "cyrl/ya.\(suffix)" : glyph-proc
|
||||||
include : MarkSet.capital
|
include : MarkSet.e
|
||||||
include : ROverlayAnchor
|
include : ROverlayAnchor
|
||||||
include : difference
|
include : difference
|
||||||
RevRShape legShape XH (slab -- revSlabs) (bp -- bpXH) (tailedShape -- fTailed)
|
RevRShape legShape XH (slab -- revSlabs) (bp -- bpXH) (tailedShape -- fTailed)
|
||||||
|
|
|
@ -56,7 +56,7 @@ glyph-block Letter-Latin-Upper-T : begin
|
||||||
include : LeftHook (SB + LeftHook.extension) CAP Middle
|
include : LeftHook (SB + LeftHook.extension) CAP Middle
|
||||||
|
|
||||||
create-glyph "smcpT.\(suffix)" : glyph-proc
|
create-glyph "smcpT.\(suffix)" : glyph-proc
|
||||||
include : MarkSet.capital
|
include : MarkSet.e
|
||||||
set-base-anchor 'bottomright' (Middle + HalfStroke * HVContrast) 0
|
set-base-anchor 'bottomright' (Middle + HalfStroke * HVContrast) 0
|
||||||
include : TShape XH doST doSB
|
include : TShape XH doST doSB
|
||||||
|
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue