Add *edit-buffer-directory* to vi-mode

lem-project · Oct 21, 2024 · 4bbd65b · 4bbd65b
1 parent f750fd6
commit 4bbd65b
Showing 1 changed file with 7 additions and 2 deletions.
diff --git a/extensions/vi-mode/ex-command.lisp b/extensions/vi-mode/ex-command.lisp
@@ -10,15 +10,20 @@
                 :execute-set-command)
   (:import-from :lem-vi-mode/utils
                 :change-directory*
-                :expand-filename-modifiers))
+                :expand-filename-modifiers)
+  (:export :*edit-buffer-directory*))
 (in-package :lem-vi-mode/ex-command)
 
+(defvar *edit-buffer-directory* nil)
+
 (defun ex-edit (filename force)
   (if (string= filename "")
       (lem:revert-buffer force)
       (with-jumplist
         (lem:find-file (merge-pathnames (expand-filename-modifiers filename)
-                                        (uiop:getcwd))))))
+                                        (if *edit-buffer-directory*
+                                            (lem:buffer-directory)
+                                            (uiop:getcwd)))))))
 
 (defun ex-write (range filename touch)
   (case (length range)