andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

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

Browse source 
after the status change.
This commit is contained in:
Chong Yidong 2008-08-02 19:03:39 +00:00
parent 7b044f8d8e
commit 9d96724002
1 changed files with 3 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/pgg-gpg.el
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)