From d80bd4a0297223d276772179d1b787928cfd26cc Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Sat, 17 Dec 1994 12:20:46 +0000
Subject: (tgetst1): Let ^? stand for DEL character.

---
 src/termcap.c | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

(limited to 'src/termcap.c')

diff --git a/src/termcap.c b/src/termcap.c
index 9462122677e..bcd1ece8cfd 100644
--- a/src/termcap.c
+++ b/src/termcap.c
@@ -219,7 +219,13 @@ tgetst1 (ptr, area)
   while ((c = *p++) && c != ':' && c != '\n')
     {
       if (c == '^')
-	c = *p++ & 037;
+	{
+	  c = *p++;
+	  if (c == '?')
+	    c = 0177;
+	  else
+	    c &= 037;
+	}
       else if (c == '\\')
 	{
 	  c = *p++;
-- 
cgit v1.2.3