emacs-orgmode
[Top][All Lists]
Advanced

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

Re: [O] How to reuse page keywords for LaTeX with pdfkeywords and hyperr


From: Mikhail Titov
Subject: Re: [O] How to reuse page keywords for LaTeX with pdfkeywords and hyperref package?
Date: Sat, 27 Aug 2011 12:15:24 -0500
User-agent: Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.9.2.18) Gecko/20110617 Lightning/1.0b2 Thunderbird/3.1.11

In case someone else also wants page keywords to appear in latex export.
Here is the link to original thread
http://lists.gnu.org/archive/html/emacs-orgmode/2011-03/msg01429.html .
There is a patch at the bottom that does that. It assumes that hyperred
package is used and doesn't check that!
I'm not sure if I'm doing it right as I don't know lisp and emacs much.

Mikhail

>From ee027f75db3df6b16ccb2e8f96916fe7274655f3 Mon Sep 17 00:00:00 2001
From: Mikhail Titov <address@hidden>
Date: Sat, 27 Aug 2011 11:59:06 -0500
Subject: [PATCH] Set keywords and subject fields in pdf

---
 lisp/org-latex.el |   13 +++++++++++++
 1 files changed, 13 insertions(+), 0 deletions(-)

diff --git a/lisp/org-latex.el b/lisp/org-latex.el
index 17626b5..4c35528 100644
--- a/lisp/org-latex.el
+++ b/lisp/org-latex.el
@@ -1391,6 +1391,10 @@ OPT-PLIST is the options plist for current buffer."
   (let ((toc (plist-get opt-plist :table-of-contents))
     (author (org-export-apply-macros-in-string
          (plist-get opt-plist :author)))
+    (description (org-export-apply-macros-in-string
+         (plist-get opt-plist :description)))
+    (keywords (org-export-apply-macros-in-string
+         (plist-get opt-plist :keywords)))
     (email (replace-regexp-in-string
         "_" "\\\\_"
         (org-export-apply-macros-in-string
@@ -1428,6 +1432,15 @@ OPT-PLIST is the options plist for current buffer."
          (format-time-string
           (or (plist-get opt-plist :date)
           org-export-latex-date-format)))
+     ;; add pdf things
+     "\\hypersetup{\n"
+     ;; " pdfinfo={\n"           
+     (format "  pdfkeywords={%s},\n"
+         (org-export-latex-fontify-headline keywords))
+     (format "  pdfsubject={%s}\n"
+         (org-export-latex-fontify-headline description))
+     ;;" }\n"
+     "}\n"
      ;; beginning of the document
      "\n\\begin{document}\n\n"
      ;; insert the title command
-- 
1.7.4.1





reply via email to

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