From 76e38e8c545c623411af3a86ba896892f98f500b Mon Sep 17 00:00:00 2001
From: Marco Wahl <marcowahlsoft@gmail.com>
Date: Sat, 14 Jul 2018 12:38:08 +0200
Subject: [PATCH] ox-koma-letter: Fix: Respect The "closing" Tag

* contrib/lisp/ox-koma-letter.el (org-koma-letter-template): Compare
  special-tag to string instead of symbol.  BTW indented and
  rearranged a few lines code.
---
 contrib/lisp/ox-koma-letter.el | 14 +++++++++-----
 1 file changed, 9 insertions(+), 5 deletions(-)

diff --git a/contrib/lisp/ox-koma-letter.el b/contrib/lisp/ox-koma-letter.el
index defa388bf..abc0c2873 100644
--- a/contrib/lisp/ox-koma-letter.el
+++ b/contrib/lisp/ox-koma-letter.el
@@ -767,17 +767,21 @@ holding export options."
    ;; Opening.
    (format "\\opening{%s}\n\n"
            (org-koma-letter--keyword-or-headline
-            :opening (lambda (h i) (not (org-koma-letter--special-tag h i)))
+            :opening
+	    (lambda (h i)
+	      (not (org-koma-letter--special-tag h i)))
             info))
    ;; Letter body.
    contents
    ;; Closing.
    (format "\\closing{%s}\n"
-           (org-koma-letter--keyword-or-headline
-            :closing
+	   (org-koma-letter--keyword-or-headline
+	    :closing
 	    (lambda (h i)
-	      (eq (org-koma-letter--special-tag h i) 'closing))
-            info))
+	      (let ((special-tag (org-koma-letter--special-tag h i)))
+		(and special-tag
+		     (string= "closing" special-tag))))
+	    info))
    (org-koma-letter--special-contents-inline
     (plist-get info :special-tags-after-closing) info)
    ;; Letter end.