From daafbcdac4cc826d670a58bf9a6f9ef495159997 Mon Sep 17 00:00:00 2001
From: Johan Walles <johan.walles@gmail.com>
Date: Wed, 7 Jun 2023 19:49:13 +0200
Subject: [PATCH] Handle "SS3" arrow key events

Ref:
https://invisible-island.net/xterm/ctlseqs/ctlseqs.html#h3-C1-_8-Bit_-Control-Characters

Fixes #138
---
 twin/keys.go | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/twin/keys.go b/twin/keys.go
index 5b70c37..7bbad2b 100644
--- a/twin/keys.go
+++ b/twin/keys.go
@@ -51,6 +51,12 @@ var escapeSequenceToKeyCode = map[string]KeyCode{
 	"\x1b[C": KeyRight,
 	"\x1b[D": KeyLeft,
 
+	// Ref: https://github.com/walles/moar/issues/138#issuecomment-1579199274
+	"\x1bOA": KeyUp,
+	"\x1bOB": KeyDown,
+	"\x1bOC": KeyRight,
+	"\x1bOD": KeyLeft,
+
 	"\x1b\x1b[A": KeyAltUp,    // Alt + up arrow
 	"\x1b\x1b[B": KeyAltDown,  // Alt + down arrow
 	"\x1b\x1b[C": KeyAltRight, // Alt + right arrow