From e72af4f520f0e7f4221cb6c894b0d2589cbefce1 Mon Sep 17 00:00:00 2001
From: be5invis <belleve@typeof.net>
Date: Wed, 3 Aug 2016 05:20:31 +0800
Subject: [PATCH] Add m.longleg and m.shortleg, along with cv25 and cv26.

---
 glyphs/letters-unified-basic.ptl | 17 +++++++++++++----
 parameters.toml                  |  4 ++++
 2 files changed, 17 insertions(+), 4 deletions(-)

diff --git a/glyphs/letters-unified-basic.ptl b/glyphs/letters-unified-basic.ptl
index 32e2071..1f20d56 100644
--- a/glyphs/letters-unified-basic.ptl
+++ b/glyphs/letters-unified-basic.ptl
@@ -2324,14 +2324,14 @@ export : define [apply] : begin
 		save 'cyrem' 0x43C
 
 	### m
-	define [SmallMShape top bot] : glyph-construction
+	define [SmallMShape top bot mbot] : glyph-construction
 		local m1 : mix (SB + O) (MIDDLE + MVERTSTROKE / 2 * HVCONTRAST) 0.5
 		local m2 : mix (RIGHTSB - O) (MIDDLE - MVERTSTROKE / 2 * HVCONTRAST) 0.5
 		include : mShoulderSpiro
 			left   -- (SB + O + MVERTSTROKE * HVCONTRAST)
 			right  -- (MIDDLE + MVERTSTROKE / 2 * HVCONTRAST)
 			top    -- top
-			bottom -- bot
+			bottom -- mbot
 			width  -- MVERTSTROKE
 			fine   -- (MVERTSTROKE * SHOULDERFINE / STROKE)
 		include : mShoulderSpiro
@@ -2352,9 +2352,18 @@ export : define [apply] : begin
 	sketch # m
 		set-width WIDTH
 		include markset.e
-		include : SmallMShape XH 0
-		save 'm' 'm'
+		include : SmallMShape XH 0 0
+		save 'm.longleg'
 		save 'cyrte.italic'
+	sketch # m
+		set-width WIDTH
+		include markset.e
+		include : SmallMShape XH 0 [XH * 0.2]
+		save 'm.shortleg'
+	select-variant 'm' 'm' 'longleg' {
+		.'cv25' 'm.longleg'
+		.'cv26' 'm.shortleg'
+	}
 	composite 'cyrtedescender.italic' glyphs.'cyrte.italic' [CyrDescender RIGHTSB] markset.e
 
 	sketch # mltail
diff --git a/parameters.toml b/parameters.toml
index e813ac3..8ee626e 100644
--- a/parameters.toml
+++ b/parameters.toml
@@ -592,3 +592,7 @@ underscore = 'low'
 paragraph = 'high'
 [v-paragraph-low.variantSelector]
 paragraph = 'low'
+[v-m-longleg]
+m = 'longleg'
+[v-m-shortleg]
+m = 'shortleg'