Function: minibuffer-default-add-shell-commands
minibuffer-default-add-shell-commands is an interactive and
byte-compiled function defined in simple.el.gz.
Signature
(minibuffer-default-add-shell-commands)
Documentation
Return a list of all commands associated with the current file.
This function is used to add all related commands retrieved by mailcap
to the end of the list of defaults just after the default value.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/simple.el.gz
(defun minibuffer-default-add-shell-commands ()
"Return a list of all commands associated with the current file.
This function is used to add all related commands retrieved by `mailcap'
to the end of the list of defaults just after the default value."
(interactive)
(let* ((filename (if (listp minibuffer-default)
(car minibuffer-default)
minibuffer-default))
(commands (and filename (require 'mailcap nil t)
(mailcap-file-default-commands (list filename)))))
(setq commands (mapcar (lambda (command)
(concat command " " filename))
commands))
(if (listp minibuffer-default)
(append minibuffer-default commands)
(cons minibuffer-default commands))))