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

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

[elpa] master a86cf29: Declare any search started with `el-search-this-s


From: Michael Heerdegen
Subject: [elpa] master a86cf29: Declare any search started with `el-search-this-sexp' single-buffer
Date: Mon, 8 Jan 2018 11:17:55 -0500 (EST)

branch: master
commit a86cf29abfc00cde2537d5495182954d242b4ff7
Author: Michael Heerdegen <address@hidden>
Commit: Michael Heerdegen <address@hidden>

    Declare any search started with `el-search-this-sexp' single-buffer
    
    * el-search/el-search.el (el-search-this-sexp): Do it.
---
 packages/el-search/el-search.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/packages/el-search/el-search.el b/packages/el-search/el-search.el
index 40517cc..348b124 100644
--- a/packages/el-search/el-search.el
+++ b/packages/el-search/el-search.el
@@ -7,7 +7,7 @@
 ;; Created: 29 Jul 2015
 ;; Keywords: lisp
 ;; Compatibility: GNU Emacs 25
-;; Version: 1.4.0.16
+;; Version: 1.4.0.17
 ;; Package-Requires: ((emacs "25") (stream "2.2.4"))
 
 
@@ -2314,7 +2314,8 @@ Use the normal search commands to seize the search."
      `',sexp
      (let ((current-buffer (current-buffer)))
        (lambda () (stream (list current-buffer))))
-     'from-here)
+     'from-here
+     (lambda (search) (setf (alist-get 'is-single-buffer 
(el-search-object-properties search)) t)))
     (el-search--next-buffer el-search--current-search)
     (setf (el-search-head-position (el-search-object-head 
el-search--current-search))
           (copy-marker (point)))



reply via email to

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