From 0b1846712698f33b578666ada39d1b8d633b28d4 Mon Sep 17 00:00:00 2001 From: be5invis Date: Sun, 11 Jun 2023 16:56:51 -0700 Subject: [PATCH] * Add Characters: - LATIN CAPITAL LETTER INSULAR F (`U+A77B`) (#1786). - LATIN SMALL LETTER INSULAR F (`U+A77C`) (#1786). - LATIN CAPITAL LETTER INSULAR S (`U+A784`) (#1786). - LATIN SMALL LETTER INSULAR S (`U+A785`) (#1786). --- changes/24.1.3.md | 7 ++++- font-src/glyphs/auto-build/transformed.ptl | 2 +- font-src/glyphs/letter/latin/lower-r.ptl | 31 +++++++++++++++++++--- 3 files changed, 34 insertions(+), 6 deletions(-) diff --git a/changes/24.1.3.md b/changes/24.1.3.md index 1db3fd46dd..fd6db688da 100644 --- a/changes/24.1.3.md +++ b/changes/24.1.3.md @@ -1 +1,6 @@ - * Fix missing U+1D7F mapping (#1787). +* Fix missing U+1D7F mapping (#1787). +* Add Characters: + - LATIN CAPITAL LETTER INSULAR F (`U+A77B`) (#1786). + - LATIN SMALL LETTER INSULAR F (`U+A77C`) (#1786). + - LATIN CAPITAL LETTER INSULAR S (`U+A784`) (#1786). + - LATIN SMALL LETTER INSULAR S (`U+A785`) (#1786). diff --git a/font-src/glyphs/auto-build/transformed.ptl b/font-src/glyphs/auto-build/transformed.ptl index 7d37b4a53b..aae76d5943 100644 --- a/font-src/glyphs/auto-build/transformed.ptl +++ b/font-src/glyphs/auto-build/transformed.ptl @@ -270,7 +270,7 @@ glyph-block Autobuild-Transformed : begin list 0x107A1 'turnyBelt' list 0x1079C 'smcpLBelt' list 0x107A0 'turny' - list 0x107A6 'turnrlongleg' + list 0x107A6 'turnrLongLeg' list 0x107A7 'rTurnLongLetRTail' list 0x10780 'smcpAA' list 0x10785 'bHookTop' diff --git a/font-src/glyphs/letter/latin/lower-r.ptl b/font-src/glyphs/letter/latin/lower-r.ptl index 769d18e162..1382376df8 100644 --- a/font-src/glyphs/letter/latin/lower-r.ptl +++ b/font-src/glyphs/letter/latin/lower-r.ptl @@ -186,7 +186,7 @@ glyph-block Letter-Latin-Lower-R : begin include : df.markSet.e include : F df mode doTS doBS - create-glyph "rlongleg.\(suffix)" : glyph-proc + create-glyph "rLongLeg.\(suffix)" : glyph-proc set-width df.width include : df.markSet.p define [object xBar rBottomSerif] : RDim df mode @@ -195,6 +195,25 @@ glyph-block Letter-Latin-Lower-R : begin include : VBar.r xBar Descender 0 if doBS : include : rBottomSerif Descender + create-glyph "rCapLongLeg.\(suffix)" : glyph-proc + set-width df.width + include : df.markSet.capDesc + define [object xBar rBottomSerif] : RDim df mode + include : WithTransform [ApparentTranslate 0 (CAP - XH)] : F df mode doTS 0 + eject-contour 'serifLB' + include : VBar.r xBar Descender (CAP - XH) + if doBS : include : rBottomSerif Descender + + create-glyph "fInsular.\(suffix)" : glyph-proc + include [refer-glyph "rLongLeg.\(suffix)"] AS_BASE ALSO_METRICS + define [object xBar rHookX] : RDim df mode + include : HBar.b xBar (rHookX - [Math.max (0.15 * (df.rightSB - df.leftSB)) (0.25 * HVContrast * Stroke)]) 0 + + create-glyph "FInsular.\(suffix)" : glyph-proc + include [refer-glyph "rCapLongLeg.\(suffix)"] AS_BASE ALSO_METRICS + define [object xBar rHookX] : RDim df mode + include : HBar.b xBar (rHookX - [Math.max (0.15 * (df.rightSB - df.leftSB)) (0.25 * HVContrast * Stroke)]) 0 + create-glyph "rPalatalHook.\(suffix)" : glyph-proc include [refer-glyph "r.\(suffix)"] AS_BASE ALSO_METRICS local attach : currentGlyph.gizmo.unapply currentGlyph.baseAnchors.palatalHookAttach @@ -219,7 +238,7 @@ glyph-block Letter-Latin-Lower-R : begin include : VerticalHook.r (df.rightSB - xBar + df.leftSB + Stroke * HVContrast) 0 HookX Hook create-glyph "rTurnLongLetRTail.\(suffix)" : glyph-proc - include [refer-glyph "rlongleg.\(suffix)"] AS_BASE ALSO_METRICS + include [refer-glyph "rLongLeg.\(suffix)"] AS_BASE ALSO_METRICS eject-contour 'serifLT' include : FlipAround df.middle (XH / 2) include : df.markSet.if @@ -237,8 +256,12 @@ glyph-block Letter-Latin-Lower-R : begin CreateAccentedComposition 'rTildeOver' 0x1D72 'r' 'tildeOver' turned 'turnrTildeOver' 0xAB68 'rTildeOver' HalfAdvance (XH / 2) [TurnRMarks 'e'] - select-variant 'rlongleg' 0x27C (follow -- 'r') - turned 'turnrlongleg' 0x27A 'rlongleg' HalfAdvance (XH / 2) [TurnRMarks 'b'] + select-variant 'rLongLeg' 0x27C (follow -- 'r') + select-variant 'SInsular' 0xA784 (shapeFrom -- 'rCapLongLeg') (follow -- 'rRTail') + select-variant 'sInsular' 0xA785 (shapeFrom -- 'rLongLeg') (follow -- 'rRTail') + select-variant 'FInsular' 0xA77B (follow -- 'rRTail') + select-variant 'fInsular' 0xA77C (follow -- 'rRTail') + turned 'turnrLongLeg' 0x27A 'rLongLeg' HalfAdvance (XH / 2) [TurnRMarks 'b'] select-variant 'rRTail' 0x27D turned 'smallLetterTurnedRWithTail' 0x2C79 'rRTail' HalfAdvance (XH / 2) : glyph-proc