s/Go{to,till}Find{Left,Right}/{For,Back}wardWord/

1 files changed, 2 insertions, 2 deletions

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