From 62719196b27496c3cc4ff97a92fc03627b1bab38 Mon Sep 17 00:00:00 2001
From: Peter Stephenson <pws@users.sourceforge.net>
Date: Wed, 14 May 2003 15:09:14 +0000
Subject: 18536: EMACS and VI compatibility options

---
 Src/Zle/zle_keymap.c | 10 ++++++++++
 1 file changed, 10 insertions(+)

(limited to 'Src/Zle/zle_keymap.c')

diff --git a/Src/Zle/zle_keymap.c b/Src/Zle/zle_keymap.c
index c36657697..3a06bb632 100644
--- a/Src/Zle/zle_keymap.c
+++ b/Src/Zle/zle_keymap.c
@@ -1370,3 +1370,13 @@ getkeycmd(void)
 	func = lastnamed;
     return func;
 }
+
+/**/
+mod_export void
+zlesetkeymap(int mode)
+{
+    Keymap km = openkeymap((mode == VIMODE) ? "viins" : "emacs");
+    if (!km)
+	return;
+    linkkeymap(km, "main", 0);
+}
-- 
cgit 1.4.1