Function: consult-complex-command
consult-complex-command is an autoloaded, interactive and
byte-compiled function defined in consult.el.
Signature
(consult-complex-command)
Documentation
Select and evaluate command from the command history.
This command can act as a drop-in replacement for repeat-complex-command.
Key Bindings
Source Code
;; Defined in ~/.emacs.d/elpa/consult-20260805.1130/consult.el
;;;;; Command: consult-complex-command
;;;###autoload
(defun consult-complex-command ()
"Select and evaluate command from the command history.
This command can act as a drop-in replacement for `repeat-complex-command'."
(interactive)
(let* ((history (or (delete-dups (mapcar #'prin1-to-string command-history))
(user-error "There are no previous complex commands")))
(cmd (read (consult--read
history
:prompt "Command: "
:default (car history)
:sort nil
:history t ;; disable history
:category 'expression))))
;; Taken from `repeat-complex-command'
(add-to-history 'command-history cmd)
(apply #'funcall-interactively
(car cmd)
(mapcar (lambda (e) (eval e t)) (cdr cmd)))))