From 86508c468d5ec74c136dd4c3c1c65cc28857bbba Mon Sep 17 00:00:00 2001 From: tomo Date: Tue, 19 Dec 2000 06:25:26 +0000 Subject: [PATCH] (pgg-pgp5-process-region): Use `binary-start-process-shell-command'. --- mime/pgg-pgp5.el | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) diff --git a/mime/pgg-pgp5.el b/mime/pgg-pgp5.el index f4cfedc..fa1b0ee 100644 --- a/mime/pgg-pgp5.el +++ b/mime/pgg-pgp5.el @@ -103,11 +103,10 @@ Bourne shell or its equivalent \(not tcsh) is needed for \"2>\"." (setenv "PGPPASSFD" "0")) (unwind-protect (progn - (let ((coding-system-for-read 'binary) - (coding-system-for-write 'binary)) - (setq process - (apply #'start-process-shell-command "*PGP*" output-buffer - program args))) + (setq process + (apply #'binary-start-process-shell-command "*PGP*" + output-buffer + program args)) (set-process-sentinel process #'ignore) (when passphrase (process-send-string process (concat passphrase "\n"))) -- 1.7.10.4