Fix cursor insertion placement

grierson · Aug 15, 2023 · 0656b52 · 0656b52
1 parent c0f5022
commit 0656b52
Show file tree

Hide file tree

Showing 4 changed files with 8 additions and 6 deletions.
diff --git a/fnl/formedit/insertion.fnl b/fnl/formedit/insertion.fnl
@@ -6,6 +6,7 @@
         [start-row start-col] [(form:start)]
         start-col (+ start-col insert-offset)]
     (vim.api.nvim_buf_set_text 0 start-row start-col start-row start-col [" "])
+    (vim.api.nvim_win_set_cursor 0 [(+ start-row 1) (+ start-col 1)])
     (vim.api.nvim_feedkeys :i :n true)))
 
 (fn tail []

diff --git a/fnl/spec/insertion_spec.fnl b/fnl/spec/insertion_spec.fnl
@@ -14,17 +14,17 @@
                 (fn []
                   (h.setup {:content "(1)" :cursor [1 0]})
                   (h.feedkeys head-keymap)
-                  (h.expect {:content "( 1)" :cursor [1 0]})))
+                  (h.expect {:content "( 1)" :cursor [1 1]})))
             (it :set
                 (fn []
                   (h.setup {:content "#{1}" :cursor [1 0]})
                   (h.feedkeys head-keymap)
-                  (h.expect {:content "#{ 1}" :cursor [1 0]})))
+                  (h.expect {:content "#{ 1}" :cursor [1 2]})))
             (it "sub form"
                 (fn []
                   (h.setup {:content "(1 (2))" :cursor [1 3]})
                   (h.feedkeys head-keymap)
-                  (h.expect {:content "(1 ( 2))" :cursor [1 2]})))))
+                  (h.expect {:content "(1 ( 2))" :cursor [1 4]})))))
 
 (describe "tail insertion"
           (fn []

diff --git a/lua/formedit/insertion.lua b/lua/formedit/insertion.lua
diff --git a/lua/spec/insertion_spec.lua b/lua/spec/insertion_spec.lua