projects / elisp / epg.git / commitdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: aa1e959)
Fixed.
authorueno <ueno>
Mon, 1 May 2006 02:22:37 +0000 (02:22 +0000)
committerueno <ueno>
Mon, 1 May 2006 02:22:37 +0000 (02:22 +0000)
epg.el patch | blob | history

diff --git a/epg.el b/epg.el
index fb764a6..e4f9d35 100644 (file)
--- a/epg.el
+++ b/epg.el
@@ -613,7 +613,8 @@ This function is for internal use only."
 
 (defun epg-start (context args)
   "Start `epg-gpg-program' in a subprocess with given ARGS."
 
 (defun epg-start (context args)
   "Start `epg-gpg-program' in a subprocess with given ARGS."
-  (if (eq (process-status (epg-context-process context)) 'run)
+  (if (and (epg-context-process context)
+          (eq (process-status (epg-context-process context)) 'run))
       (error "%s is already running in this context"
             (if (eq (epg-context-protocol context) 'CMS)
                 epg-gpgsm-program
       (error "%s is already running in this context"
             (if (eq (epg-context-protocol context) 'CMS)
                 epg-gpgsm-program