1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-22 10:26:20 +00:00

(pgg-gpg-process-region): Accept any remaining pending output coming

after the status change.
This commit is contained in:
Chong Yidong 2008-08-02 19:03:39 +00:00
parent 7b044f8d8e
commit 9d96724002

View File

@ -106,6 +106,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)