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:
parent
4269178827
commit
eb37142b14
|
@ -2109,14 +2109,12 @@ holding contextual information."
|
|||
(headline-label (or (org-element-property :CUSTOM_ID headline)
|
||||
(concat "sec-" (mapconcat 'number-to-string
|
||||
headline-number "-"))))
|
||||
(format-function (cond
|
||||
((functionp format-function) format-function)
|
||||
(format-function
|
||||
(cond ((functionp format-function) format-function)
|
||||
((functionp org-html-format-headline-function)
|
||||
(function*
|
||||
(lambda (todo todo-type priority text tags
|
||||
&allow-other-keys)
|
||||
(lambda (todo todo-type priority text tags &rest ignore)
|
||||
(funcall org-html-format-headline-function
|
||||
todo todo-type priority text tags))))
|
||||
todo todo-type priority text tags)))
|
||||
(t 'org-html-format-headline))))
|
||||
(apply format-function
|
||||
todo todo-type priority text tags
|
||||
|
|
Loading…
Reference in New Issue