From 7c34ff1703381c4d0c2ea602ddd607597bd32ad5 Mon Sep 17 00:00:00 2001
From: "Roberto E. Vargas Caballero" <k0ga@shike2.com>
Date: Sun, 25 Nov 2012 22:13:24 +0100
Subject: [PATCH] Add support for Supr key
Del : Delete character under cursor.
Shift + Del : Delete the line under cursor.
Ctrl + Del: Delete the full screen.
---
config.def.h | 16 ++++++++++++----
st.info | 2 ++
2 files changed, 14 insertions(+), 4 deletions(-)
---
config.def.h | 16 ++++++++++++----
st.info | 2 ++
2 files changed, 14 insertions(+), 4 deletions(-)
diff --git a/config.def.h b/config.def.h
index a3e87e2..6d74668 100644
--- a/config.def.h
+++ b/config.def.h
@@ -131,8 +131,12 @@ static Key key[] = {
{ XK_KP_Insert, ControlMask, "\033[2;5~", +1, 0, 0},
{ XK_KP_Insert, XK_ANY_MOD, "\033[4h", -1, 0, 0},
{ XK_KP_Insert, XK_ANY_MOD, "\033[2~", +1, 0, 0},
- { XK_KP_Delete, ShiftMask, "\033[3;2~", 0, 0, 0},
- { XK_KP_Delete, XK_ANY_MOD, "\033[3~", 0, 0, 0},
+ { XK_KP_Delete, ControlMask, "\033[2J", -1, 0, 0},
+ { XK_KP_Delete, ControlMask, "\033[3;5~", +1, 0, 0},
+ { XK_KP_Delete, ShiftMask, "\033[2K", +1, 0, 0},
+ { XK_KP_Delete, ShiftMask, "\033[3;2~", -1, 0, 0},
+ { XK_KP_Delete, XK_ANY_MOD, "\033[P", -1, 0, 0},
+ { XK_KP_Delete, XK_ANY_MOD, "\033[3~", +1, 0, 0},
{ XK_KP_Multiply, XK_ANY_MOD, "\033Oj", +2, 0, 0},
{ XK_KP_Add, XK_ANY_MOD, "\033Ok", +2, 0, 0},
{ XK_KP_Enter, XK_ANY_MOD, "\033OM", +2, 0, 0},
@@ -183,8 +187,12 @@ static Key key[] = {
{ XK_Insert, ControlMask, "\033[2;5~", +1, 0, 0},
{ XK_Insert, XK_ANY_MOD, "\033[4h", -1, 0, 0},
{ XK_Insert, XK_ANY_MOD, "\033[2~", +1, 0, 0},
- { XK_Delete, ShiftMask, "\033[3;2~", 0, 0, 0},
- { XK_Delete, XK_ANY_MOD, "\033[3~", 0, 0, 0},
+ { XK_Delete, ControlMask, "\033[2J", -1, 0, 0},
+ { XK_Delete, ControlMask, "\033[3;5~", +1, 0, 0},
+ { XK_Delete, ShiftMask, "\033[2K", +1, 0, 0},
+ { XK_Delete, ShiftMask, "\033[3;2~", -1, 0, 0},
+ { XK_Delete, XK_ANY_MOD, "\033[P", -1, 0, 0},
+ { XK_Delete, XK_ANY_MOD, "\033[3~", +1, 0, 0},
{ XK_Home, ShiftMask, "\033[1;2H", 0, 0, 0},
{ XK_Home, XK_ANY_MOD, "\033[H", 0, -1, 0},
{ XK_Home, XK_ANY_MOD, "\033[1~", 0, +1, 0},
diff --git a/st.info b/st.info
index 4fc9bdb..9a7edfe 100644
--- a/st.info
+++ b/st.info
@@ -71,6 +71,8 @@ st| simpleterm,
kRIT=\E[1;2C,
kind=\E[1;2B,
kri=\E[1;2A,
+ kclr=\E[3;5~,
+ kdl1=\E[3;2~,
kdch1=\E[3~,
kich1=\E[2~,
kend=\E[4~,
--
2.20.1