diff --git a/changes/33.0.0.md b/changes/33.0.0.md
index 5d30ebd81..6a4a27d70 100644
--- a/changes/33.0.0.md
+++ b/changes/33.0.0.md
@@ -39,6 +39,7 @@
   - LATIN SMALL LETTER REVERSED HALF H (`U+A7F6`).
 * Make certain characters slightly wider under Quasi-Proportional. Affected characters:
   - CYRILLIC CAPITAL LETTER UK (`U+0478`).
+  - LATIN SMALL LETTER TH WITH STRIKETHROUGH (`U+1D7A`).
   - LATIN SMALL LIGATURE FF (`U+FB00`) ... LATIN SMALL LIGATURE FFL (`U+FB04`).
 * Add Characters:
   - OBSERVER EYE SYMBOL (`U+23FF`).
diff --git a/packages/font-glyphs/src/auto-build/composite.ptl b/packages/font-glyphs/src/auto-build/composite.ptl
index 1d96d49db..dea4cc34a 100644
--- a/packages/font-glyphs/src/auto-build/composite.ptl
+++ b/packages/font-glyphs/src/auto-build/composite.ptl
@@ -1642,7 +1642,7 @@ glyph-block Autobuild-Pnonetic-Ligatures : begin
 		list 0xFB05  { 'longs/compLigLeft' 't/compLigRight'                 } null
 		list 0xFB06  { 's/compLigLeft'     't/compLigRight'                 } null
 
-	createPhoneticLigatures ToLetter 'phonetic3' [Math.max 1 : para.advanceScaleF * [mix 1 para.advanceScaleMM 2]] 3 stdShrink 1 : list
+	createPhoneticLigatures ToLetter 'phonetic3' [Math.max para.advanceScaleMM : para.advanceScaleF * [mix 1 para.advanceScaleMM 2]] 3 stdShrink 1 : list
 		list 0xFB03  { 'f/compLigLeft1' 'f/compLigLeft1' 'dotlessi/compLigRight' } null
 		list 0xFB04  { 'f/compLigLeft3' 'f/compLigLeft2' 'l/compLigRight'        } null
 
@@ -1666,7 +1666,7 @@ glyph-block Autobuild-Pnonetic-Ligatures : begin
 	createPhoneticLigatures ToSubscript 'tenSubscript' 1 2 1 0.5 : list
 		list 0x23E8 { 'one.lnum' 'zero.lnum' } 'capital'
 
-	createPhoneticLigatures ToLetter 'thSlash' 1 2 stdShrink 1 : list
+	createPhoneticLigatures ToLetter 'thSlash' para.advanceScaleMM 2 stdShrink 1 : list
 		list 0x1D7A { 't/phoneticLeft1' 'h' 'wideSlash' } 'b'
 
 glyph-block Autobuild-Double-Emotions : begin
diff --git a/packages/font-glyphs/src/marks/overlay.ptl b/packages/font-glyphs/src/marks/overlay.ptl
index 0fba85b11..bfa6bbf91 100644
--- a/packages/font-glyphs/src/marks/overlay.ptl
+++ b/packages/font-glyphs/src/marks/overlay.ptl
@@ -183,14 +183,14 @@ glyph-block Mark-Overlay : begin
 			set-width 0
 			set-mark-anchor 'slash' markMiddle (XH / 2) markMiddle (XH / 2)
 			include : dispiro
-				flat (SB - O * 3 + 0.5 * fine - Width) (XH * (-0.1)) [widths.center fine]
-				curl (RightSB + O * 3 - 0.5 * fine - Width) (XH * 1.1)
+				flat (SB      - O * 3 + 0.5 * fine - Width) (XH * (-0.1)) [widths.center fine]
+				curl (RightSB + O * 3 - 0.5 * fine - Width) (XH * (+1.1))
 
 		create-glyph 'longSlash' 0x338 : glyph-proc
 			set-width 0
 			set-mark-anchor 'slash' markMiddle (XH / 2) markMiddle (XH / 2)
 			include : dispiro
-				flat (SB - O * 3 + 0.5 * fine - Width) (XH * 0.5 - CAP * 0.6) [widths.center fine]
+				flat (SB      - O * 3 + 0.5 * fine - Width) (XH * 0.5 - CAP * 0.6) [widths.center fine]
 				curl (RightSB + O * 3 - 0.5 * fine - Width) (XH * 0.5 + CAP * 0.6)
 
 		create-glyph 'longVStrokeOver' 0x20D2 : glyph-proc
@@ -205,14 +205,14 @@ glyph-block Mark-Overlay : begin
 			set-mark-anchor 'slash' markMiddle (XH * 0.5) markMiddle (XH * 0.5)
 			include : dispiro
 				flat markMiddle (XH * (-0.1)) [widths.center fine]
-				curl markMiddle (XH * 1.1)
+				curl markMiddle (XH * (+1.1))
 
 		create-glyph 'revLongSlash' 0x20E5 : glyph-proc
 			set-width 0
 			set-mark-anchor 'slash' markMiddle (XH * 0.5) markMiddle (XH * 0.5)
 			include : dispiro
 				flat (RightSB + O * 3 - 0.5 * fine - Width) (XH * 0.5 - CAP * 0.6) [widths.center fine]
-				curl (SB - O * 3 + 0.5 * fine - Width) (XH * 0.5 + CAP * 0.6)
+				curl (SB      - O * 3 + 0.5 * fine - Width) (XH * 0.5 + CAP * 0.6)
 
 		create-glyph 'dblLongVStrokeOver' 0x20E6 : glyph-proc
 			set-width 0
@@ -228,7 +228,7 @@ glyph-block Mark-Overlay : begin
 
 		create-glyph 'dblLongSlash' 0x20EB : glyph-proc
 			set-width 0
-			local l : SB - O * 3 + 0.5 * fineDbl - Width
+			local l : SB      - O * 3 + 0.5 * fineDbl - Width
 			local r : RightSB + O * 3 - 0.5 * fineDbl - Width
 			local dy : CAP * 0.6
 			local gap : Math.max fineDbl (Width * 0.1)
@@ -241,11 +241,14 @@ glyph-block Mark-Overlay : begin
 				curl (r + gap) (XH * 0.5 + dy)
 
 		create-glyph 'wideSlash' : glyph-proc
+			local df : DivFrame para.advanceScaleMM 3
 			set-width 0
+			local l : markMiddle - (df.rightSB - df.leftSB) / 2 + O * 3 + 0.5 * fine
+			local r : markMiddle + (df.rightSB - df.leftSB) / 2 - O * 3 - 0.5 * fine
 			set-mark-anchor 'slash' markMiddle (XH / 2) markMiddle (XH / 2)
 			include : dispiro
-				flat (SB + O * 3 + 0.5 * fine - Width) (XH * (-0.1)) [widths.center fine]
-				curl (RightSB - O * 3 - 0.5 * fine - Width) (XH * 1.1)
+				flat l (XH * (-0.1)) [widths.center fine]
+				curl r (XH * (+1.1))
 
 	do "Arrow overlays"
 		local fine : AdviceStroke 6
@@ -335,7 +338,7 @@ glyph-block Mark-Overlay : begin
 			set-width 0
 			set-mark-anchor 'overlay' 0 0 0 0
 
-			include : VBar.m (markExtend) (-XH / 4) (XH / 4) MarkStroke
+			include : VBar.m (+markExtend) (-XH / 4) (XH / 4) MarkStroke
 			include : HBar.m (-markExtend) (markExtend) 0 MarkStroke
 
 		create-glyph 'rightTackOver' : glyph-proc