Make round grek/Alpha use SetGrekUpperTonos 0.

be5invis · Aug 21, 2024 · 87a3abd · 87a3abd
1 parent 1c9c2e0
commit 87a3abd
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 3 deletions.
diff --git a/packages/font-glyphs/src/letter/latin-ext/upper-ae-oe.ptl b/packages/font-glyphs/src/letter/latin-ext/upper-ae-oe.ptl
@@ -73,7 +73,7 @@ glyph-block Letter-Latin-Upper-AE-OE : begin
 				corner eleft 0
 
 	define [AEAHalfRoundTop df top eleft sw] : glyph-proc
-		include : HBar.t df.leftSB eleft (0.75 * XH * top / CAP) sw
+		include : HBar.t df.leftSB eleft (XH * 0.75 / CAP * top) sw
 		include : dispiro
 			widths.rhs sw
 			flat df.leftSB 0 [heading Upward]

diff --git a/packages/font-glyphs/src/letter/latin/upper-a.ptl b/packages/font-glyphs/src/letter/latin/upper-a.ptl
@@ -147,8 +147,9 @@ glyph-block Letter-Latin-Upper-A : begin
 			local df : DivFrame 1
 			include : df.markSet.(mak)
 			set-base-anchor 'trailing' df.rightSB 0
-			if fGrek : include : SetGrekUpperTonos
-				(df.rightSB - df.leftSB) * [if [maskBits slabKind SLAB-TOP] 0 0.2]
+			if fGrek : include : SetGrekUpperTonos : match bodyShape
+				[Just BODY-ROUND-TOP] 0
+				__ : (df.rightSB - df.leftSB) * [if [maskBits slabKind SLAB-TOP] 0 0.2]
 
 			include : AShape.Letter df bodyShape slabKind top Stroke