From a1236b960681808da8c8e5ed49d6188b6777646a Mon Sep 17 00:00:00 2001
From: Nicolas Goaziou <n.goaziou@gmail.com>
Date: Sat, 23 Feb 2013 22:40:12 +0100
Subject: [PATCH] ox-latex: Fix 99d4c8f91542378620095708247567f7ddeab40c

* lisp/ox-latex.el (org-latex-format-headline-default-function): Make
  the variable a function.
---
 lisp/ox-latex.el | 26 +++++++++++---------------
 1 file changed, 11 insertions(+), 15 deletions(-)

diff --git a/lisp/ox-latex.el b/lisp/ox-latex.el
index 4ab5be267..7067b3ee7 100644
--- a/lisp/ox-latex.el
+++ b/lisp/ox-latex.el
@@ -442,21 +442,6 @@ which format headlines like for Org version prior to 8.0."
   :version "24.3"
   :type 'function)
 
-(defcustom org-latex-format-headline-default-function
-  (lambda (todo todo-type priority text tags)
-    (concat (when todo
-	      (format "\\\\textbf{\\\\textsc{\\\\textsf{%s}}} " todo))
-	    (when priority
-	      (format "\\\\framebox{\\\\#%c} " priority))
-	    text
-	    (when tags
-	      (format "\\\\hfill{}\\\\textsc{%s}"
-		      (mapconcat 'identity tags ":")))))
-  "Default format function for a headline.
-See `org-latex-format-headline-function' for details."
-  :group 'org-export-latex
-  :version "24.3"
-  :type 'function)
 
 ;;;; Footnotes
 
@@ -1542,6 +1527,17 @@ holding contextual information."
 	(format section-fmt full-text
 		(concat headline-label pre-blanks contents))))))))
 
+(defun org-latex-format-headline-default-function
+  (todo todo-type priority text tags)
+  "Default format function for a headline.
+See `org-latex-format-headline-function' for details."
+  (concat
+   (and todo (format "\\textbf{\\textsc{\\textsf{%s}}} " todo))
+   (and priority (format "\\framebox{\\#%c} " priority))
+   text
+   (and tags
+	(format "\\hfill{}\\textsc{%s}" (mapconcat 'identity tags ":")))))
+
 
 ;;;; Horizontal Rule
 
-- 
2.11.4.GIT