summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicolas Goaziou <mail@nicolasgoaziou.fr>2015-11-02 20:58:50 +0100
committerNicolas Goaziou <mail@nicolasgoaziou.fr>2015-11-02 20:58:50 +0100
commita274c21419fb3ddad514539c02b3628f09d6fac6 (patch)
treed86ecad7ca01b7ccfb809f5f8794e61f726c2276
parent4ca1179c9e9c707267ac3738cc7c8442001b204b (diff)
downloadorg-mode-a274c21419fb3ddad514539c02b3628f09d6fac6.tar.gz
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 <kaushal.modi@gmail.com> <http://permalink.gmane.org/gmane.emacs.orgmode/102477>
-rw-r--r--lisp/ox-latex.el30
1 files changed, 14 insertions, 16 deletions
diff --git a/lisp/ox-latex.el b/lisp/ox-latex.el
index 060f423..f545c9c 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))
""))