branch: master
commit eafdd36ee0a776a695fc02962dfe9e303593055d
Author: Michael Heerdegen <michael_heerde...@web.de>
Commit: Michael Heerdegen <michael_heerde...@web.de>
[el-search] Don't initially fold El Occur buffers
This didn't always work correctly and may also be irritating for new
users.
Bump version to 1.7.15.
* packages/el-search/el-search.el (el-search--occur): Don't initially
fold *El Occur* buffer.
---
packages/el-search/NEWS | 4 ++++
packages/el-search/el-search.el | 19 +++++--------------
2 files changed, 9 insertions(+), 14 deletions(-)
diff --git a/packages/el-search/NEWS b/packages/el-search/NEWS
index 863d2f5..cc5d877 100644
--- a/packages/el-search/NEWS
+++ b/packages/el-search/NEWS
@@ -1,6 +1,10 @@
Some of the user visible news were:
+Version: 1.7.15
+
+ *El Occur* buffers are now initially unfolded.
+
Version: 1.7.8
Similar to isearch, el-search now opens invisible text.
diff --git a/packages/el-search/el-search.el b/packages/el-search/el-search.el
index 4f4b0eb..2c7246a 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.7.14
+;; Version: 1.7.15
;; Package-Requires: ((emacs "25") (stream "2.2.4") (cl-print "1.0"))
@@ -256,9 +256,8 @@
;; match in that buffer or file. With S-tab you can (un)collapse all
;; file sections like in `org-mode' to see only file names and the
;; number of matches, or everything. Tab folds and unfolds
-;; expressions (this uses hideshow; initially, all expressions are
-;; folded to one line) and also sections at the beginning of
-;; headlines.
+;; expressions (this uses hideshow) and also sections at the beginning
+;; of headlines.
;;
;;
;; Multiple multi searches
@@ -3273,14 +3272,7 @@ Prompt for a new pattern and revert."
(point) (el-search--end-of-sexp
context-beg))))))
(let ((inhibit-message t) (message-log-max nil))
- (indent-region insertion-point (point))
- (save-excursion
- (goto-char insertion-point)
- (ignore-errors
- ;; This can error...
- (if nil ;if need-context
- (hs-hide-level 1)
- (hs-hide-block)))))
+ (indent-region insertion-point (point)))
(insert "\n")))))))
(save-excursion
@@ -3315,8 +3307,7 @@ Prompt for a new pattern and revert."
Buffers and files are separated by headlines. Matches are
highlighted with face `el-search-match'. For short matches, some
-context is shown, and nearby matches are grouped. Initially all
-expressions are folded to one line.
+context is shown, and nearby matches are grouped.
\\<el-search-occur-mode-map>
Clicking on a file or buffer name displays it in a different
window and goes to the first match.
