diff options
author | Chong Yidong <cyd@stupidchicken.com> | 2008-08-02 19:02:42 +0000 |
---|---|---|
committer | Chong Yidong <cyd@stupidchicken.com> | 2008-08-02 19:02:42 +0000 |
commit | bdf49c67a8d95af57c5930b88b5de71295848672 (patch) | |
tree | bbfdbe5697b6e2e6a158f9d26fb1d930b46cf8a4 /lisp | |
parent | 49ace1b16211f30e8a0fcde9ec59759dd6292ccb (diff) | |
download | emacs-bdf49c67a8d95af57c5930b88b5de71295848672.tar.gz |
(pgg-gpg-process-region): Accept any remaining pending output coming
after the status change.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/pgg-gpg.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/pgg-gpg.el b/lisp/pgg-gpg.el index 5aaad1741d5..edeaebdeb81 100644 --- a/lisp/pgg-gpg.el +++ b/lisp/pgg-gpg.el @@ -104,6 +104,9 @@ (process-send-eof process) (while (eq 'run (process-status process)) (accept-process-output process 5)) + ;; Accept any remaining pending output coming after the + ;; status change. + (accept-process-output process 5) (setq status (process-status process) exit-status (process-exit-status process)) (delete-process process) |