Change emacs keybinds for jumping to first/last entry

Signed-off-by: sin <sin@2f30.org>

1 files changed, 16 insertions, 5 deletions

diff --git a/noice.c b/noice.c
index 5ee1141..8bc57de 100644
--- a/noice.c
+++ b/noice.c
@@ -38,6 +38,7 @@
 #define MIN(x, y) ((x) < (y) ? (x) : (y))
 #define ISODD(x) ((x) & 1)
 #define CONTROL(c) ((c) ^ 0x40)
+#define META(c) ((c) ^ 0x80)
 
 struct assoc {
 	char *regex; /* Regex to match on filename */
@@ -335,18 +336,28 @@ printprompt(char *str)
 	printw(str);
 }
 
-/* Returns SEL_* if key is bound and 0 otherwise.
- * Also modifies the run and env pointers (used on SEL_{RUN,RUNARG}) */
-int
-nextsel(char **run, char **env)
+int xgetch(void)
 {
-	int c, i;
+	int c;
 
 	c = getch();
 	if (c == -1)
 		idle++;
 	else
 		idle = 0;
+	return c;
+}
+
+/* Returns SEL_* if key is bound and 0 otherwise.
+ * Also modifies the run and env pointers (used on SEL_{RUN,RUNARG}) */
+int
+nextsel(char **run, char **env)
+{
+	int c, i;
+
+	c = xgetch();
+	if (c == 033)
+		c = META(xgetch());
 
 	for (i = 0; i < LEN(bindings); i++)
 		if (c == bindings[i].sym) {