branch: elpa/symbol-overlay
commit 389cc1519a0252095a1373964671e3b22b7d4a69
Author: wolray <[email protected]>
Commit: wolray <[email protected]>
fix missed minibufferp check
---
symbol-overlay.el | 13 +++++++------
1 file changed, 7 insertions(+), 6 deletions(-)
diff --git a/symbol-overlay.el b/symbol-overlay.el
index 6e0e13ab0b..7f4b00ebec 100644
--- a/symbol-overlay.el
+++ b/symbol-overlay.el
@@ -264,7 +264,7 @@ If SHOW-COLOR is non-nil, display the color used by current
overlay."
(defun symbol-overlay-echo-mark ()
"Jump back to the mark `symbol-overlay-mark'."
(interactive)
- (and symbol-overlay-mark (goto-char symbol-overlay-mark)))
+ (and (not (minibufferp)) symbol-overlay-mark (goto-char
symbol-overlay-mark)))
(defun symbol-overlay-jump-call (jump-function dir)
"A general jumping process during which JUMP-FUNCTION is called to jump.
@@ -359,11 +359,12 @@ DIR must be 1 or -1."
(defun symbol-overlay-isearch-literally ()
"Isearch symbol at point literally, without `regexp-quote' the symbol."
(interactive)
- (let ((symbol (symbol-overlay-get-symbol))
- (beg (match-beginning 0)))
- (goto-char beg)
- (isearch-forward nil t)
- (isearch-yank-string (substring symbol 3 -3))))
+ (unless (minibufferp)
+ (let ((symbol (symbol-overlay-get-symbol))
+ (beg (match-beginning 0)))
+ (goto-char beg)
+ (isearch-forward nil t)
+ (isearch-yank-string (substring symbol 3 -3)))))
(defun symbol-overlay-replace-call (replace-function)
"Replace symbol using REPLACE-FUNCTION."
