Mon Jan 17 13:27:52 PST 2000 Michael Jennings <mej@eterm.org>

Fix XK_KP_Insert and XK_KP_Delete to respond to the application keypad
	setting.


SVN revision: 1935

ChangeLog

@@ -3047,3 +3047,9 @@ Mon Jan 17 13:09:37 PST 2000	Michael Jennings <mej@eterm.org>
 	Fixed the faulty assumption that font->per_char is always non-NULL.
 	
 -------------------------------------------------------------------------------
+Mon Jan 17 13:27:52 PST 2000	Michael Jennings <mej@eterm.org>
+
+	Fix XK_KP_Insert and XK_KP_Delete to respond to the application keypad
+	setting.
+	
+-------------------------------------------------------------------------------

src/term.c

@@ -503,11 +503,34 @@ lookup_key(XEvent * ev)
 	  len = 4;
 	  strcpy(kbuf, "\033[3~");
 	  break;
+
+#ifdef XK_KP_Insert
+	case XK_KP_Insert:
+	  if ((PrivateModes & PrivMode_aplKP) ? !shft : shft) {
+            len = 3;
+            strcpy(kbuf, "\033Op");
+            break;
+          }
+#endif
 	case XK_Insert:
 	  len = 4;
 	  strcpy(kbuf, "\033[2~");
 	  break;
 
+#ifdef XK_KP_Delete
+	case XK_KP_Delete:
+	  if ((PrivateModes & PrivMode_aplKP) ? !shft : shft) {
+            len = 3;
+            strcpy(kbuf, "\033On");
+            break;
+          }
+#endif
+	case XK_Delete:
+#ifdef KS_DELETE
+	  len = strlen(strcpy(kbuf, KS_DELETE));
+#endif
+	  break;
+
 	case XK_Menu:
 	  len = 5;
 	  strcpy(kbuf, "\033[29~");
@@ -537,16 +560,6 @@ lookup_key(XEvent * ev)
 	  len = 3;
 	  strcpy(kbuf, "\033Ou");
 	  break;
-
-	case XK_KP_Insert:
-	  len = 3;
-	  strcpy(kbuf, "\033Op");
-	  break;
-
-	case XK_KP_Delete:
-	  len = 3;
-	  strcpy(kbuf, "\033On");
-	  break;
 #endif /* XK_KP_Begin */
 
 	case XK_KP_F1:		/* "\033OP" */
@@ -640,11 +653,6 @@ sprintf((char *) kbuf,"\033[%02d~", (int)((n) + (keysym - fkey))); \
 	  FKEY(31, XK_F17);
 	  break;
 #undef FKEY
-#ifdef KS_DELETE
-	case XK_Delete:
-	  len = strlen(strcpy(kbuf, KS_DELETE));
-	  break;
-#endif
       }
 
 #ifdef META8_OPTION