mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-08-25 01:32:52 +00:00
LaTeX export: Skip title command when there is no title
Using "#+TITLE:" without a value make the LaTeX export ignore the value of org-export-latex-title-command.
This commit is contained in:
parent
3788dc336f
commit
6677f745cc
|
@ -1,5 +1,10 @@
|
||||||
2009-07-27 Carsten Dominik <carsten.dominik@gmail.com>
|
2009-07-27 Carsten Dominik <carsten.dominik@gmail.com>
|
||||||
|
|
||||||
|
* org-latex.el (org-export-latex-make-header): Only insert title
|
||||||
|
if one is defined.
|
||||||
|
|
||||||
|
* org.el (org-make-options-regexp): Allow empty values.
|
||||||
|
|
||||||
* org-html.el (org-export-as-html): Move hrule detection to after
|
* org-html.el (org-export-as-html): Move hrule detection to after
|
||||||
plain list handling.
|
plain list handling.
|
||||||
|
|
||||||
|
|
|
@ -940,9 +940,10 @@ OPT-PLIST is the options plist for current buffer."
|
||||||
;; beginning of the document
|
;; beginning of the document
|
||||||
"\n\\begin{document}\n\n"
|
"\n\\begin{document}\n\n"
|
||||||
;; insert the title command
|
;; insert the title command
|
||||||
|
(when (string-match "\\S-" title)
|
||||||
(if (string-match "%s" org-export-latex-title-command)
|
(if (string-match "%s" org-export-latex-title-command)
|
||||||
(format org-export-latex-title-command title)
|
(format org-export-latex-title-command title)
|
||||||
org-export-latex-title-command)
|
org-export-latex-title-command))
|
||||||
"\n\n"
|
"\n\n"
|
||||||
;; table of contents
|
;; table of contents
|
||||||
(when (and org-export-with-toc
|
(when (and org-export-with-toc
|
||||||
|
|
|
@ -16509,7 +16509,7 @@ Show the heading too, if it is currently invisible."
|
||||||
(mapconcat 'regexp-quote kwds "\\|")
|
(mapconcat 'regexp-quote kwds "\\|")
|
||||||
(if extra (concat "\\|" extra))
|
(if extra (concat "\\|" extra))
|
||||||
"\\):[ \t]*"
|
"\\):[ \t]*"
|
||||||
"\\(.+\\)"))
|
"\\(.*\\)"))
|
||||||
|
|
||||||
;; Make isearch reveal the necessary context
|
;; Make isearch reveal the necessary context
|
||||||
(defun org-isearch-end ()
|
(defun org-isearch-end ()
|
||||||
|
|
Loading…
Reference in a new issue