Re: [Orgmode] Problem exporting to LaTeX/PDF from command line

[Nick Dokos]

Francesco Pizzolante <address@hidden> wrote:

> Hi,
> 
> I forgot to mention that, of course, when I do the same operation within
> Emacs, using the C-c C-e l, the file is exported without problem.
> 
> Any idea?
> 

I tried a little debugging on this, but I didn't get very far before I
ran out of time. The re-search-forward for "#+LaTeX_CLASS_OPTIONS" in
org-export-latex-set-initial-vars fails and it looks to me like a rather
subtle problem: the temp file buffer looks empty. Whether that's the
fault of the with-temp-file-buffer macro or something else, I'm not
sure.

Nick

> 
> Francesco Pizzolante wrote:
> > Hi,
> >
> > I'm trying to write a shell script in order to convert/export Org files to
> > LaTeX/PDF from the command line (org2tex/org2pdf). The whole process works
> > well, except that it seems that some bits of the exportation are not 
> > executed.
> >
> > Here's an example of what I do.
> >
> > I'm using the org-interaction.el file from Blorgit:
> >
> > (require 'org)
> > (require 'cl)
> >
> > (setq font-lock-mode t)
> >
> > (defun refresh-then-find-file (file)
> >   "Find file ensuring that the latest changes on disk are
> > represented in the file."
> >   (let (file-buf)
> >     (while (setq file-buf (get-file-buffer file))
> >       (kill-buffer file-buf))
> >     (find-file file)))
> >
> > (defmacro with-temp-filebuffer (file &rest body)
> >   "Open FILE into a temporary buffer execute BODY there like
> > `progn', then kill the FILE buffer returning the result of
> > evaluating BODY."
> >   (let ((temp-result (make-symbol "temp-result"))
> >         (temp-file (make-symbol "temp-file")))
> >     `(let (,temp-result ,temp-file)
> >        (refresh-then-find-file ,file)
> >        (setf ,temp-file (current-buffer))
> >        (setf ,temp-result (progn ,@body))
> >        (kill-buffer ,temp-file)
> >        ,temp-result)))
> >
> > ;; (defvar org-interaction-prefix ".exported_")
> > (defvar org-interaction-prefix "")
> >
> > (defun org-file-to-html (file-path)
> >   "Open up an org file, publish it to html, and then return the
> > html as a string."
> >   (let* ((file-name (file-name-nondirectory file-path))
> >          (file-dir (file-name-directory file-path))
> >          (html-path (expand-file-name (concat org-interaction-prefix 
> > file-name) file-dir)))
> >     (if (and (file-exists-p html-path)
> >              (< 0 (time-to-seconds
> >                    (time-subtract
> >                     (nth 5 (file-attributes html-path))
> >                     (nth 5 (file-attributes file-path))))))
> >         html-path
> >       (with-temp-filebuffer
> >        file-path
> >        (org-mode)
> >        (save-window-excursion
> >          (org-export-as-html-to-buffer nil)
> >          (write-file html-path)
> >          (kill-buffer (current-buffer)))))))
> >
> > (defun org-file-to-latex (file-path)
> >   "Open up an org file, publish it to latex, and then return the
> > latex as a string."
> >   (let* ((file-name (file-name-nondirectory file-path))
> >          (file-dir (file-name-directory file-path))
> >          (latex-path (expand-file-name (concat org-interaction-prefix 
> > file-name ".tex") file-dir)))
> >     (if (and (file-exists-p latex-path)
> >              (< 0 (time-to-seconds
> >                    (time-subtract
> >                     (nth 5 (file-attributes latex-path))
> >                     (nth 5 (file-attributes file-path))))))
> >         latex-path
> >       (with-temp-filebuffer
> >        file-path
> >        (org-mode)
> >        (save-window-excursion
> >          (org-export-as-latex-to-buffer nil)
> >          (write-file latex-path)
> >          (kill-buffer (current-buffer)))))))
> >
> > (defun org-file-to-pdf (file-path)
> >   "Open up an org file and export it as pdf."
> >   (let* ((file-name (file-name-sans-extension file-path))
> >          (file-dir (file-name-directory file-path))
> >          (org-tmp-path (make-temp-file "org-file-to-pdf-"))
> >          (pdf-tmp-path (concat org-tmp-path ".pdf"))
> >          (tex-tmp-path (concat org-tmp-path ".tex"))
> >          (pdf-path (expand-file-name (concat org-interaction-prefix 
> > file-name ".pdf") file-dir)))
> >     (if (and (file-exists-p pdf-path)
> >              (< 0 (time-to-seconds
> >                    (time-subtract
> >                     (nth 5 (file-attributes pdf-path))
> >                     (nth 5 (file-attributes file-path))))))
> >         pdf-path
> >       (with-temp-filebuffer
> >        file-path
> >        (write-file org-tmp-path)
> >        (org-mode)
> >        (save-window-excursion
> >          (org-export-as-pdf nil)
> >          (rename-file pdf-tmp-path pdf-path t)
> >          (delete-file org-tmp-path)
> > ;;         (delete-file tex-tmp-path)
> >          (kill-buffer (current-buffer)))))))
> >
> > ;; customization
> > ;; (setq org-export-blocks-witheld '(hidden comment))
> >
> > ;; Start the server
> > ;; (server-start)
> >
> > ;; save the emacsclient server socket location
> > ;; (with-temp-file "/tmp/emacsclient-socket-dir"
> > ;;   (insert server-socket-dir))
> >
> >
> > Here's the file I'm trying to convert (test.org):
> >
> > #+TITLE:   Features report
> > #+AUTHOR:    Francesco Pizzolante
> > #+EMAIL:     address@hidden
> > #+DATE:      2010-04-19
> > #+DESCRIPTION:
> > #+KEYWORDS:
> > #+LANGUAGE: en_US
> >
> > #+LaTeX_CLASS_OPTIONS: [a4paper]
> >
> > * First test
> > ** tatatata
> >
> >
> > On the command line, I run the following command:
> >
> > emacs --batch -l org-interaction.el --eval "(org-file-to-latex  
> > \"~/test.org\")"
> >
> >
> > My observation is that the #+LATEX_CLASS_OPTIONS are not taken into 
> > account. I
> > can add any option there, I always see the default one (11pt).
> >
> > It is really strange because if I add a #+LATEX_CLASS directive, this one is
> > well taken into account and I get the desired class.
> >
> > I don't know whether it's a bug somewhere or whether I miss some arguments
> > somewhere...
> >
> > I also tested whith Blorgit and it is the same behavior (options not
> > exported).
> >
> > Thanks a lot for your help,
> > Francesco
> 
> 
> _______________________________________________
> Emacs-orgmode mailing list
> Please use `Reply All' to send replies to the list.
> address@hidden
> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
>