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

; Fix 'ibuffer-do-isearch{-regexp}'

Browse Source 
* lisp/ibuf-ext.el (ibuffer-do-isearch)
(ibuffer-do-isearch-regexp): Use 'defun' instead of
'define-ibuffer-op'.  (Bug#71927)
This commit is contained in:
Eshel Yaron 2024-07-06 20:53:06 +02:00
parent 8b1a0f8695
commit d68a4ea3ec
No known key found for this signature in database
GPG Key ID: EF3EE9CA35D78618
1 changed files with 6 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
lisp/ibuf-ext.el
View File

@ -594,22 +594,16 @@ To evaluate a form without viewing the buffer, see `ibuffer-do-eval'."
:modifier-p :maybe)
(revert-buffer t t))
;;;###autoload (autoload 'ibuffer-do-isearch "ibuf-ext")
(define-ibuffer-op ibuffer-do-isearch ()
;;;###autoload
(defun ibuffer-do-isearch ()
"Perform a `isearch-forward' in marked buffers."
(:interactive ()
:opstring "searched in"
:complex t
:modifier-p :maybe)
(interactive "" ibuffer-mode)
(multi-isearch-buffers (ibuffer-get-marked-buffers)))
;;;###autoload (autoload 'ibuffer-do-isearch-regexp "ibuf-ext")
(define-ibuffer-op ibuffer-do-isearch-regexp ()
;;;###autoload
(defun ibuffer-do-isearch-regexp ()
"Perform a `isearch-forward-regexp' in marked buffers."
(:interactive ()
:opstring "searched regexp in"
:complex t
:modifier-p :maybe)
(interactive "" ibuffer-mode)
(multi-isearch-buffers-regexp (ibuffer-get-marked-buffers)))
;;;###autoload (autoload 'ibuffer-do-replace-regexp "ibuf-ext")