[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/el-search 6e4b9cc 170/332: Show line numbers in *El Occ
From: |
Stefan Monnier |
Subject: |
[elpa] externals/el-search 6e4b9cc 170/332: Show line numbers in *El Occur* buffers |
Date: |
Tue, 1 Dec 2020 15:48:37 -0500 (EST) |
branch: externals/el-search
commit 6e4b9cc614e9ba771ebdc8889eb7d647a0aae12d
Author: Michael Heerdegen <michael_heerdegen@web.de>
Commit: Michael Heerdegen <michael_heerdegen@web.de>
Show line numbers in *El Occur* buffers
---
el-search.el | 6 +++++-
1 file changed, 5 insertions(+), 1 deletion(-)
diff --git a/el-search.el b/el-search.el
index f59a4a1..ed7aae9 100644
--- a/el-search.el
+++ b/el-search.el
@@ -2216,7 +2216,7 @@ Prompt for a new pattern and revert the occur buffer."
(cl-incf overall-matches buffer-matches)
(pcase-let ((`(,buffer ,_ ,file) (stream-first
stream-of-buffer-matches)))
(if file (cl-incf matching-files) (cl-incf
matching-buffers))
- (insert "\n;;; ** ")
+ (insert "\n\n;;; ** ")
(insert-button
(or file (format "%S" buffer))
'action
@@ -2310,6 +2310,10 @@ Prompt for a new pattern and revert the occur buffer."
(overlay-put ov 'face
'el-search-match)
(overlay-put ov 'el-search-match
t))
(with-current-buffer buffer
(point)))))
+ (insert (format "\n;;;; Line %d\n"
+ (with-current-buffer buffer
+ (line-number-at-pos
context-beg))))
+ (setq insertion-point (point))
(let ((working-position context-beg))
(while (not (stream-empty-p matches))
(pcase-let ((`((,_ ,match-beg ,_) . ,_)
(stream-pop matches)))
- [elpa] externals/el-search 92efda8 101/332: Add comment about (pcase) backquote inside (real) backquote, (continued)
- [elpa] externals/el-search 92efda8 101/332: Add comment about (pcase) backquote inside (real) backquote, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search 33c14a4 103/332: Move some pattern definitions to new file "el-search-x", Stefan Monnier, 2020/12/01
- [elpa] externals/el-search c4d8e00 105/332: el-search--make-docstring: exclude some specially named patterns, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search 0735984 120/332: el-search: more cleanup and minor tweaks; version 1.0.1, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search 6292dcc 130/332: Fix disregarding compressed elisp files, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search 788db9d 135/332: Use regexp-opt on suffixes in el-search--elisp-file-name-p, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search e7e900c 145/332: Use `read' to circumvent bug#24542, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search 8e6466a 131/332: Set syntax table for temp buffers in el-search-atom-list, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search cdfe8c1 136/332: Call `user-error' instead of `error' where appropriate, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search 5fbbcd1 168/332: Restore current search head in case of error or quit, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search 6e4b9cc 170/332: Show line numbers in *El Occur* buffers,
Stefan Monnier <=
- [elpa] externals/el-search a20a333 171/332: Use a separate function to document defined pattern types, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search 79ab903 179/332: Always use the current search for query-replace, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search 6a7ca23 181/332: Don't limit `el-search-emacs-elisp-sources' to "lisp/" subdir, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search 8dc608e 187/332: Improve folding behavior in *El Occur* buffers, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search a2e367e 189/332: Fix starting a search with `el-search-this-sexp', Stefan Monnier, 2020/12/01
- [elpa] externals/el-search d1706eb 190/332: Display match count for *El Occur* buffers, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search 97626ac 192/332: Use local binding of `post-command-hook' to reset wrap flag, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search 16a5f70 193/332: * el-search/el-search.el: Shorten the query-replace prompt, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search 224f384 196/332: ; * el-search/el-search.el: Mention Emacs Bug#29857 in the header, Stefan Monnier, 2020/12/01
- [elpa] externals/el-search 1175d21 200/332: Allow `string' and `symbol' el-search patterns to set match data, Stefan Monnier, 2020/12/01