diff --git a/font-src/glyphs/letter/latin/lower-r.ptl b/font-src/glyphs/letter/latin/lower-r.ptl
index e13c26d73..426151049 100644
--- a/font-src/glyphs/letter/latin/lower-r.ptl
+++ b/font-src/glyphs/letter/latin/lower-r.ptl
@@ -52,7 +52,7 @@ glyph-block Letter-Latin-Lower-R : begin
 			[Just rStraight]            : mix (xBar - fine) rHookX (0.54 + 2 * TanSlope * strokeBar / Width)
 			[Just rSerifed]             : mix (xBar - fine) rHookX (0.59 + 2 * TanSlope * strokeBar / Width)
 			[Just rNarrow]              : mix df.width rHookX : Math.max 1.01 (5 / 4 * [mix 1 dfR.div 2])
-			[Just rNarrowSerifed]       : xBar + RHook * 1.25 * df.div
+			[Just rNarrowSerifed]       : Math.min ([mix df.width rHookX df.div] - 0.1) : xBar + RHook * 1.25 * df.div
 			[Just rCornerHooked]        : rHookX - strokeBar / 2 * HVContrast
 			[Just rCornerHookedSerifed] : rHookX - strokeBar / 2 * HVContrast
 			[Just rEarless]             : mix (xBar - strokeBar * HVContrast) rHookX 0.5