Simplified.

diff --git a/epg.el b/epg.el
index d886f4e..0e96c97 100644 (file)
--- a/epg.el
+++ b/epg.el
@@ -1179,7 +1179,7 @@ This function is for internal use only."
   (let ((args (append (list "--with-colons" "--no-greeting" "--batch"
                            "--with-fingerprint"
                            "--with-fingerprint"
-                           (if (or (eq mode t) (eq mode 'secret))
+                           (if (memq mode '(t secret))
                                "--list-secret-keys"
                              (if mode
                                  "--list-sigs"
@@ -1526,9 +1526,9 @@ If you are unsure, use synchronous version of this function
 `epg-sign-file' or `epg-sign-string' instead."
   (epg-context-set-result context nil)
   (epg-start context
-            (append (list (if (or (eq mode t) (eq mode 'detached))
+            (append (list (if (memq mode '(t detached))
                               "--detach-sign"
-                            (if (or (null mode) (eq mode 'normal))
+                            (if (memq mode '(nil normal))
                                 "--sign"
                               "--clearsign")))
                     (apply #'nconc