diff options
| author | Noam Postavsky <npostavs@gmail.com> | 2018-07-14 18:31:49 -0400 |
|---|---|---|
| committer | Noam Postavsky <npostavs@gmail.com> | 2018-07-14 18:33:58 -0400 |
| commit | bc7ed164b88710a7f79cab7a1e7915ab11392216 (patch) | |
| tree | 6a5913e729fbfee8f4554480c9fc86541f0a7df7 /lisp/epg-config.el | |
| parent | 155d7303808345dd73427302d9a352ec5461c11a (diff) | |
| download | emacs-bc7ed164b88710a7f79cab7a1e7915ab11392216.tar.gz | |
; Further tracing of epg-tests gpg config (Bug#23561)
Diffstat (limited to 'lisp/epg-config.el')
| -rw-r--r-- | lisp/epg-config.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/epg-config.el b/lisp/epg-config.el index 98f458d9962..e5fd12d9679 100644 --- a/lisp/epg-config.el +++ b/lisp/epg-config.el @@ -175,6 +175,8 @@ version requirement is met." (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)) |