epg-gpg-program)
(mapconcat #'identity args " ")))))
(with-current-buffer buffer
+ (make-local-variable 'epg-last-status)
+ (setq epg-last-status nil)
(make-local-variable 'epg-read-point)
(setq epg-read-point (point-min))
(make-local-variable 'epg-process-filter-running)
(make-local-variable 'epg-key-id)
(setq epg-key-id nil)
(make-local-variable 'epg-context)
- (setq epg-context context)
- (make-local-variable 'epg-last-status)
- (setq epg-last-status nil))
+ (setq epg-context context))
(unwind-protect
(progn
(set-default-file-modes 448)