* lisp/epg.el (epg-start-sign): Replace obsolete functions.

1 files changed, 2 insertions, 2 deletions

diff --git a/lisp/epg.el b/lisp/epg.el
index 3c20c270490..dc0e2df5838 100644
--- a/lisp/epg.el
+++ b/lisp/epg.el
@@ -1676,8 +1676,8 @@ If you are unsure, use synchronous version of this function
   (setf (epg-context-operation context) 'sign)
   (setf (epg-context-result context) nil)
   (unless (memq mode '(t detached nil normal)) ;i.e. cleartext
-    (epg-context-set-armor context nil)
-    (epg-context-set-textmode context nil))
+    (setf (epg-context-armor context) nil)
+    (setf (epg-context-textmode context) nil))
   (epg--start context
              (append (list (if (memq mode '(t detached))
                                "--detach-sign"