From 644d31a2690ba512600a96a7db801d074b26f48d Mon Sep 17 00:00:00 2001 From: Nicolas Petton Date: Sun, 11 Oct 2015 22:58:35 +0200 Subject: [PATCH] Replace the usage of an obsolete function in auth-source.el * lisp/gnus/auth-source.el (auth-source-epa-make-gpg-token): Replace an usage of `epg-context-set-armor' with `setf'. --- lisp/gnus/auth-source.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/gnus/auth-source.el b/lisp/gnus/auth-source.el index 52ea368dfce..75e6d0499d0 100644 --- a/lisp/gnus/auth-source.el +++ b/lisp/gnus/auth-source.el @@ -1152,7 +1152,7 @@ FILE is the file from which we obtained this token." (let ((context (epg-make-context 'OpenPGP)) (pp-escape-newlines nil) cipher) - (epg-context-set-armor context t) + (setf (epg-context-armor context) t) (epg-context-set-passphrase-callback context (cons #'auth-source-token-passphrase-callback-function -- 2.39.2