From a7b7b85567f766ff510a5eaaaf32dbbbec15efd0 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Mon, 13 Nov 2017 11:28:05 -0500 Subject: [PATCH] * lisp/gnus/gnus-srvr.el: Avoid custom-set-variables * lisp/gnus/gnus-srvr.el (gnus-server-toggle-cloud-method-server): Prefer customize-set-variable. --- lisp/gnus/gnus-srvr.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/gnus/gnus-srvr.el b/lisp/gnus/gnus-srvr.el index 8a91973e388..23d8b02efde 100644 --- a/lisp/gnus/gnus-srvr.el +++ b/lisp/gnus/gnus-srvr.el @@ -1159,7 +1159,7 @@ Requesting compaction of %s... (this may take a long time)" (error "The server under point can't host the Emacs Cloud")) (when (not (string-equal gnus-cloud-method server)) - (custom-set-variables '(gnus-cloud-method server)) + (customize-set-variable 'gnus-cloud-method server) ;; Note we can't use `Custom-save' here. (when (gnus-yes-or-no-p (format "The new cloud host server is %S now. Save it? " server)) -- 2.39.5