ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

ox-html: Fix number of arguments when setting `org-html-format-headline-function' 

* lisp/ox-html.el (org-html-format-headline--wrap): Fix number of
  arguments when setting `org-html-format-headline-function'.

Thanks to Jisang Yoo for reporting it.
This commit is contained in:
Nicolas Goaziou 2013-07-08 22:26:31 +02:00
parent 4269178827
commit eb37142b14
1 changed files with 7 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
lisp/ox-html.el
View File

@ -2109,14 +2109,12 @@ holding contextual information."
(headline-label (or (org-element-property :CUSTOM_ID headline) (headline-label (or (org-element-property :CUSTOM_ID headline)
(concat "sec-" (mapconcat 'number-to-string (concat "sec-" (mapconcat 'number-to-string
headline-number "-")))) headline-number "-"))))
(format-function (cond (format-function
((functionp format-function) format-function) (cond ((functionp format-function) format-function)
((functionp org-html-format-headline-function) ((functionp org-html-format-headline-function)
(function* (lambda (todo todo-type priority text tags &rest ignore)
(lambda (todo todo-type priority text tags
&allow-other-keys)
(funcall org-html-format-headline-function (funcall org-html-format-headline-function
todo todo-type priority text tags)))) todo todo-type priority text tags)))
(t 'org-html-format-headline)))) (t 'org-html-format-headline))))
(apply format-function (apply format-function
todo todo-type priority text tags todo todo-type priority text tags