diff options
Diffstat (limited to 'lisp/epg-config.el')
| -rw-r--r-- | lisp/epg-config.el | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/lisp/epg-config.el b/lisp/epg-config.el index 39d264c05ad..fb866df3920 100644 --- a/lisp/epg-config.el +++ b/lisp/epg-config.el @@ -174,13 +174,10 @@ version requirement is met." (defun epg-config--make-gpg-configuration (program) (let (config groups type args) (with-temp-buffer - (apply #'call-process program nil - (list t (and (boundp 'trace-level) (> trace-level 0))) nil + (apply #'call-process program nil (list t nil) nil (append (if epg-gpg-home-directory (list "--homedir" epg-gpg-home-directory)) '("--with-colons" "--list-config"))) - (when (and (boundp 'trace-level) (> trace-level 0)) - (trace-values (concat "gpg output:\n" (buffer-string)))) (goto-char (point-min)) (while (re-search-forward "^cfg:\\([^:]+\\):\\(.*\\)" nil t) (setq type (intern (match-string 1)) |