emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/jinx b138e6b3d7 2/4: Fix jinx-previous


From: ELPA Syncer
Subject: [elpa] externals/jinx b138e6b3d7 2/4: Fix jinx-previous
Date: Fri, 28 Apr 2023 08:58:31 -0400 (EDT)

branch: externals/jinx
commit b138e6b3d7ee74f2a105e46d82523117ab3263ee
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Fix jinx-previous
---
 jinx.el | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/jinx.el b/jinx.el
index 9a3a5b37ce..77634a3985 100644
--- a/jinx.el
+++ b/jinx.el
@@ -841,8 +841,10 @@ If prefix argument ALL non-nil correct all misspellings."
   (unless (= n 0)
     (if (minibufferp)
         (throw 'jinx--goto n)
-      (let ((overlays (jinx--force-overlays (point-min) (point-max))))
-        (goto-char (overlay-end (nth (mod n (length overlays)) overlays)))))))
+      (let ((ov (jinx--force-overlays (point-min) (point-max))))
+        (unless (or (> n 0) (<= (overlay-start (car ov)) (point) (overlay-end 
(car ov))))
+          (cl-incf n))
+        (goto-char (overlay-end (nth (mod n (length ov)) ov)))))))
 
 (defun jinx-previous (n)
   "Go to to Nth previous misspelling."



reply via email to

[Prev in Thread] Current Thread [Next in Thread]