emacs-orgmode
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [O] ox-koma-letter: how to use @@LaTeX:@@ specific commands in #+ di


From: Rasmus
Subject: Re: [O] ox-koma-letter: how to use @@LaTeX:@@ specific commands in #+ directives
Date: Thu, 18 Jun 2015 23:01:52 +0200
User-agent: Gnus/5.130014 (Ma Gnus v0.14) Emacs/25.0.50 (gnu/linux)

Eric S Fraga <address@hidden> writes:

> with this patch, exporting to koma-letter doesn't work for me.  I've not
> investigated properly yet but thought I'd give you a heads up on
> this.  

Thanks.  I don't really know where exactly it breaks with a minimal
example.  It works on my PC.  Anyway, this patch adds only a few parsed
keywords.  Does it work with your letter?

-- 
A page of history is worth a volume of logic
>From fc999a651773353d105fca59a0044d4945a6241d Mon Sep 17 00:00:00 2001
From: Rasmus <address@hidden>
Date: Thu, 18 Jun 2015 10:34:17 +0200
Subject: [PATCH 2/2] ox-koma-letter: Parse more keywords

* ox-koma-letter.el (koma-letter): Parse author, phone-number,
  opening, closing and signature.
  (org-koma-letter-template): parse closing.
---
 contrib/lisp/ox-koma-letter.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/contrib/lisp/ox-koma-letter.el b/contrib/lisp/ox-koma-letter.el
index 119ffe9..e907fd7 100644
--- a/contrib/lisp/ox-koma-letter.el
+++ b/contrib/lisp/ox-koma-letter.el
@@ -381,7 +381,7 @@ e.g. \"title-subject:t\"."
   :options-alist
   '((:latex-class "LATEX_CLASS" nil org-koma-letter-default-class t)
     (:lco "LCO" nil org-koma-letter-class-option-file)
-    (:author "AUTHOR" nil (org-koma-letter--get-value org-koma-letter-author) 
t)
+    (:author "AUTHOR" nil (org-koma-letter--get-value org-koma-letter-author) 
parse)
     (:author-changed-in-buffer-p "AUTHOR" nil nil t)
     (:from-address "FROM_ADDRESS" nil org-koma-letter-from-address newline)
     (:phone-number "PHONE_NUMBER" nil org-koma-letter-phone-number)
@@ -389,8 +389,8 @@ e.g. \"title-subject:t\"."
     (:to-address "TO_ADDRESS" nil nil newline)
     (:place "PLACE" nil org-koma-letter-place)
     (:subject "SUBJECT" nil nil parse)
-    (:opening "OPENING" nil org-koma-letter-opening)
-    (:closing "CLOSING" nil org-koma-letter-closing)
+    (:opening "OPENING" nil org-koma-letter-opening parse)
+    (:closing "CLOSING" nil org-koma-letter-closing parse)
     (:signature "SIGNATURE" nil org-koma-letter-signature newline)
     (:special-headings nil "special-headings"
                       org-koma-letter-prefer-special-headings)
@@ -665,7 +665,7 @@ holding export options."
    ;; Letter body.
    contents
    ;; Closing.
-   (format "\n\\closing{%s}\n" (plist-get info :closing))
+   (format "\n\\closing{%s}\n" (org-export-data (plist-get info :closing) 
info))
    (org-koma-letter--special-contents-as-macro
     (plist-get info :with-after-closing))
    ;; Letter end.
-- 
2.4.4


reply via email to

[Prev in Thread] Current Thread [Next in Thread]