diff options
| author | Daiki Ueno | 2009-05-04 01:33:32 +0000 |
|---|---|---|
| committer | Daiki Ueno | 2009-05-04 01:33:32 +0000 |
| commit | 2a268ee2c53f278336ec1b788c5bcb0122a91940 (patch) | |
| tree | 5a80eea62c7ad4899b33c4105aff9d3ea0343258 | |
| parent | 22d47d5e2bba29b360cd9202e1a81f49009fdc84 (diff) | |
| download | emacs-2a268ee2c53f278336ec1b788c5bcb0122a91940.tar.gz emacs-2a268ee2c53f278336ec1b788c5bcb0122a91940.zip | |
(epg-wait-for-completion): Add a comment explaining the reason of the
previous change.
| -rw-r--r-- | lisp/epg.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/epg.el b/lisp/epg.el index 3c80ef9db77..5c9fd9b882b 100644 --- a/lisp/epg.el +++ b/lisp/epg.el | |||
| @@ -1176,6 +1176,7 @@ This function is for internal use only." | |||
| 1176 | "Wait until the `epg-gpg-program' process completes." | 1176 | "Wait until the `epg-gpg-program' process completes." |
| 1177 | (while (eq (process-status (epg-context-process context)) 'run) | 1177 | (while (eq (process-status (epg-context-process context)) 'run) |
| 1178 | (accept-process-output (epg-context-process context) 1)) | 1178 | (accept-process-output (epg-context-process context) 1)) |
| 1179 | ;; This line is needed to run the process-filter right now. | ||
| 1179 | (sleep-for 0.1)) | 1180 | (sleep-for 0.1)) |
| 1180 | 1181 | ||
| 1181 | (defun epg-reset (context) | 1182 | (defun epg-reset (context) |