From 31e0530de40625b9284bde657896a7d4dffd13c9 Mon Sep 17 00:00:00 2001
From: June McEnroe <june@causal.agency>
Date: Fri, 12 Jul 2019 19:00:08 -0400
Subject: Add DCH to shotty

This makes htop mostly work. Scrolling region still missing.
---
 bin/shotty.c | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/bin/shotty.c b/bin/shotty.c
index d7814a91..a882e662 100644
--- a/bin/shotty.c
+++ b/bin/shotty.c
@@ -119,6 +119,7 @@ enum {
 	CUP,
 	ED = 'J',
 	EL,
+	DCH = 'P',
 	VPA = 'd',
 	SM = 'h',
 	RM = 'l',
@@ -189,6 +190,12 @@ static char updateCSI(wchar_t ch) {
 			clear(a, b);
 		}
 
+		break; case DCH: {
+			uint i = MIN((n ? ps[0] : 1), cols - x);
+			move(cell(y, x), cell(y, x + i), cols - x - i);
+			clear(cell(y, cols - i), cell(y, cols - 1));
+		}
+
 		break; case SM: {
 			if (dec) break;
 			switch (ps[0]) {
-- 
cgit 1.4.1