From 900cdc0a71c016a07cc4cafd4d3d5f9b36090d57 Mon Sep 17 00:00:00 2001
From: aristocratos <gnmjpl@gmail.com>
Date: Tue, 7 Jul 2020 12:35:48 +0200
Subject: [PATCH] Added support for application cursor mode input

---
 bashtop | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/bashtop b/bashtop
index eb71a67..94fb246 100755
--- a/bashtop
+++ b/bashtop
@@ -4357,10 +4357,10 @@ get_key() { #? Get one key from standard input and translate key code to readabl
 		if [[ -z $key && $esc -eq 1 ]]; then key="escape"
 		elif [[ $esc -eq 1 ]]; then
 			case "${key}" in
-				'[A'*) key="up" ;;
-				'[B'*) key="down" ;;
-				'[D'*) key="left" ;;
-				'[C'*) key="right" ;;
+				'[A'*|'OA'*) key="up" ;;
+				'[B'*|'OB'*) key="down" ;;
+				'[D'*|'OD'*) key="left" ;;
+				'[C'*|'OC'*) key="right" ;;
 				'[2~') key="insert" ;;
 				'[3~') key="delete" ;;
 				'[H'*) key="home" ;;