* epg.el (epg-no-data-reason-alist): New constant.

(epg-unexpected-reason-alist): New constant.

diff --git a/ChangeLog b/ChangeLog
index 4828071..59c86cb 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -6,6 +6,8 @@
        (epg-list-keys-postprocess-one-key): Abolished.
        (epg-list-keys): Reverse all keys, sub-keys, user-ids, and key
        signatures by itself.
+       (epg-no-data-reason-alist): New constant.
+       (epg-unexpected-reason-alist): New constant.
 
 2006-05-01  Daiki Ueno  <ueno@unixuser.org>
 

diff --git a/epg.el b/epg.el
index 2855958..c04b4e1 100644 (file)
--- a/epg.el
+++ b/epg.el
@@ -124,6 +124,14 @@
     (3 . "Certificate Chain too long")
     (4 . "Error storing certificate")))
 
+(defconst epg-no-data-reason-alist
+  '((1 . "No armored data")
+    (2 . "Expected a packet but did not found one")
+    (3 . "Invalid packet found, this may indicate a non OpenPGP message")
+    (4 . "Signature expected but not found")))
+
+(defconst epg-unexpected-reason-alist nil)
+
 (defvar epg-key-validity-alist
   '((?o . unknown)
     (?i . invalid)