mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-22 07:09:54 +00:00
Code Issues Releases Activity

* lisp/misearch.el (multi-isearch-push-state): Use proper closures

Browse Source
This commit is contained in:
Stefan Monnier 2021-05-18 19:03:06 -04:00
parent 41efaa54c5
commit abedac0909
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/misearch.el
View File

@ -202,8 +202,9 @@ the initial buffer."
"Save a function restoring the state of multiple buffers search.
Save the current buffer to the additional state parameter in the
search status stack."
`(lambda (cmd)
(multi-isearch-pop-state cmd ,(current-buffer))))
(let ((buf (current-buffer)))
(lambda (cmd)
(multi-isearch-pop-state cmd buf))))
(defun multi-isearch-pop-state (_cmd buffer)
"Restore the multiple buffers search state in BUFFER.