From b789f17c320906a555a0693e5ee52d11ad58b711 Mon Sep 17 00:00:00 2001
From: Belleve Invis <belleve@typeof.net>
Date: Sat, 31 Aug 2019 04:09:32 -0700
Subject: [PATCH] Add variant selector for /seven

---
 glyphs/numbers.ptl | 9 +++++++--
 variants.toml      | 9 +++++++++
 2 files changed, 16 insertions(+), 2 deletions(-)

diff --git a/glyphs/numbers.ptl b/glyphs/numbers.ptl
index 7508614ee..2ac2de2fd 100644
--- a/glyphs/numbers.ptl
+++ b/glyphs/numbers.ptl
@@ -173,9 +173,14 @@ export : define [apply] : begin
 		line-to RIGHTSB (CAP - STROKE)
 		line-to (RIGHTSB - STROKE * cor) (CAP - STROKE)
 		reverse-last
-		if SLAB : begin
+		branch
+			if SLAB : include : DownwardLeftSerif (SB + OXE) CAP VJUT
+			save 'seven.normal'
+		branch
 			include : DownwardLeftSerif (SB + OXE) CAP VJUT
-		save 'seven' '7'
+			save 'seven.force-serifed'
+
+	select-variant 'seven' '7'
 
 	local pr : linreg 18 0.85 120 0.975 STROKE
 
diff --git a/variants.toml b/variants.toml
index ff56fa779..3c464bde1 100644
--- a/variants.toml
+++ b/variants.toml
@@ -294,6 +294,14 @@ r = "narrow"
 [simple.v-j-narrow]
 dotlessj = "narrow"
 
+[simple.v-seven-normal]
+tag = "cv64"
+seven = "normal"
+
+[simple.v-seven-force-serifed]
+tag = "cv65"
+seven = "force-serifed"
+
 [default]
 design = [
 	'v-m-longleg',
@@ -316,6 +324,7 @@ design = [
 	'v-capital-i-serifed',
 	'v-capital-j-serifed',
 	'v-r-standard',
+	'v-seven-non-serifed',
 	'others'
 ]
 upright = [