X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=epa-file.el;h=093c66ee002658af81d020e907f65ac2fdfa9124;hb=3c0243c9e94a1185749b53a334b3358fa0d5bd8f;hp=62322c6aa995a11c4dfc72813691692d48b7fd38;hpb=0cdbc96b705d4e3b521e37464323a66f114969ba;p=elisp%2Fepg.git diff --git a/epa-file.el b/epa-file.el index 62322c6..093c66e 100644 --- a/epa-file.el +++ b/epa-file.el @@ -25,7 +25,7 @@ (require 'epa) -(defgroup 'epa-file nil +(defgroup epa-file nil "The EasyPG Assistant hooks for transparent file encryption" :group 'epa) @@ -44,11 +44,14 @@ (hack-local-variables) (auto-save-mode nil)) (goto-char (point-min)) + (if (fboundp 'set-buffer-multibyte) + (set-buffer-multibyte t)) (insert (epg-decrypt-file (epg-make-context) (expand-file-name (buffer-file-name)) nil)) (delete-region (point) (point-max)) - (decode-coding-region (point-min) (point-max) 'undecided)) + (decode-coding-region (point-min) (point-max) 'undecided) + (set-buffer-modified-p nil)) (make-local-variable 'epa-file) (setq epa-file (buffer-file-name))))