refactor: simplify the vi-jump-back adn vi-jump-next, and document it.

lem-project · Dec 9, 2024 · 806461c · 806461c
1 parent 11c26e4
commit 806461c
Showing 1 changed file with 3 additions and 4 deletions.
diff --git a/extensions/vi-mode/commands.lisp b/extensions/vi-mode/commands.lisp
@@ -1031,13 +1031,12 @@ on the same line or at eol if there are none."
 
 (define-command vi-jump-back (&optional (n 1)) (:universal)
   (dotimes (i n)
-    (let ((target-point (jump-back)))
-      (recenter-line-if-point-not-inside-window target-point))))
+    ;; The return value of jump-back is target jump point.
+    (recenter-line-if-point-not-inside-window (jump-back))))
 
 (define-command vi-jump-next (&optional (n 1)) (:universal)
   (dotimes (i n)
-    (let ((target-point (jump-next)))
-      (recenter-line-if-point-not-inside-window target-point))))
+    (recenter-line-if-point-not-inside-window (jump-next))))
 
 (define-motion vi-jump-previous () ()
     (:jump t)