ox-koma-letter: Fix closing part

* contrib/lisp/ox-koma-letter.el (org-koma-letter--build-settings): Do
  not translate closing part twice.

Reported-by: Tobias Zawada <i_inbox@tn-home.de>
<http://lists.gnu.org/r/emacs-orgmode/2018-06/msg00315.html>
This commit is contained in:
Nicolas Goaziou 2018-06-23 23:22:03 +02:00
parent 8e54cafeb2
commit a8677adb49
1 changed files with 3 additions and 5 deletions

View File

@ -818,11 +818,9 @@ a communication channel."
;; Signature.
(let* ((heading-val
(and (plist-get info :with-headline-opening)
(org-string-nw-p
(org-trim
(org-export-data
(org-koma-letter--get-tagged-contents 'closing)
info)))))
(pcase (org-koma-letter--get-tagged-contents 'closing)
((and (pred org-string-nw-p) closing) (org-trim closing))
(_ nil))))
(signature (org-string-nw-p (plist-get info :signature)))
(signature-scope (funcall check-scope 'signature)))
(and (or (and signature signature-scope)