Commit d9bb0d48 authored by Adam Sjøgren's avatar Adam Sjøgren Committed by Katsumi Yamaoka
Browse files

lisp/gnus/mml2015.el (mml2015-epg-key-image): Wrap epg-gpg-program in shell-quote-argument

parent cd27a76d
2013-02-25 Adam Sjøgren <>
* mml2015-el (mml2015-epg-key-image): Wrap epg-gpg-program in
2013-02-22 David Engster <>
* gnus-registry.el (gnus-registry-save): Provide class name when
......@@ -865,7 +865,7 @@ If set, it overrides the setting of `mml2015-sign-with-sender'."
(coding-system-for-read 'binary)
(data (shell-command-to-string
(format "%s --list-options no-show-photos --attribute-fd 3 --list-keys %s 3>&1 >/dev/null 2>&1"
epg-gpg-program key-id))))
(shell-quote-argument epg-gpg-program) key-id))))
(when (> (length data) 0)
(insert (substring data 16))
(create-image (buffer-string) nil t)))))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment