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

* 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

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")