Make the :jump-next and :jump-previous commands remember the last used jump buffer

Author: silversquirl

rc/tools/jump.kak

@@ -5,6 +5,7 @@ declare-option -docstring "name of the client in which utilities display informa
 
 provide-module jump %{
 
+declare-option -hidden str jump_current_buffer ''
 declare-option -hidden int jump_current_line 0
 
 define-command -hidden jump %{
@@ -14,24 +15,27 @@ define-command -hidden jump %{
                 execute-keys ',xs^([^:\n]+):(\d+):(\d+)?<ret>'
                 set-register a %reg{1} %reg{2} %reg{3}
             }
+            set-option global jump_current_buffer %val{bufname}
             set-option buffer jump_current_line %val{cursor_line}
             evaluate-commands -try-client %opt{jumpclient} -verbatim -- edit -existing -- %reg{a}
             try %{ focus %opt{jumpclient} }
         }
     }
 }
 
-define-command jump-next -params 1.. -docstring %{
+define-command -hidden jump-buffer -params 1.. %{ buffer %arg{1} }
+
+define-command jump-next -params ..1 -docstring %{
     jump-next <bufname>: jump to next location listed in the given *grep*-like location list buffer.
 } %{
     evaluate-commands -try-client %opt{jumpclient} -save-regs / %{
-        buffer %arg{@}
+        jump-buffer %arg{@} %opt{jump_current_buffer}
         jump-select-next
         jump
     }
     try %{
         evaluate-commands -client %opt{toolsclient} %{
-            buffer %arg{@}
+            buffer %opt{jump_current_buffer}
             execute-keys gg %opt{jump_current_line}g
         }
     }
@@ -44,17 +48,17 @@ define-command -hidden jump-select-next %{
     execute-keys ge %opt{jump_current_line}g<a-l> /^[^:\n]+:\d+:<ret>
 }
 
-define-command jump-previous -params 1.. -docstring %{
+define-command jump-previous -params ..1 -docstring %{
     jump-previous <bufname>: jump to previous location listed in the given *grep*-like location list buffer.
 } %{
     evaluate-commands -try-client %opt{jumpclient} -save-regs / %{
-        buffer %arg{@}
+        jump-buffer %arg{@} %opt{jump_current_buffer}
         jump-select-previous
         jump
     }
     try %{
         evaluate-commands -client %opt{toolsclient} %{
-            buffer %arg{@}
+            buffer %opt{jump_current_buffer}
             execute-keys gg %opt{jump_current_line}g
         }
     }