소스 검색

ox-latex: Fix 99d4c8f91542378620095708247567f7ddeab40c

* lisp/ox-latex.el (org-latex-format-headline-default-function): Make
  the variable a function.
Nicolas Goaziou 12 년 전
부모
커밋
a1236b9606
1개의 변경된 파일11개의 추가작업 그리고 15개의 파일을 삭제
  1. 11 15
      lisp/ox-latex.el

+ 11 - 15
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