From f9e5600f826460f85fabbcbb8dca33e50af33475 Mon Sep 17 00:00:00 2001 From: Nicolas Goaziou Date: Thu, 23 Aug 2012 11:03:09 +0200 Subject: [PATCH] org-export: Fix reference to a free variable in macros * contrib/lisp/org-export.el (org-export-define-backend, org-export-define-derived-backend): Fix reference to a free variable in macro. --- contrib/lisp/org-export.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/contrib/lisp/org-export.el b/contrib/lisp/org-export.el index 3ca7b5de7..665c54f60 100644 --- a/contrib/lisp/org-export.el +++ b/contrib/lisp/org-export.el @@ -812,7 +812,7 @@ As an example, here is how the `e-ascii' back-end is defined: :options-alist ((:ascii-charset nil nil org-e-ascii-charset)))" (declare (debug (&define name sexp [&rest [keywordp sexp]] defbody)) (indent 1)) - (let (filters options block-name) + (let (filters options export-block) (while (keywordp (car body)) (case (pop body) (:export-block (let ((names (pop body))) @@ -897,7 +897,7 @@ The back-end could then be called with, for example: \(org-export-to-buffer 'my-latex \"*Test my-latex*\")" (declare (debug (&define name sexp [&rest [keywordp sexp]] def-body)) (indent 2)) - (let (filters options translate) + (let (filters options translate export-block) (while (keywordp (car body)) (case (pop body) (:export-block (let ((names (pop body)))