From 30da1bd75b914e00c2e7151f75c6a12ee1041a44 Mon Sep 17 00:00:00 2001
From: Virgil Dupras <hsoft@hardcoded.net>
Date: Tue, 17 Nov 2020 11:19:37 -0500
Subject: [PATCH] grid: fix PSP leak on newline

---
 blk.fs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/blk.fs b/blk.fs
index 8debdaa..86f8dcb 100644
--- a/blk.fs
+++ b/blk.fs
@@ -2230,7 +2230,7 @@ Load range: B402-B403
     DUP 0x0d = IF DROP _lf EXIT THEN
     DUP 0x20 < IF DROP EXIT THEN
     XYPOS @ CELL!
-    XYPOS @ 1+ DUP COLS MOD IF XYPOS! ELSE _lf THEN ;
+    XYPOS @ 1+ DUP COLS MOD IF XYPOS! ELSE DROP _lf THEN ;
 : GRID$ 0 XYPOS ! 0 XYMODE C! ;
 ( ----- 410 )
 PS/2 keyboard subsystem