From 3df81fb5dc5809cab7843e5358c17d0039b55eb1 Mon Sep 17 00:00:00 2001 From: Thierry Volpiatto Date: Thu, 30 Nov 2023 08:03:45 +0100 Subject: [PATCH] Make register-preview-delay obsolete * etc/NEWS: Update. * lisp/register.el (register-preview-delay): Make it obsolete. --- etc/NEWS | 5 +++++ lisp/register.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/etc/NEWS b/etc/NEWS index 6661ac70e1b..bab3529339f 100644 --- a/etc/NEWS +++ b/etc/NEWS @@ -1138,6 +1138,11 @@ showcases all their customization options. * Incompatible Lisp Changes in Emacs 30.1 +--- +** 'register-preview-delay' is no longer used. +Register preview is no more delayed. If you want to disable it use +'register-use-preview' instead with a boolean value. + +++ ** 'M-TAB' now invokes 'completion-at-point' also in Text mode. Text mode no longer binds 'M-TAB' to 'ispell-complete-word', and diff --git a/lisp/register.el b/lisp/register.el index 61bef503f91..88d0e8e1d10 100644 --- a/lisp/register.el +++ b/lisp/register.el @@ -93,7 +93,6 @@ of the marked text." :type '(choice (const :tag "None" nil) (character :tag "Use register" :value ?+))) -;; FIXME: This is no more needed, remove it. (defcustom register-preview-delay 1 "If non-nil, time to wait in seconds before popping up register preview window. If nil, do not show register previews, unless `help-char' (or a member of @@ -101,6 +100,7 @@ If nil, do not show register previews, unless `help-char' (or a member of :version "24.4" :type '(choice number (const :tag "No preview unless requested" nil)) :group 'register) +(make-obsolete-variable 'register-preview-delay "No longer used." "30.1") (defcustom register-preview-default-keys (mapcar #'string (number-sequence ?a ?z)) "Default keys for setting a new register." -- 2.39.2