From 83ae718a320476d49042fa9ce3a739a0f8d42d4d Mon Sep 17 00:00:00 2001 From: Eshel Yaron Date: Sat, 10 May 2025 08:50:13 +0200 Subject: [PATCH] Minor cleanups --- lisp/emacs-lisp/eldoc.el | 2 +- lisp/register.el | 7 ++----- 2 files changed, 3 insertions(+), 6 deletions(-) diff --git a/lisp/emacs-lisp/eldoc.el b/lisp/emacs-lisp/eldoc.el index 5b4b9f56fc9..f9f746ae026 100644 --- a/lisp/emacs-lisp/eldoc.el +++ b/lisp/emacs-lisp/eldoc.el @@ -957,7 +957,7 @@ Intended for `eldoc-documentation-functions' (which see)." (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'." diff --git a/lisp/register.el b/lisp/register.el index 34e8221e17d..603e9c8019c 100644 --- a/lisp/register.el +++ b/lisp/register.el @@ -87,7 +87,6 @@ A list of the form (FRAME-CONFIGURATION POSITION) 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 ?+))) @@ -96,8 +95,7 @@ of the marked text." 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. @@ -108,8 +106,7 @@ defining or executing a keyboard macro, Emacs overwrites the 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. -- 2.39.5