From 4589d9cf494d9cca19aa4da8aa754f6b31ef1876 Mon Sep 17 00:00:00 2001
From: tv <tv@shackspace.de>
Date: Sun, 27 Jul 2014 18:55:32 +0200
Subject: s/Go{to,till}Find{Left,Right}/{For,Back}wardWord/

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

(limited to 'Main.hs')

diff --git a/Main.hs b/Main.hs
index e4c9a13..75e031f 100644
--- a/Main.hs
+++ b/Main.hs
@@ -316,8 +316,8 @@ nmap =
   -- OR
   --    [MotionCommand SkipSpaceRight, MotionCommand $ GotillFindRight 1 ' ']
   --    etc.
-  , ("\x1bOc", MotionCommand $ GotillFindRight 1 ' ')
-  , ("\x1bOd", MotionCommand $ GotillFindLeft 1 ' ')
+  , ("\x1bOc", MotionCommand $ WordsForward 1)
+  , ("\x1bOd", MotionCommand $ WordsBackward 1)
   ]
   ++ [unboundSequence "\x1b[2~" "<Insert>"]
   ++ [unboundSequence "\x1b[5~" "<Prior>"]    -- page up
-- 
cgit v1.2.3