From 4d42d1d351fbdd236a11ae86f7d0796337e629b3 Mon Sep 17 00:00:00 2001 From: Noam Postavsky Date: Sat, 14 Jul 2018 20:04:25 -0400 Subject: [PATCH] ; Trace gpg stderr config output during epg-tests (Bug#23561) --- lisp/epg-config.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/epg-config.el b/lisp/epg-config.el index e5fd12d9679..85434985d39 100644 --- a/lisp/epg-config.el +++ b/lisp/epg-config.el @@ -171,7 +171,8 @@ 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 nil) nil + (apply #'call-process program nil + (list t (and (boundp 'trace-level) (> trace-level 0))) nil (append (if epg-gpg-home-directory (list "--homedir" epg-gpg-home-directory)) '("--with-colons" "--list-config"))) -- 2.39.2