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

diff --git a/lisp/epg.el b/lisp/epg.el
index 3c20c270490bd522702469bfaf891bbe4e50baeb..dc0e2df58386f3176fb9eccfc5dc5b585756b1c8 100644 (file)
--- 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"