[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/el-search d4f8b3b 289/332: [el-search] Tweak my last co
From: |
Stefan Monnier |
Subject: |
[elpa] externals/el-search d4f8b3b 289/332: [el-search] Tweak my last commit "Add menus" |
Date: |
Tue, 1 Dec 2020 15:49:06 -0500 (EST) |
branch: externals/el-search
commit d4f8b3b06ba65d022552bb8d65a14abc2a24dac8
Author: Michael Heerdegen <michael_heerdegen@web.de>
Commit: Michael Heerdegen <michael_heerdegen@web.de>
[el-search] Tweak my last commit "Add menus"
Also bump version to 1.9.4.
* packages/el-search/el-search.el (el-search-occur-revert-function):
Respect current value of 'el-search-occur--outline-visible'.
(emacs-lisp-mode-map): Declare 'el-search-occur-flag' as special in
the "Occur" menu item command since el-search may not have yet been
loaded when it is called.
---
el-search.el | 10 ++++++----
1 file changed, 6 insertions(+), 4 deletions(-)
diff --git a/el-search.el b/el-search.el
index 2c3d101..9f4893d 100644
--- a/el-search.el
+++ b/el-search.el
@@ -7,7 +7,7 @@
;; Created: 29 Jul 2015
;; Keywords: lisp
;; Compatibility: GNU Emacs 25
-;; Version: 1.9.3
+;; Version: 1.9.4
;; Package-Requires: ((emacs "25") (stream "2.2.4") (cl-print "1.0"))
@@ -3149,9 +3149,12 @@ Use the normal search commands to seize the search."
(defvar-local el-search-occur-search-object nil)
+(defvar el-search-occur--outline-visible t)
(defun el-search-occur-revert-function (&rest _)
- (el-search--occur el-search-occur-search-object t))
+ (el-search--occur el-search-occur-search-object t)
+ (unless el-search-occur--outline-visible
+ (outline-hide-leaves)))
(defun el-search-edit-occur-pattern (new-pattern)
"Change the search pattern associated with this *El Occur* buffer.
@@ -3291,8 +3294,6 @@ Prompt for a new pattern and revert."
(el-search-occur--next-match 'backward))
-(defvar el-search-occur--outline-visible t)
-
(defun el-search-occur-cycle ()
"Cycle between showing an outline and everything."
(interactive)
@@ -4547,6 +4548,7 @@ Reuse already given input."
:enable (cdr (ring-elements el-search-history))]
["Query-Replace" el-search-query-replace :enable (not buffer-read-only)]
["Occur" ,(lambda () (interactive)
+ (defvar el-search-occur-flag)
(let ((el-search-occur-flag t)) (call-interactively
#'el-search-pattern)))])))
(easy-menu-define nil el-search-occur-mode-map "El Occur Menu"
- [elpa] externals/el-search d909f2e 260/332: [el-search] Follow-ups to transient map handling, (continued)
- [elpa] externals/el-search d909f2e 260/332: [el-search] Follow-ups to transient map handling, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search d9950e1 264/332: [el-search] Fix nested match issues in *El Occur*, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search d9b2ff6 257/332: [el-search] Extend meaning of C-J prefix arg, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search 656869c 235/332: * el-search/el-search.el: Fix heuristic matcher for 'nil, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search adbf76d 262/332: [el-search] Open invisible text, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search 60ad12e 268/332: [el-search] Small fix in el-search--reset-wrap-flag, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search 73a15d2 274/332: [el-search] Stop for problematic comments, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search 4961830 273/332: [el-search] Make replacement editable and ediff'able, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search da1f46b 282/332: [el-search] Make mouse clicks not abort the search, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search 2a098da 293/332: [el-search] Unify go-to-previous/next-match key bindings, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search d4f8b3b 289/332: [el-search] Tweak my last commit "Add menus",
Stefan Monnier <=
- [elpa] externals/el-search 4d81139 299/332: [el-search] Fine tune separator for splicing replace, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search 424138b 307/332: [el-search] Tweak 'display-buffer' actions, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search d9acf3a 314/332: [el-search] Fix sanity check regarding comments, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search 13fc32d 323/332: [el-search] Fix a highlighting corner case, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search 9e95e79 325/332: [el-search] Also overwrite replaced matches automatically, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search f7e4c5b 327/332: [el-search] Small fix in occur filter-buffer-substring-function, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search 82b807f 231/332: * el-search/el-search.el: New user option `el-search-allow-scroll', Stefan Monnier, 2020/12/01
- [elpa] externals/el-search 3218858 261/332: [el-search] Add some key bindings, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search db7ccbb 220/332: * el-search/el-search.el: Don't highlight inserted replacement, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search 226296a 229/332: * el-search/el-search-x.el: New pattern type `string-lines', Stefan Monnier, 2020/12/01