X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=epa-file.el;h=093c66ee002658af81d020e907f65ac2fdfa9124;hb=3c0243c9e94a1185749b53a334b3358fa0d5bd8f;hp=e2169991086689b435fc6995d20e0d878c51e0e3;hpb=d9a0c1d079435cd5041e28380e5236e9479f1a23;p=elisp%2Fepg.git diff --git a/epa-file.el b/epa-file.el index e216999..093c66e 100644 --- a/epa-file.el +++ b/epa-file.el @@ -25,7 +25,7 @@ (require 'epa) -(defgroup 'epa-file +(defgroup epa-file nil "The EasyPG Assistant hooks for transparent file encryption" :group 'epa) @@ -44,10 +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))) + (delete-region (point) (point-max)) + (decode-coding-region (point-min) (point-max) 'undecided) + (set-buffer-modified-p nil)) (make-local-variable 'epa-file) (setq epa-file (buffer-file-name))))