[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
feature/completions-highlight-modifications 6cea893 07/25: Fix corner ca
From: |
Jimmy Aguilar Mena |
Subject: |
feature/completions-highlight-modifications 6cea893 07/25: Fix corner case when going out of bounds |
Date: |
Fri, 20 Nov 2020 13:28:32 -0500 (EST) |
branch: feature/completions-highlight-modifications
commit 6cea8936b1b63aa1c0caa53c013be1da4da529ed
Author: Jimmy Aguilar Mena <spacibba@aol.com>
Commit: Jimmy Aguilar Mena <spacibba@aol.com>
Fix corner case when going out of bounds
* lisp/completions-highlight.el : Don't go anywhere when in the fist or
last candidate.
* Remove some redundant calls to with-current-buffer
---
lisp/completions-highlight.el | 16 ++++++++++------
1 file changed, 10 insertions(+), 6 deletions(-)
diff --git a/lisp/completions-highlight.el b/lisp/completions-highlight.el
index 00b7382..f0da382 100644
--- a/lisp/completions-highlight.el
+++ b/lisp/completions-highlight.el
@@ -63,9 +63,15 @@ N is set to 1 if not specified."
"Move to and highlight the next item in the completion list.
With prefix argument N, move N items (negative N means move backward).
If completion highlight is enabled, highlights the selected candidate.
-Returns the completion string if available."
+Returns the completion string if available.
+If N is equal to zero returns the current candidate"
(interactive "p")
- (next-completion n)
+
+ (unless (zerop n)
+ (next-completion n)
+ (cond
+ ((eobp) (next-completion -1))
+ ((bobp) (next-completion 1))))
(let* ((obeg (point))
(oend (next-single-property-change obeg 'mouse-face nil (point-max)))
@@ -108,8 +114,7 @@ alive and active."
`(and (window-live-p minibuffer-scroll-window)
(eq t (frame-visible-p (window-frame minibuffer-scroll-window)))
(with-selected-window minibuffer-scroll-window
- (with-current-buffer (window-buffer minibuffer-scroll-window)
- ,@body))))
+ ,@body)))
(defun minibuffer-next-completion (n)
"Execute `completions-highlight-next-completion' in *Completions*.
@@ -163,7 +168,6 @@ suffix."
(completion-no-auto-exit t))
(with-selected-window minibuffer-window
- (with-current-buffer minibuffer-buffer
(let* ((prompt-end (minibuffer-prompt-end))
(cursor-pos (if obase-position
(cadr obase-position)
@@ -177,7 +181,7 @@ suffix."
(choose-completion-string suffix minibuffer-buffer
(list cursor-pos (point-max)))
(add-face-text-property cursor-pos (+ cursor-pos suffix-len) 'shadow)
- (goto-char cursor-pos))))))
+ (goto-char cursor-pos)))))
(defvar completions-highlight-minibuffer-map
- feature/completions-highlight-modifications 3a22b70 05/25: Improve keymap handling., (continued)
- feature/completions-highlight-modifications 3a22b70 05/25: Improve keymap handling., Jimmy Aguilar Mena, 2020/11/20
- feature/completions-highlight-modifications 31d6ec4 12/25: Add parent maps, Jimmy Aguilar Mena, 2020/11/20
- feature/completions-highlight-modifications c6943d7 09/25: Simplify setting keymaps., Jimmy Aguilar Mena, 2020/11/20
- feature/completions-highlight-modifications 11431bc 13/25: Add # to function bindings, Jimmy Aguilar Mena, 2020/11/20
- feature/completions-highlight-modifications f19039c 14/25: Improve completions-highlight description in file header., Jimmy Aguilar Mena, 2020/11/20
- feature/completions-highlight-modifications ce8b5b2 17/25: Simplify and rely more in the post-command-hook, Jimmy Aguilar Mena, 2020/11/20
- feature/completions-highlight-modifications 3f0f13e 18/25: Add backtab commands., Jimmy Aguilar Mena, 2020/11/20
- feature/completions-highlight-modifications 6ea2c5c 20/25: Fixes:, Jimmy Aguilar Mena, 2020/11/20
- feature/completions-highlight-modifications 25f23b1 25/25: Add try to close completions more often like zsh., Jimmy Aguilar Mena, 2020/11/20
- feature/completions-highlight-modifications 5cf9dd6 11/25: Add autoload decorator., Jimmy Aguilar Mena, 2020/11/20
- feature/completions-highlight-modifications 6cea893 07/25: Fix corner case when going out of bounds,
Jimmy Aguilar Mena <=
- feature/completions-highlight-modifications e143246 10/25: Simplify overlay handling, Jimmy Aguilar Mena, 2020/11/20
- feature/completions-highlight-modifications ab1e2e6 15/25: Add custom variable completions-highlight-autoselect., Jimmy Aguilar Mena, 2020/11/20
- feature/completions-highlight-modifications 10359ba 19/25: Fix previous commit, Jimmy Aguilar Mena, 2020/11/20
- feature/completions-highlight-modifications bfb8a71 21/25: Add ignore-errors when executing from minibuffer, Jimmy Aguilar Mena, 2020/11/20
- feature/completions-highlight-modifications 3319dcc 22/25: New command minibuffer-choose-completion, Jimmy Aguilar Mena, 2020/11/20
- feature/completions-highlight-modifications 6369e59 23/25: Other changes:, Jimmy Aguilar Mena, 2020/11/20
- feature/completions-highlight-modifications c990a28 24/25: Simplify and add custom, Jimmy Aguilar Mena, 2020/11/20
- feature/completions-highlight-modifications 42f47e7 06/25: Fix recursive set-keymap-parent in completions-highlight., Jimmy Aguilar Mena, 2020/11/20
- feature/completions-highlight-modifications 644d5e5 08/25: Simplify numeric argument, Jimmy Aguilar Mena, 2020/11/20
- feature/completions-highlight-modifications 268170e 16/25: Define completions-highlight face and group, Jimmy Aguilar Mena, 2020/11/20