From a43a0fc797f27cc0bfb0379f617e94b66c35a26e Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Sat, 15 Jun 2019 17:10:53 +0200 Subject: [PATCH] Silence warning in obsolete/complete.el * lisp/obsolete/complete.el (PC-do-completion): Suppress warning about obsolete variable in obsolete function. --- lisp/obsolete/complete.el | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/lisp/obsolete/complete.el b/lisp/obsolete/complete.el index 8021b2227ea..173a4619caa 100644 --- a/lisp/obsolete/complete.el +++ b/lisp/obsolete/complete.el @@ -832,9 +832,12 @@ GOTO-END is non-nil, however, it instead replaces up to END." ;; ;; Note that choose-completion-string-functions ;; plays around with point. - (setq completion-base-size (if dirname - dirlength - (- beg prompt-end)))))) + (with-suppressed-warnings ((obsolete + completion-base-size)) + (setq completion-base-size + (if dirname + dirlength + (- beg prompt-end))))))) (PC-temp-minibuffer-message " [Next char not unique]")) ;; Expansion of filenames is not reversible, ;; so just keep the prefix. -- 2.39.2