# HG changeset patch
# User Daiki Ueno <ueno@unixuser.org>
# Date 1241400812 0
# Node ID 4369a496f39ed47868bbcf9d00da66d8e5cdfce3
# Parent  5799cf56cf250b2574a918a81a40697f589c3981
(epg-wait-for-completion): Add a comment explaining the reason of the
previous change.

diff -r 5799cf56cf25 -r 4369a496f39e lisp/epg.el
--- a/lisp/epg.el	Mon May 04 01:18:11 2009 +0000
+++ b/lisp/epg.el	Mon May 04 01:33:32 2009 +0000
@@ -1176,6 +1176,7 @@
   "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))
+  ;; This line is needed to run the process-filter right now.
   (sleep-for 0.1))
 
 (defun epg-reset (context)