diff options
| author | Arun Isaac | 2020-03-13 18:21:43 +0530 |
|---|---|---|
| committer | Arun Isaac | 2020-03-13 18:21:43 +0530 |
| commit | d0c7b3114734765165be773945a14eec58faf352 (patch) | |
| tree | 3e6adf502d962468aa3bce6afc9b13a01514dffd /ennu-html.el | |
| parent | 188efd7f47ffd620aff8eecfe5d8fdd2fc9bf397 (diff) | |
| download | ennum-d0c7b3114734765165be773945a14eec58faf352.tar.gz ennum-d0c7b3114734765165be773945a14eec58faf352.tar.lz ennum-d0c7b3114734765165be773945a14eec58faf352.zip | |
Publish interlanguage links only if there are translations.
* ennu-html.el (ennu-html-inner-template): Publish interlanguage links
only if there are translations.
Diffstat (limited to 'ennu-html.el')
| -rw-r--r-- | ennu-html.el | 25 |
1 files changed, 13 insertions, 12 deletions
diff --git a/ennu-html.el b/ennu-html.el index f78f357..93dc221 100644 --- a/ennu-html.el +++ b/ennu-html.el @@ -231,18 +231,19 @@ :datetime ,(org-export-get-date info "%Y-%m-%d 12:00:00") ,(org-export-get-date info "%B %d, %Y")))))))) ;; Interlanguage language links - (format "<p>In other languages: %s</p>" - (mapconcat - (lambda (translation) - (let ((lang (ennu-post-language translation)) - (slug (ennu-post-slug translation))) - (replace-regexp-in-string - "<a " (format "<a hreflang=\"%s\" " lang) - (ennu-export-post slug - (map-elt ennu--iso-639-1-alist lang nil 'string=) - (plist-get info :back-end))))) - (plist-get info :translations) - ", ")) + (when-let (translations (plist-get info :translations)) + (format "<p>In other languages: %s</p>" + (mapconcat + (lambda (translation) + (let ((lang (ennu-post-language translation)) + (slug (ennu-post-slug translation))) + (replace-regexp-in-string + "<a " (format "<a hreflang=\"%s\" " lang) + (ennu-export-post slug + (map-elt ennu--iso-639-1-alist lang nil 'string=) + (plist-get info :back-end))))) + translations + ", "))) ;; Tags (format "<p>Tags: %s</p>" (mapconcat |