From 16eb518dcd46ffe15f1c23f0e098eccc929eddb9 Mon Sep 17 00:00:00 2001
From: David Lawrence Ramsey <pooka109@gmail.com>
Date: Thu, 3 Jun 2004 20:26:12 +0000
Subject: [PATCH] support KEY_A1, KEY_A3, KEY_C1, and KEY_C3 on the numeric
 keypad

git-svn-id: svn://svn.savannah.gnu.org/nano/trunk/nano@1800 35c25a1d-7b9e-4130-9fde-d3aeb78583b8
---
 ChangeLog   |  3 ++-
 src/winio.c | 24 +++++++++++++++++++++---
 2 files changed, 23 insertions(+), 4 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 7e85e542..8d95220a 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -306,7 +306,8 @@ CVS code -
 	  realloc(). (DLR)
   get_accepted_kbinput()
 	- Add proper support for the keypad values and escape sequences
-	  generated by the NumLock glitch. (DLR)
+	  generated by the NumLock glitch and by certain keys on the
+	  numeric keypad. (DLR)
   get_escape_seq_kbinput()
 	- Add proper support for the keypad values and escape sequences
 	  generated by the NumLock glitch. (DLR)
diff --git a/src/winio.c b/src/winio.c
index cd129db9..a6f4430b 100644
--- a/src/winio.c
+++ b/src/winio.c
@@ -283,15 +283,33 @@ int get_translated_kbinput(int kbinput, int *es
 			case KEY_ENTER:
 			    retval = NANO_ENTER_KEY;
 			    break;
+			case KEY_A1:	/* Home (7) on numeric keypad
+					 * with NumLock off. */
+			    retval = NANO_HOME_KEY;
+			    break;
+			case KEY_A3:	/* PageUp (9) on numeric keypad
+					 * with NumLock off. */
+			    retval = NANO_PREVPAGE_KEY;
+			    break;
 			case KEY_B2:	/* Center (5) on numeric keypad
-					 * with NumLock off on xterm. */
+					 * with NumLock off. */
+			    retval = ERR;
+			    break;
+			case KEY_C1:	/* End (1) on numeric keypad
+					 * with NumLock off. */
+			    retval = NANO_END_KEY;
+			    break;
+			case KEY_C3:	/* PageDown (4) on numeric
+					 * keypad with NumLock off. */
+			    retval = NANO_NEXTPAGE_KEY;
+			    break;
 #ifdef KEY_BEG
 			/* Slang doesn't support KEY_BEG. */
 			case KEY_BEG:	/* Center (5) on numeric keypad
-					 * with NumLock off on Eterm. */
-#endif
+					 * with NumLock off. */
 			    retval = ERR;
 			    break;
+#endif
 #ifdef KEY_END
 			/* HP-UX 10 and 11 don't support KEY_END. */
 			case KEY_END:
-- 
GitLab