From 6e9aaf60acbbdf6af222f4a70f394186654a1e74 Mon Sep 17 00:00:00 2001 From: tomo Date: Mon, 25 Dec 2000 04:58:07 +0000 Subject: [PATCH] (pgg-gpg-process-region): Use `binary-to-text-funcall' instead of `binary-start-process'. --- pgg-gpg.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/pgg-gpg.el b/pgg-gpg.el index 5b29a76..dc6c5ae 100644 --- a/pgg-gpg.el +++ b/pgg-gpg.el @@ -25,6 +25,7 @@ ;;; Code: +(require 'mel) ; binary-to-text-funcall (eval-when-compile (require 'pgg)) (defgroup pgg-gpg () @@ -78,11 +79,10 @@ (progn (set-default-file-modes 448) (setq process - (apply #'binary-start-process "*GnuPG*" errors-buffer + (apply #'binary-to-text-funcall + pgg-gpg-messages-coding-system + #'start-process "*GnuPG*" errors-buffer program args)) - (if (fboundp 'set-process-coding-system) - (set-process-coding-system process - pgg-gpg-messages-coding-system)) (set-process-sentinel process #'ignore) (when passphrase (process-send-string process (concat passphrase "\n"))) -- 1.7.10.4