From 671cd846986dff7a9653ad3a197d2ccd37157ba4 Mon Sep 17 00:00:00 2001
From: Arkadiusz Wahlig <arkadiusz@wahlig.eu>
Date: Sun, 12 Jun 2022 21:47:04 +0200
Subject: [PATCH] add support for cursor keys events in application mode (^[Ox)

---
 src/event/sys/unix/parse.rs | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/src/event/sys/unix/parse.rs b/src/event/sys/unix/parse.rs
index ff64ce025..6910361d4 100644
--- a/src/event/sys/unix/parse.rs
+++ b/src/event/sys/unix/parse.rs
@@ -44,6 +44,12 @@ pub(crate) fn parse_event(buffer: &[u8], input_available: bool) -> Result<Option
                             Ok(None)
                         } else {
                             match buffer[2] {
+                                b'D' => Ok(Some(InternalEvent::Event(Event::Key(KeyCode::Left.into())))),
+                                b'C' => Ok(Some(InternalEvent::Event(Event::Key(KeyCode::Right.into())))),
+                                b'A' => Ok(Some(InternalEvent::Event(Event::Key(KeyCode::Up.into())))),
+                                b'B' => Ok(Some(InternalEvent::Event(Event::Key(KeyCode::Down.into())))),
+                                b'H' => Ok(Some(InternalEvent::Event(Event::Key(KeyCode::Home.into())))),
+                                b'F' => Ok(Some(InternalEvent::Event(Event::Key(KeyCode::End.into())))),
                                 // F1-F4
                                 val @ b'P'..=b'S' => Ok(Some(InternalEvent::Event(Event::Key(
                                     KeyCode::F(1 + val - b'P').into(),