Re: Bug: Can't set org-export-latex-title-command using #+BIND: [6.33trans]

[Carsten Dominik <carsten.dominik@gmail.com>]

Hi Christopher,

I believe this might be fixed now - please verify!

Thanks

- Carsten

On Dec 20, 2009, at 6:40 PM, Christopher Suckling wrote:

> On Sun, 20 Dec 2009 13:29:59 +0100, Carsten Dominik <carsten.dominik@gmail.com 
> > wrote:
>
> Thank you, but not quite working yet:
>
> ,----
> | #+BIND: org-export-latex-title-command ""
> `----
>
> now appears to be having the *effect* of setting a global variable.
>
> I load Emacs then visit the below test org file. I then export the  
> file.
>
> I get a \maketitle line.
>
> I then C-c C-c on the #+BIND: line and re-export.
>
> \maketitle is removed.
>
> I then export another org file without the #+BIND: line.
>
> There is no \maketitle, even though there should be.
>
> I add
>
> ,----
> | #+BIND: org-export-latex-title-command "\foobar"
> `----
>
> to the new org file, C-c C-c and export:
>
> \foobar is added to the exported file.
>
> Finally, I re-export the original test org file (without C-c C-c on  
> the
> #+BIND: line):
>
> \foobar is added to the exported file.
>
> However,
>
> ,----
> | C-h v org-export-latex-title-command
> `----
>
> always returns the value "\\maketitle", no matter what the value of  
> the
> #+BIND: line.
>
> Best, Christopher
>
>> Fixed, thanks
>>
>> - Carsten
>>
>> On Dec 20, 2009, at 11:58 AM, Christopher Suckling wrote:
>>
>>>
>>> Remember to cover the basics, that is, what you expected to happen  
>>> and
>>> what in fact did happen.  You don't know how to make a good report?
>>> See
>>>
>>>    http://orgmode.org/manual/Feedback.html#Feedback
>>>
>>> Your bug report will be posted to the Org-mode mailing list.
>>> ------------------------------------------------------------------------
>>>
>>> Using the following test file:
>>>
>>> ,----
>>> | # -*- mode: org; -*-
>>> |
>>> | * Tree
>>> | ** Subtree
>>> |    I want no \maketitle command
>>> |
>>> | * COMMENT Local variables
>>> | #+BIND: org-export-latex-title-command ""
>>> |
>>> | # Local Variables:
>>> | # End:
>>> `----
>>>
>>> exporting to latex yields:
>>>
>>> ,----
>>> | % Created 2009-12-20 Sun 10:52
>>> | % BEGIN defaults
>>> | \documentclass[a4paper, 12pt]{memoir}
>>> | \usepackage{org-export}
>>> |  % END defaults
>>> |
>>> |
>>> | \title{test}
>>> | \author{Christopher Suckling}
>>> | \date{20 December 2009}
>>> |
>>> | \begin{document}
>>> |
>>> | \maketitle
>>> |
>>> | \setcounter{tocdepth}{3}
>>> | \tableofcontents
>>> | \vspace*{1cm}
>>> |
>>> | \chapter{Tree}
>>> | \label{sec-1}
>>> | \section{Subtree}
>>> | \label{sec-1.1}
>>> |
>>> |    I want no \maketitle command
>>> |
>>> | \end{document}
>>> `----
>>>
>>> Evaluating
>>>
>>> ,----
>>> | (setq org-export-latex-title-command "")
>>> `----
>>>
>>> prior to export successfully removes \maketitle.
>>>
>>>
>>> Best, Christopher
>>>
>>>
>>> Emacs  : GNU Emacs 23.1.50.1 (x86_64-apple-darwin10.2.0, NS apple-
>>> appkit-1038.25)
>>> of 2009-12-08 on rushka.local
>>> Package: Org-mode version 6.33trans
>>>
>>> current state:
>>> ==============
>>> (setq
>>> org-export-latex-default-class "org-export"
>>> org-export-latex-after-initial-vars-hook '(org-beamer-after-initial-
>>> vars)
>>> org-todo-keyword-faces '(("CANCELLED" :foreground "gray40" :weight
>>> bold)
>>> 			  ("DEFERRED" :foreground "olivedrab4" :weight bold)
>>> 			  ("OPEN" :foreground "red1" :weight bold :underline t
>>> 			   :slant italic)
>>> 			  ("TODO" :foreground "dodgerblue3" :weight bold)
>>> 			  ("NEXT" :foreground "navyblue" :weight bold)
>>> 			  ("WAITING" :foreground "red3" :weight bold)
>>> 			  ("DELEGATED" :foreground "deeppink4" :weight bold)
>>> 			  ("COMMENT" :foreground "RosyBrown4"))
>>> org-link-frame-setup '((vm . vm-visit-folder-other-frame)
>>> 			(gnus . org-gnus-no-new-news)
>>> 			(file . find-file-other-window))
>>> org-special-ctrl-a/e t
>>> org-agenda-custom-commands '(("d" "Today's effort" agenda ""
>>> 			       ((org-agenda-view-columns-initially t)
>>> 				(org-agenda-ndays 1))
>>> 			       )
>>> 			      ("W" "Weekly review"
>>> 			       ((agenda "" ((org-agenda-ndays 7)))
>>> 				(alltodo ""
>>> 				 ((org-agenda-files (list "~/Sites/org/"))
>>> 				  (org-agenda-file-regexp "^[^m].*_A\\.org$")
>>> 				  (org-agenda-todo-ignore-with-date t)
>>> 				  (org-agenda-sorting-strategy
>>> 				   (quote
>>> 				    (priority-down todo-state-down category-keep
>>> 				     tag-up effort-up)
>>> 				    )
>>> 				   )
>>> 				  (org-agenda-overriding-header
>>> 				   "Unscheduled TODO entries - work: ")
>>> 				  )
>>> 				 )
>>> 				(todo "WAITING|DELEGATED"
>>> 				 ((org-agenda-files (list "~/Sites/org/"))
>>> 				  (org-agenda-file-regexp "^[^m].*_A\\.org$")
>>> 				  (org-agenda-todo-ignore-scheduled nil)
>>> 				  (org-agenda-todo-ignore-deadlines nil)
>>> 				  (org-agenda-sorting-strategy
>>> 				   (quote
>>> 				    (priority-down todo-state-down tag-up
>>> 				     category-keep)
>>> 				    )
>>> 				   )
>>> 				  (org-agenda-overriding-header
>>> 				   "Awaiting response from others - work: ")
>>> 				  )
>>> 				 )
>>> 				)
>>> 			       )
>>> 			      ("I" "Import diary from iCal" agenda ""
>>> 			       ((org-agenda-mode-hook (lambda nil (org-mac-iCal)))))
>>> 			      ("F" "Import links to flagged mail" agenda ""
>>> 			       ((org-agenda-mode-hook
>>> 				 (lambda nil
>>> 				  (let ((org-mac-mail-account "Gmail"))
>>> 				   (org-mac-insert-flagged-mail "taskpool_A.org"
>>> 				    "Flagged mail")
>>> 				   )
>>> 				  )
>>> 				 )
>>> 				)
>>> 			       )
>>> 			      ("B" "Print shopping list"
>>> 			       ((tags-todo "buy"
>>> 				 ((org-agenda-prefix-format "  [ ] ")
>>> 				  (org-agenda-todo-keyword-format "%12s -----")
>>> 				  (org-agenda-overriding-header
>>> 				   "-------------\nShopping list\n-------------\n")
>>> 				  )
>>> 				 )
>>> 				)
>>> 			       ((org-agenda-compact-blocks t)
>>> 				(org-agenda-remove-tags t)
>>> 				(org-agenda-add-entry-text-maxlines 5)
>>> 				(htmlize-after-hook nil) (ps-number-of-columns 2)
>>> 				(ps-landscape-mode t) (ps-print-header nil)
>>> 				(org-finalize-agenda-hook
>>> 				 (lambda nil
>>> 				  (org-write-agenda "~/Desktop/shopping.pdf"))
>>> 				 )
>>> 				)
>>> 			       ("~/Desktop/shopping.pdf"))
>>> 			      ("D" "Print today's agenda"
>>> 			       ((agenda "" ((org-agenda-ndays 1)))
>>> 				(todo "NEXT"
>>> 				 ((org-agenda-sorting-strategy (quote (effort-up)))
>>> 				  (org-agenda-overriding-header
>>> 				   "\n------------\nNext actions\n------------")
>>> 				  )
>>> 				 )
>>> 				(todo "WAITING|DELEGATED"
>>> 				 ((org-agenda-files (list "~/Sites/org/"))
>>> 				  (org-agenda-file-regexp "^[^m.].*_A\\.org$")
>>> 				  (org-agenda-todo-ignore-scheduled nil)
>>> 				  (org-agenda-todo-ignore-deadlines nil)
>>> 				  (org-agenda-sorting-strategy
>>> 				   (quote
>>> 				    (priority-down todo-state-down tag-up
>>> 				     category-keep)
>>> 				    )
>>> 				   )
>>> 				  (org-agenda-overriding-header
>>> 				   "\n--------------------------------------\nAwaiting
>>> response from others - work:
>>> \n--------------------------------------")
>>> 				  )
>>> 				 )
>>> 				)
>>> 			       ((org-agenda-compact-blocks t)
>>> 				(org-agenda-remove-tags t)
>>> 				(org-agenda-add-entry-text-maxlines 3)
>>> 				(htmlize-after-hook nil) (ps-number-of-columns 2)
>>> 				(ps-landscape-mode t) (ps-print-header nil)
>>> 				(org-finalize-agenda-hook
>>> 				 (lambda nil
>>> 				  (org-write-agenda "~/Desktop/agenda.pdf"))
>>> 				 )
>>> 				)
>>> 			       ("~/Desktop/agenda.pdf"))
>>> 			      ("c" "Open current files in Finder" tags "@current"
>>> 			       ((org-finalize-agenda-hook
>>> 				 (lambda nil
>>> 				  (ns-service-Finder-Open
>>> 				   "~/Library/Saved Searches/current.savedSearch")
>>> 				  )
>>> 				 )
>>> 				)
>>> 			       )
>>> 			      ("n" todo "NEXT" nil) ("o" todo "OPEN" nil)
>>> 			      ("w" todo "WAITING|DELEGATED" nil)
>>> 			      ("x" todo "DONE|DEFERRED|CANCELLED" nil)
>>> 			      ("p" "Today's Priority #A tasks " tags-todo
>>> 			       "+PRIORITY=\"A\"+SCHEDULED=\"<today>\""
>>> 			       ((org-agenda-sorting-strategy (quote (effort-up)))
>>> 				(org-agenda-overriding-header
>>> 				 "Today's Priority #A tasks: ")
>>> 				)
>>> 			       )
>>> 			      ("P" "Priority #A tasks " tags-todo "+PRIORITY=\"A\""
>>> 			       ((org-agenda-skip-timestamp-if-done t)
>>> 				(org-agenda-sorting-strategy
>>> 				 (quote (todo-state-down effort-up category-keep)))
>>> 				(org-agenda-overriding-header "Priority #A tasks: "))
>>> 			       )
>>> 			      ("u" "Unscheduled TODO entries - work " alltodo ""
>>> 			       ((org-agenda-files (list "~/Sites/org/"))
>>> 				(org-agenda-file-regexp "^[^m].*_A\\.org$")
>>> 				(org-agenda-todo-ignore-with-date t)
>>> 				(org-agenda-sorting-strategy
>>> 				 (quote
>>> 				  (priority-down todo-state-down tag-up effort-up
>>> 				   category-keep)
>>> 				  )
>>> 				 )
>>> 				(org-agenda-overriding-header
>>> 				 "Unscheduled TODO entries - work: ")
>>> 				)
>>> 			       )
>>> 			      ("G" . "GTD contexts") ("Gw" "Work" tags-todo "@work")
>>> 			      ("Gh" "Home" tags-todo "@home")
>>> 			      ("Gc" "Cello" tags-todo "@cello")
>>> 			      ("Gi" "WWW" tags-todo "@www")
>>> 			      ("Gp" "Phone" tags-todo "@phone")
>>> 			      ("Go" "Colleague" tags-todo "@colleague")
>>> 			      ("Q" . "@mac queries")
>>> 			      ("Qw" "Weekly mac review"
>>> 			       ((tags-todo "+PRIORITY=\"A\""
>>> 				 ((org-agenda-skip-timestamp-if-done t)
>>> 				  (org-agenda-files (list "~/Sites/org/mac_A.org"))
>>> 				  (org-agenda-sorting-strategy
>>> 				   (quote
>>> 				    (todo-state-down category-keep tag-up effort-up))
>>> 				   )
>>> 				  (org-agenda-overriding-header
>>> 				   "Priority #A tasks: ")
>>> 				  )
>>> 				 )
>>> 				(todo "WAITING|DELEGATED"
>>> 				 ((org-agenda-files (list "~/Sites/org/mac_A.org"))
>>> 				  (org-agenda-todo-ignore-schedules nil)
>>> 				  (org-agenda-todo-ignore-deadlines nil)
>>> 				  (org-agenda-sorting-strategy
>>> 				   (quote
>>> 				    (priority-down todo-state-down tag-up
>>> 				     category-keep)
>>> 				    )
>>> 				   )
>>> 				  (org-agenda-overriding-header
>>> 				   "Awaiting response from others - @mac: ")
>>> 				  )
>>> 				 )
>>> 				(alltodo ""
>>> 				 ((org-agenda-files (list "~/Sites/org/mac_A.org"))
>>> 				  (org-agenda-sorting-strategy
>>> 				   (quote
>>> 				    (todo-state-down priority-down category-keep))
>>> 				   )
>>> 				  (org-agenda-overriding-header
>>> 				   "TODO entries - @mac: ")
>>> 				  )
>>> 				 )
>>> 				)
>>> 			       )
>>> 			      ("Qt" "TODO entries - @mac " alltodo ""
>>> 			       ((org-agenda-files (list "~/Sites/org/mac_A.org"))
>>> 				(org-agenda-sorting-strategy
>>> 				 (quote
>>> 				  (priority-down todo-state-down category-keep))
>>> 				 )
>>> 				(org-agenda-overriding-header
>>> 				 "TODO entries - @mac: ")
>>> 				)
>>> 			       )
>>> 			      ("Qx" tags "bug"
>>> 			       ((org-agenda-files (list "~/Sites/org/mac_A.org"))
>>> 				(org-agenda-sorting-strategy
>>> 				 (quote
>>> 				  (priority-down todo-state-down category-keep))
>>> 				 )
>>> 				(org-agenda-overriding-header "Too many bugs... "))
>>> 			       )
>>> 			      ("QF" "Import links to flagged mail" agenda ""
>>> 			       ((org-agenda-mode-hook
>>> 				 (lambda nil
>>> 				  (let ((org-mac-mail-account "Gmail - lists"))
>>> 				   (org-mac-insert-flagged-mail "mac_A.org"
>>> 				    "Flagged mail")
>>> 				   )
>>> 				  )
>>> 				 )
>>> 				)
>>> 			       )
>>> 			      )
>>> org-agenda-files '("~/Sites/org/taskpool_A.org" "~/Sites/org/
>>> DMA_A.org"
>>> 		    "~/Sites/org/teaching_A.org" "~/Sites/org/cello_A.org"
>>> 		    "~/Sites/org/serse_A.org" "~/Sites/org/R@S_A.org"
>>> 		    "~/Sites/org/mac_A.org")
>>> org-agenda-include-diary t
>>> org-blocker-hook '(org-block-todo-from-checkboxes
>>> 		    org-block-todo-from-children-or-siblings-or-parent)
>>> org-hide-leading-stars t
>>> org-gnus-prefer-web-links t
>>> org-completion-use-ido t
>>> org-mobile-post-pull-hook '((lambda nil
>>> 			      (find-file-other-window org-mobile-inbox-for-pull))
>>> 			     )
>>> org-after-todo-state-change-hook '(org-clock-out-if-current)
>>> org-archive-location "::* COMMENT Archive"
>>> org-goto-interface 'outline-path-completion
>>> org-special-ctrl-k t
>>> org-agenda-sorting-strategy '((agenda time-up todo-state-down
>>> category-keep)
>>> 			       (todo priority-down effort-up todo-state-down
>>> 				category-keep tag-up)
>>> 			       (tags priority-down tag-up effort-up todo-state-down
>>> 				category-keep)
>>> 			       (Search category-keep))
>>> org-agenda-prefix-format " %-12c%?-12t% s"
>>> org-after-todo-statistics-hook '(org-summary-todo)
>>> org-export-latex-format-toc-function 'org-export-latex-format-toc-
>>> default
>>> org-protocol-protocol-alist '(("org-mac-remember" :protocol "mac-
>>> remember"
>>> 				:function org-mac-protocol-remember :kill-client t)
>>> 			       )
>>> org-agenda-skip-scheduled-if-done t
>>> org-agenda-time-grid '((daily today require-timed) "--------------"
>>> 			(800 1000 1200 1400 1600 1800 2000 2200))
>>> org-export-preprocess-hook '(org-export-blocks-preprocess)
>>> org-tab-first-hook '(org-hide-block-toggle-maybe)
>>> org-src-mode-hook '(org-src-mode-configure-edit-buffer)
>>> org-mac-mail-account "Gmail"
>>> org-confirm-shell-link-function 'yes-or-no-p
>>> org-export-first-hook '(org-beamer-initialize-open-trackers)
>>> org-clock-persist t
>>> org-todo-keywords '((sequence "TODO(t!)" "OPEN(o!)" "NEXT(n!)"
>>> "WAITING(w@/!)"
>>> 		      "DELEGATED(d@/!)" "|" "DONE(x!)" "DEFERRED(z!)"
>>> 		      "CANCELLED(c!)" "COMMENT(h)")
>>> 		     )
>>> org-agenda-before-write-hook '(org-agenda-add-entry-text)
>>> org-default-notes-file "~/Sites/org/inbox.org"
>>> org-agenda-repeating-timestamp-show-all nil
>>> org-directory "~/Sites/org"
>>> org-cycle-hook '(org-cycle-hide-archived-subtrees org-cycle-hide-
>>> drawers
>>> 		  org-cycle-show-empty-lines
>>> 		  org-optimize-window-after-visibility-change)
>>> org-export-latex-classes '(("org-export"
>>> 			     "% BEGIN
>>> defaults\n\\documentclass[a4paper, 12pt]{memoir}\n\
>>> \usepackage{org-export}\n % END defaults"
>>> 			     ("\\chapter{%s}" . "\\chapter*{%s}")
>>> 			     ("\\section{%s}" . "\\section*{%s}")
>>> 			     ("\\subsection{%s}" . "\\subsection*{%s}")
>>> 			     ("\\subsubsection{%s}" . "\\subsubsection*{%s}")
>>> 			     ("\\paragraph{%s}" . "\\paragraph*{%s}")
>>> 			     ("\\subparagraph{%s}" . "\\subparagraph*{e%s}"))
>>> 			    ("dmareport"
>>> 			     "% BEGIN
>>> defaults\n\\documentclass[a4paper, 12pt]{memoir}\n\
>>> \usepackage{dma-report}\n % END defaults"
>>> 			     ("\\section{%s}" . "\\section*{%s}")
>>> 			     ("\\subsection{%s}" . "\\subsection*{%s}")
>>> 			     ("\\subsubsection{%s}" . "\\subsubsection*{%s}")
>>> 			     ("\\paragraph{%s}" . "\\paragraph*{%s}")
>>> 			     ("\\subparagraph{%s}" . "\\subparagraph*{e%s}"))
>>> 			    (("article"
>>> 			      "\\documentclass[11pt]{article}\n\\usepackage[utf8]
>>> {inputenc}\n\\usepackage[T1]{fontenc}\n\\usepackage{graphicx}\n\
>>> \usepackage{longtable}\n\\usepackage{float}\n\\usepackage{wrapfig} 
>>> \n\
>>> \usepackage{soul}\n\\usepackage{amssymb}\n\\usepackage{hyperref}"
>>> 			      ("\\section{%s}" . "\\section*{%s}")
>>> 			      ("\\subsection{%s}" . "\\subsection*{%s}")
>>> 			      ("\\subsubsection{%s}" . "\\subsubsection*{%s}")
>>> 			      ("\\paragraph{%s}" . "\\paragraph*{%s}")
>>> 			      ("\\subparagraph{%s}" . "\\subparagraph*{%s}"))
>>> 			     ("report"
>>> 			      "\\documentclass[11pt]{report}\n\\usepackage[utf8] 
>>> {inputenc}
>>> \n\\usepackage[T1]{fontenc}\n\\usepackage{graphicx}\n\
>>> \usepackage{longtable}\n\\usepackage{float}\n\\usepackage{wrapfig} 
>>> \n\
>>> \usepackage{soul}\n\\usepackage{amssymb}\n\\usepackage{hyperref}"
>>> 			      ("\\part{%s}" . "\\part*{%s}")
>>> 			      ("\\chapter{%s}" . "\\chapter*{%s}")
>>> 			      ("\\section{%s}" . "\\section*{%s}")
>>> 			      ("\\subsection{%s}" . "\\subsection*{%s}")
>>> 			      ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
>>> 			     ("book"
>>> 			      "\\documentclass[11pt]{book}\n\\usepackage[utf8]{inputenc} 
>>> \n
>>> \\usepackage[T1]{fontenc}\n\\usepackage{graphicx}\n\
>>> \usepackage{longtable}\n\\usepackage{float}\n\\usepackage{wrapfig} 
>>> \n\
>>> \usepackage{soul}\n\\usepackage{amssymb}\n\\usepackage{hyperref}"
>>> 			      ("\\part{%s}" . "\\part*{%s}")
>>> 			      ("\\chapter{%s}" . "\\chapter*{%s}")
>>> 			      ("\\section{%s}" . "\\section*{%s}")
>>> 			      ("\\subsection{%s}" . "\\subsection*{%s}")
>>> 			      ("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
>>> 			     ("beamer"
>>> 			      "\\documentclass{beamer}\n\\usepackage[utf8]{inputenc}\n\
>>> \usepackage[T1]{fontenc}\n\\usepackage{graphicx}\n\
>>> \usepackage{longtable}\n\\usepackage{float}\n\\usepackage{wrapfig} 
>>> \n\
>>> \usepackage{soul}\n\\usepackage{amssymb}\n\\usepackage{hyperref}"
>>> org-beamer-sectioning)
>>> 			     )
>>> 			    )
>>> org-fontify-done-headline t
>>> org-mode-hook '(#[nil "\300\301!\205	
>>>
>>>
>>> _______________________________________________
>>> Emacs-orgmode mailing list
>>> Please use `Reply All' to send replies to the list.
>>> Emacs-orgmode@gnu.org
>>> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
>>
>> - Carsten

- Carsten