diff options
author | John Wiegley <johnw@newartisans.com> | 2010-07-28 20:45:34 -0400 |
---|---|---|
committer | John Wiegley <johnw@newartisans.com> | 2010-07-28 20:50:19 -0400 |
commit | dfa41442afd2ec51571c3a908f91b56466c869dc (patch) | |
tree | 8c0309cfb9a211ca9c4b553718bcba4d0e365cf7 | |
parent | 69f15e0b73f10883c6737ac788f494a301c95ca9 (diff) | |
download | org-mode-dfa41442afd2ec51571c3a908f91b56466c869dc.tar.gz |
Resolve a compiler warning
-rw-r--r-- | lisp/ob-tangle.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/ob-tangle.el b/lisp/ob-tangle.el index 0a9aae2..7464f59 100644 --- a/lisp/ob-tangle.el +++ b/lisp/ob-tangle.el @@ -67,9 +67,9 @@ evaluating BODY." (declare (indent 1)) (let ((temp-result (make-symbol "temp-result")) (temp-file (make-symbol "temp-file")) - (visited-p (make-symbol "already-visited"))) - `(let (,temp-result ,temp-file) - (setq ,visited-p (get-file-buffer ,file )) + (visited-p (make-symbol "visited-p"))) + `(let (,temp-result ,temp-file + (,visited-p (get-file-buffer ,file))) (org-babel-find-file-noselect-refresh ,file) (setf ,temp-file (get-file-buffer ,file)) (with-current-buffer ,temp-file |