diff --git a/glyphs/symbol-other.ptl b/glyphs/symbol-other.ptl
index cb77dd3..2c972df 100644
--- a/glyphs/symbol-other.ptl
+++ b/glyphs/symbol-other.ptl
@@ -180,7 +180,7 @@ symbol-block 'Ligature-oriented Subglyphs'
 		save ('minus.' + subclass)
 	 
 	# =>
-	local dblarrowd : XH * [linreg 18 0.15 126 0.3 STROKE]
+	local dblarrowd : XH * [linreg 18 0.15 126 0.275 STROKE]
 	local sw : Math.min OPERATORSTROKE (dblarrowd * [clamp 0.45 0.75 ((1 - WHITENESS) * 1)])
 	local dblextend [clamp 0 WIDTH (RIGHTSB - (dblarrowd - sw / 2) * arrowheadSlope)]
 	local dblarrowj : clamp 0 WIDTH (SB + (dblarrowd - sw / 2) * arrowheadSlope)