mu4e - Add extra header

gistfile1.el

(add-hook 'mu4e-compose-mode-hook
	  (lambda ()
	    (let* ((em-v (prin1-to-string emacs-version t))
		   (ua (format "mu4e/%s Emacs/%s (%s)\n" mu4e-mu-version em-v (symbol-name system-type))))
	      
	      (save-excursion
		(message-add-header (concat
				     "X-GPG-Key-ID: 1E028EA5\n"
				     "X-GPG-Key: http://keyserver.mine.nu/pks/lookup?op=get&search=0x1E028EA5\n"
				     "X-GPG-Fingerprint: FDB0 EE1F 33E5 8C22 5E3E 96E7 6900 CA9B 1E02 8EA5\n"
				     "X-Charlie: #jesuischarlie\n"
				     "Organization: GNU's Not UNIX!\n"
				     "User-Agent: " ua
				     "Jabber-ID: [email protected]\n"))))))