diff --git a/changes/28.0.3.md b/changes/28.0.3.md index ca2d65fe1..49945a84c 100644 --- a/changes/28.0.3.md +++ b/changes/28.0.3.md @@ -1,4 +1,5 @@ * Add characters: + - COMBINING SUSPENSION MARK (`U+1DC3`). - LATIN CAPITAL LETTER P WITH STROKE THROUGH DESCENDER (`U+A750`) (#1797). - LATIN SMALL LETTER P WITH STROKE THROUGH DESCENDER (`U+A751`) (#1797). * Remove tailless variants for Latin Iota (`U+0196`, `U+0269`) and Cyrillic Iota (`U+A646`, `U+A647`). diff --git a/packages/font-glyphs/src/marks/above.ptl b/packages/font-glyphs/src/marks/above.ptl index ba4fa4736..6a8ca1f3a 100644 --- a/packages/font-glyphs/src/marks/above.ptl +++ b/packages/font-glyphs/src/marks/above.ptl @@ -1128,6 +1128,20 @@ glyph-block Mark-Above : begin include : VBar.m markMiddle aboveMarkBot aboveMarkTop (markFine * 2) include : HBar.t (markMiddle - markExtend) (markMiddle + markExtend) aboveMarkTop (markFine * 2) + create-glyph 'suspensionMarkAbove' 0x1DC3 : glyph-proc + set-width 0 + include : StdAnchors.wide + + local leftEnd : markMiddle - markExtend * 1.2 + local rightEnd : markMiddle + markExtend * 2.0 + + include : dispiro + g4.down.start leftEnd aboveMarkTop [widths.heading markHalfStroke markHalfStroke Downward] + arcvh + g2.right.mid markMiddle (aboveMarkBot + markHalfStroke) [heading Rightward] + alsoThru.g2 0.5 0.5 + g2.right.end rightEnd ([mix aboveMarkTop aboveMarkBot 0.5] + markHalfStroke) [heading Rightward] + create-glyph 'deletionMarkAbove' 0x1DFB : glyph-proc set-width 0 include : StdAnchors.medium