aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGlenn Morris2009-09-30 02:32:44 +0000
committerGlenn Morris2009-09-30 02:32:44 +0000
commit1a5ee3eed4e77d07909c9ad797b036b6c07d9596 (patch)
treed2960745212d83a1c732e1a24ff8c4b5ead46a1a
parentd8085053bb3fd0124b962f874ec9c8ccf0918a35 (diff)
downloademacs-1a5ee3eed4e77d07909c9ad797b036b6c07d9596.tar.gz
emacs-1a5ee3eed4e77d07909c9ad797b036b6c07d9596.zip
(org-columns-uncompile-format): Avoid assignment to free variable `fun'.
-rw-r--r--lisp/org/org-colview.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/org/org-colview.el b/lisp/org/org-colview.el
index 73e6bed121a..42863b68b38 100644
--- a/lisp/org/org-colview.el
+++ b/lisp/org/org-colview.el
@@ -1015,7 +1015,7 @@ Don't set this, this is meant for dynamic scoping.")
1015 1015
1016(defun org-columns-uncompile-format (cfmt) 1016(defun org-columns-uncompile-format (cfmt)
1017 "Turn the compiled columns format back into a string representation." 1017 "Turn the compiled columns format back into a string representation."
1018 (let ((rtn "") e s prop title op op-match width fmt printf) 1018 (let ((rtn "") e s prop title op op-match width fmt printf fun)
1019 (while (setq e (pop cfmt)) 1019 (while (setq e (pop cfmt))
1020 (setq prop (car e) 1020 (setq prop (car e)
1021 title (nth 1 e) 1021 title (nth 1 e)