Don't export address field if empty

This commit is contained in:
Óscar Nájera 2018-04-25 13:45:33 +02:00
parent 7b0c4ca1aa
commit 7e4af5d18e

View file

@ -139,7 +139,8 @@ holding export options."
"\\personalinfo{\n" "\\personalinfo{\n"
;; address ;; address
(let ((address (org-export-data (plist-get info :address) info))) (let ((address (org-export-data (plist-get info :address) info)))
(when address (format "\\mailaddress{%s}\n" (mapconcat (lambda (line) (format "%s" line)) (when (org-string-nw-p address) (format "\\mailaddress{%s}\n"
(mapconcat (lambda (line) (format "%s" line))
(split-string address "\n") " -- ")))) (split-string address "\n") " -- "))))
;; email ;; email
(let ((email (and (plist-get info :with-email) (let ((email (and (plist-get info :with-email)