Fix the last changes.

diff --git a/epg.el b/epg.el
index 7f15680..4b4700f 100644 (file)
--- a/epg.el
+++ b/epg.el
@@ -347,7 +347,7 @@ This function is for internal use only."
   "Set the list of notations for singning."
   (unless (eq (car-safe context) 'epg-context)
     (signal 'wrong-type-argument (list 'epg-context-p context)))
-  (aset (cdr context) 10 signers))
+  (aset (cdr context) 10 notations))
 
 (defun epg-context-set-process (context process)
   "Set the process object of `epg-gpg-program'.
@@ -1219,13 +1219,13 @@ This function is for internal use only."
        (epg-signature-set-notations
         signature
         (cons (epg-make-sig-notation string nil t nil)
-              (epg-sig-notations signature))))))
+              (epg-signature-notations signature))))))
 
 (defun epg--status-NOTATION_DATA (context string)
   (let ((signature (car (epg-context-result-for context 'verify)))
        notation)
     (if (and signature
-            (setq notation (car (epg-sig-notations signature))))
+            (setq notation (car (epg-signature-notations signature))))
        (epg-sig-notation-set-value notation string))))
 
 (defun epg--status-POLICY_URL (context string)
@@ -1234,7 +1234,7 @@ This function is for internal use only."
        (epg-signature-set-notations
         signature
         (cons (epg-make-sig-notation nil string t nil)
-              (epg-sig-notations signature))))))
+              (epg-signature-notations signature))))))
 
 (defun epg--status-PROGRESS (context string)
   (if (string-match "\\`\\([^ ]+\\) \\([^ ]\\) \\([0-9]+\\) \\([0-9]+\\)"
@@ -1599,8 +1599,8 @@ You can then use `write-region' to write new data into the file."
              (list "--sig-policy-url"
                    (if (epg-sig-notation-critical notation)
                        (concat "!" (epg-sig-notation-value notation))
-                     (epg-sig-notation-value notation))))
-           notations))
+                     (epg-sig-notation-value notation)))))
+         notations)))
 
 ;;;###autoload
 (defun epg-cancel (context)