From 5649be5a0ff63c37760cf3382bc0226d5923be64 Mon Sep 17 00:00:00 2001 From: ueno Date: Mon, 17 Apr 2006 10:35:27 +0000 Subject: [PATCH] * epa-file.el (epa-file-write-region): Check if START is a string. --- ChangeLog | 5 +++++ epa-file.el | 4 +++- 2 files changed, 8 insertions(+), 1 deletion(-) diff --git a/ChangeLog b/ChangeLog index 1b0be2c..a91a40c 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,9 +1,14 @@ 2006-04-17 Daiki Ueno + * epa-file.el (epa-file-write-region): Check if START is a string. + +2006-04-17 Daiki Ueno + * epa-file.el: Rewritten with file-name-handler. (epa-file-handler): New variable. (epa-file-enable): New command. (epa-file-disable): New command. + * epa-setup.el: Call epa-file-enable. 2006-04-17 Daiki Ueno diff --git a/epa-file.el b/epa-file.el index efd44fc..705f18a 100644 --- a/epa-file.el +++ b/epa-file.el @@ -131,7 +131,9 @@ (setq string (epg-encrypt-string context - (encode-coding-string (buffer-string) coding-system) + (if (stringp start) + (encode-coding-string start coding-system) + (encode-coding-string (buffer-string) coding-system)) (mapcar (lambda (key) (epg-sub-key-id (car (epg-key-sub-key-list key)))) (unless (assoc file epa-file-passphrase-alist) -- 1.7.10.4