diff options
| author | Daiki Ueno <ueno@unixuser.org> | 2009-05-03 22:27:40 +0000 |
|---|---|---|
| committer | Daiki Ueno <ueno@unixuser.org> | 2009-05-03 22:27:40 +0000 |
| commit | e80f5eb157874d80adef95d123b1fd609731d4c6 (patch) | |
| tree | a5e3dbc90d08636c82edcc0abe20978d9d35ec52 /lisp/epg.el | |
| parent | 0cc5688203b3d30f663ffaa92f38b1883c3b6bae (diff) | |
| download | emacs-e80f5eb157874d80adef95d123b1fd609731d4c6.tar.gz | |
Fix timing problem of Bug#2412.
(epg-wait-for-completion): Sleep after the process
exits, to allow process-filter to run (Bug#2412).
Diffstat (limited to 'lisp/epg.el')
| -rw-r--r-- | lisp/epg.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/epg.el b/lisp/epg.el index e96258fe909..3c80ef9db77 100644 --- a/lisp/epg.el +++ b/lisp/epg.el @@ -1175,7 +1175,8 @@ This function is for internal use only." (defun epg-wait-for-completion (context) "Wait until the `epg-gpg-program' process completes." (while (eq (process-status (epg-context-process context)) 'run) - (accept-process-output (epg-context-process context) 1))) + (accept-process-output (epg-context-process context) 1)) + (sleep-for 0.1)) (defun epg-reset (context) "Reset the CONTEXT." |