(defun eldoc-add-command-completions (&rest names)
"Pass every prefix completion of NAMES to `eldoc-add-command'."
(dolist (name names)
- (apply #'eldoc-add-command (all-completions name obarray 'commandp))))
+ (apply #'eldoc-add-command (all-completions name obarray #'commandp))))
(defun eldoc-remove-command (&rest cmds)
"Remove each of CMDS from the obarray `eldoc-message-commands'."
When collecting text with \\[append-to-register] (or \\[prepend-to-register]),
contents of this register is added to the beginning (or end, respectively)
of the marked text."
- :group 'register
:type '(choice (const :tag "None" nil)
(character :tag "Use register" :value ?+)))
If nil, do not show register previews, unless `help-char' (or a member of
`help-event-list') is pressed."
:version "24.4"
- :type '(choice number (const :tag "No preview unless requested" nil))
- :group 'register)
+ :type '(choice number (const :tag "No preview unless requested" nil)))
(defcustom register-confirm-overwrite t
"Whether to ask for confirmation before overwriting register contents.
previous contents of the register without confirmation,
regardless of the value of this option."
:version "30.1"
- :type 'boolean
- :group 'register)
+ :type 'boolean)
(defun register-confirm-overwrite ()
"Return non-nil if Emacs should confirm overwriting register contents.