From c96c8e7df00a5f2ead326e6415d39e32032a3779 Mon Sep 17 00:00:00 2001
From: Virgil Dupras <hsoft@hardcoded.net>
Date: Thu, 25 Jul 2019 21:24:36 -0400
Subject: [PATCH] ed: update curline after a, i and d

---
 apps/ed/main.asm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/apps/ed/main.asm b/apps/ed/main.asm
index 17a5691..9da07a5 100644
--- a/apps/ed/main.asm
+++ b/apps/ed/main.asm
@@ -116,6 +116,7 @@ edMain:
 	xor	a
 	ret
 .doD:
+	ld	(ED_CURLINE), de
 	; bufDelLines expects an exclusive upper bound, which is why we inc DE.
 	inc	de
 	call	bufDelLines
@@ -127,6 +128,7 @@ edMain:
 	call	bufScratchpadAdd	; --> HL
 	; insert index in DE, line offset in HL. We want the opposite.
 	ex	de, hl
+	ld	(ED_CURLINE), hl
 	call	bufInsertLine
 	call	printcrlf
 	jr	.mainLoop