From a274c21419fb3ddad514539c02b3628f09d6fac6 Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Mon, 2 Nov 2015 20:58:50 +0100 Subject: [PATCH] ox-latex: Fix "void function nil" error * lisp/ox-latex.el (org-latex--delayed-footnotes-definitions): Fix "void function nil" error. Reported-by: Kaushal Modi --- lisp/ox-latex.el | 30 ++++++++++++++---------------- 1 file changed, 14 insertions(+), 16 deletions(-) diff --git a/lisp/ox-latex.el b/lisp/ox-latex.el index 060f423a1..f545c9c41 100644 --- a/lisp/ox-latex.el +++ b/lisp/ox-latex.el @@ -1480,22 +1480,20 @@ just outside of it." (org-export-data (org-export-get-footnote-definition ref info) info)))) ;; Find every footnote reference in ELEMENT. - (let* (all-refs - search-refs ; For byte-compiler. - (search-refs - (function - (lambda (data) - ;; Return a list of all footnote references never seen - ;; before in DATA. - (org-element-map data 'footnote-reference - (lambda (ref) - (when (org-export-footnote-first-reference-p ref info) - (push ref all-refs) - (when (eq (org-element-property :type ref) 'standard) - (funcall search-refs - (org-export-get-footnote-definition ref info))))) - info) - (reverse all-refs))))) + (letrec ((all-refs) + (search-refs + (lambda (data) + ;; Return a list of all footnote references never seen + ;; before in DATA. + (org-element-map data 'footnote-reference + (lambda (ref) + (when (org-export-footnote-first-reference-p ref info) + (push ref all-refs) + (when (eq (org-element-property :type ref) 'standard) + (funcall search-refs + (org-export-get-footnote-definition ref info))))) + info) + (reverse all-refs)))) (funcall search-refs element)) ""))