From e365b3883d6687617f28c730fe24ba8d710a94ea Mon Sep 17 00:00:00 2001
From: tv <tv@shackspace.de>
Date: Fri, 1 Aug 2014 12:29:46 +0200
Subject: nmap: promote \x1b to the top

---
 src/Main.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/src/Main.hs b/src/Main.hs
index 11b246c..785147b 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -449,7 +449,8 @@ selectRegisterMap =
 
 nmap :: Keymap
 nmap =
-  [ ("i", ChangeMode InsertMode)
+  [ ("\x1b", RingBell) -- TODO cancel any unfinished commands
+  , ("i", ChangeMode InsertMode)
   , ("a", ChangeMode InsertMode <> MotionCommand (GotoRight 1))
   , ("I", ChangeMode InsertMode <> MotionCommand GotoFirstChar)
   , ("A", ChangeMode InsertMode <> MotionCommand GotoEndOfLine)
@@ -464,7 +465,6 @@ nmap =
   , ("\x1b[C", MotionCommand $ GotoRight 1)
   , ("\x1b[D", MotionCommand $ GotoLeft 1)
   , ("\x0a", ExecuteInputBuffer <> ChangeMode InsertMode)
-  , ("\x1b", RingBell) -- TODO cancel any unfinished commands
   ]
   ++ (map (\i -> (show i, MulCount 10 <> AddCount i)) [0..9])
 
-- 
cgit v1.2.3