emacs-orgmode
[Top][All Lists]
Advanced

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

[PATCH] Make pdf command and args customizable. [was: [Orgmode] Feature


From: Nick Dokos
Subject: [PATCH] Make pdf command and args customizable. [was: [Orgmode] Feature request: an org user variable for which "latex" command to run]
Date: Wed, 22 Apr 2009 12:47:49 -0400

Here's a patch to make the command and its arguments customizable. The
patch organizes the customization groups as follows:

        org-export -> org-export-latex -> org-export-pdf


I don't know if Carsten will want to apply it, but even if he does, he
might want to tweak the customization groups differently.

Nick

Add variables for the pdf command and its args and create
appropriate customization tree structure.
---
 lisp/org-latex.el |   25 +++++++++++++++++++------
 1 files changed, 19 insertions(+), 6 deletions(-)

diff --git a/lisp/org-latex.el b/lisp/org-latex.el
index 9371b24..c56690d 100644
--- a/lisp/org-latex.el
+++ b/lisp/org-latex.el
@@ -292,16 +292,25 @@ only postscript files can be included."
 
 (defgroup org-export-pdf nil
   "Options for exporting Org-mode files to PDF, via LaTeX."
-  :tag "Org Export LaTeX"
-  :group 'org-export-latex
-  :group 'org-export)
+  :tag "Org Export PDF"
+  :group 'org-export-latex)
 
 (defcustom org-export-pdf-remove-logfiles t
   "Non-nil means, remove the logfiles produced by PDF production.
 These are the .aux, .log, .out, and .toc files."
-  :group 'org-export-latex
+  :group 'org-export-pdf
   :type 'boolean)
 
+(defcustom org-export-pdf-command "pdflatex"
+  "Command to produce PDF."
+  :group 'org-export-pdf
+  :type 'string)
+
+(defcustom org-export-pdf-command-args "-interaction nonstopmode"
+  "Command args for org-export-pdf-command."
+  :group 'org-export-pdf
+  :type 'string)
+
 ;;; Autoload functions:
 
 ;;;###autoload
@@ -550,9 +559,13 @@ when PUB-DIR is set, use this as the publishing directory."
         (pdffile (concat base ".pdf")))
     (and (file-exists-p pdffile) (delete-file pdffile))
     (message "Processing LaTeX file...")
-    (shell-command (format "pdflatex -interaction nonstopmode %s"
+    (shell-command (format "%s %s %s"
+                           org-export-pdf-command
+                           org-export-pdf-command-args
                           (shell-quote-argument file)))
-    (shell-command (format "pdflatex -interaction nonstopmode %s"
+    (shell-command (format "%s %s %s"
+                           org-export-pdf-command
+                           org-export-pdf-command-args
                           (shell-quote-argument file)))
     (message "Processing LaTeX file...done")
     (if (not (file-exists-p pdffile))
-- 
1.5.4.3






reply via email to

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