diff --git a/packages/font-glyphs/src/letter/latin/lower-r.ptl b/packages/font-glyphs/src/letter/latin/lower-r.ptl index 354055b56..50834cb93 100644 --- a/packages/font-glyphs/src/letter/latin/lower-r.ptl +++ b/packages/font-glyphs/src/letter/latin/lower-r.ptl @@ -249,6 +249,13 @@ glyph-block Letter-Latin-Lower-R : begin define [object xBar] : RDim df mode include : RetroflexHook.rExt xBar 0 + + create-glyph "turnr.\(suffix)" : glyph-proc + include [refer-glyph "r.\(suffix)"] AS_BASE ALSO_METRICS + include : FlipAround df.middle (XH / 2) + include : df.markSet.e + define [object setTurnedMarks] : RDim df mode + include : setTurnedMarks doTS XH 0 create-glyph "rTurnRTail.\(suffix)" : glyph-proc include [refer-glyph "r.\(suffix)"] AS_BASE ALSO_METRICS @@ -258,6 +265,13 @@ glyph-block Letter-Latin-Lower-R : begin define [object xBar setTurnedMarks] : RDim df mode include : setTurnedMarks doTS XH 0 include : RetroflexHook.lExt (df.rightSB - xBar + df.leftSB) 0 + + create-glyph "turnrLongLeg.\(suffix)" : glyph-proc + include [refer-glyph "rLongLeg.\(suffix)"] AS_BASE ALSO_METRICS + include : FlipAround df.middle (XH / 2) + include : df.markSet.b + define [object setTurnedMarks] : RDim df mode + include : setTurnedMarks doTS Ascender 0 create-glyph "rTurnLongLetRTail.\(suffix)" : glyph-proc include [refer-glyph "rLongLeg.\(suffix)"] AS_BASE ALSO_METRICS @@ -267,20 +281,6 @@ glyph-block Letter-Latin-Lower-R : begin define [object xBar setTurnedMarks] : RDim df mode include : setTurnedMarks doTS Ascender 0 include : RetroflexHook.lExt (df.rightSB - xBar + df.leftSB) 0 - - create-glyph "turnr.\(suffix)" : glyph-proc - include [refer-glyph "r.\(suffix)"] AS_BASE ALSO_METRICS - include : FlipAround df.middle (XH / 2) - include : df.markSet.e - define [object setTurnedMarks] : RDim df mode - include : setTurnedMarks doTS XH 0 - - create-glyph "turnrLongLeg.\(suffix)" : glyph-proc - include [refer-glyph "rLongLeg.\(suffix)"] AS_BASE ALSO_METRICS - include : FlipAround df.middle (XH / 2) - include : df.markSet.b - define [object setTurnedMarks] : RDim df mode - include : setTurnedMarks doTS Ascender 0 create-glyph "smallLetterTurnedRWithTail.\(suffix)" : glyph-proc include [refer-glyph "rRTail.\(suffix)"] AS_BASE ALSO_METRICS