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

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

[elpa] externals/isearch-mb 302a437713 2/3: Make future history customiz


From: ELPA Syncer
Subject: [elpa] externals/isearch-mb 302a437713 2/3: Make future history customizable
Date: Fri, 28 Jan 2022 04:57:57 -0500 (EST)

branch: externals/isearch-mb
commit 302a437713361edfe60077d8ee342d73701bdf32
Author: Augusto Stoffel <arstoffel@gmail.com>
Commit: Augusto Stoffel <arstoffel@gmail.com>

    Make future history customizable
    
    The variable `isearch-forward-thing-at-point` (new in Emacs 28) is
    used to compute the future history items.
    
    Closes #22
---
 isearch-mb.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/isearch-mb.el b/isearch-mb.el
index 00feb5ed1d..1b48e4c103 100644
--- a/isearch-mb.el
+++ b/isearch-mb.el
@@ -163,7 +163,9 @@
   "Add default search strings to future history."
   (setq minibuffer-default
         (with-minibuffer-selected-window
-          (thread-last '(region url symbol sexp line) ;; TODO: make 
customizable
+          (thread-last (if (boundp 'isearch-forward-thing-at-point)
+                           isearch-forward-thing-at-point ;; Introduced in 
Emacs 28
+                         '(region url symbol sexp))
             (mapcar #'thing-at-point)
             (delq nil)
             (delete-dups)



reply via email to

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