From 2cc36818283e9068576c1042690c016a81b709a3 Mon Sep 17 00:00:00 2001
From: Evan Gates <evan.gates@gmail.com>
Date: Fri, 15 Jul 2016 09:52:39 -0700
Subject: [PATCH] fix marks indexing

---
 ed.c | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/ed.c b/ed.c
index ce19cf7..184ed30 100644
--- a/ed.c
+++ b/ed.c
@@ -478,9 +478,9 @@ linenum(int *line)
 		break;
 	case '\'':
 		skipblank();
-		if (!isalpha(c = input()))
+		if (!islower(c = input()))
 			error("invalid mark character");
-		if (!(ln = marks[c]))
+		if (!(ln = marks[c - 'a']))
 			error("invalid address");
 		break;
 	case '$':
@@ -1191,7 +1191,7 @@ repeat:
 			error("invalid mark character");
 		chkprint(1);
 		deflines(curln, curln);
-		marks[c] = line1;
+		marks[c - 'a'] = line1;
 		break;
 	case 'P':
 		if (nlines > 0)
-- 
2.9.0