From 408dcae39cea0d4cc3df9852c9359c7866bafbc0 Mon Sep 17 00:00:00 2001 From: ueno Date: Wed, 27 Sep 2006 06:13:53 +0000 Subject: [PATCH] * epa-file.el (epa-file-insert-file-contents): Set progress-callback. (epa-file-write-region): Ditto. --- ChangeLog | 3 +++ epa-file.el | 4 ++++ 2 files changed, 7 insertions(+) diff --git a/ChangeLog b/ChangeLog index 2b55423..2446d43 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,8 @@ 2006-09-27 Daiki Ueno + * epa-file.el (epa-file-insert-file-contents): Set progress-callback. + (epa-file-write-region): Ditto. + * epa.el (epa-decrypt-file): Set callbacks. (epa-sign-file): Ditto. (epa-encrypt-file): Ditto. diff --git a/epa-file.el b/epa-file.el index 6f58c8c..80b1dbb 100644 --- a/epa-file.el +++ b/epa-file.el @@ -100,6 +100,8 @@ context (cons #'epa-file-passphrase-callback-function file)) + (epg-context-set-progress-callback context + #'epa-progress-callback-function) (unwind-protect (progn (if replace @@ -144,6 +146,8 @@ context (cons #'epa-file-passphrase-callback-function file)) + (epg-context-set-progress-callback context + #'epa-progress-callback-function) (condition-case error (setq string (epg-encrypt-string -- 1.7.10.4