Try to prevent unused lexical variable warnings v2
This commit is contained in:
parent
a795f0cd96
commit
21807e51f4
|
@ -163,8 +163,7 @@ Argument OPERATION is the file operation to be applied, and ARGS its arguments."
|
||||||
(let ((org-pandoc-import-transient--currently-processing t)
|
(let ((org-pandoc-import-transient--currently-processing t)
|
||||||
(org-export-with-broken-links t)
|
(org-export-with-broken-links t)
|
||||||
(org-export-with-toc nil))
|
(org-export-with-toc nil))
|
||||||
(eval-when-compile ; prevent "unused lexical variable" warnings
|
(ignore org-export-with-broken-links org-export-with-toc) ; Prevent "unused lexical variable" warnings
|
||||||
(ignore org-export-with-broken-links org-export-with-toc))
|
|
||||||
(apply operation args)
|
(apply operation args)
|
||||||
(when-let* ((file (nth 2 args))
|
(when-let* ((file (nth 2 args))
|
||||||
(source-file (plist-get (cdr (assoc file org-pandoc-import-transient--files)) :source))
|
(source-file (plist-get (cdr (assoc file org-pandoc-import-transient--files)) :source))
|
||||||
|
|
Loading…
Reference in New Issue