(org-columns-uncompile-format): Avoid assignment to free variable `fun'.

1a5ee3ee · Glenn Morris · d8085053 · 1a5ee3ee
Commit 1a5ee3ee authored Sep 30, 2009 by Glenn Morris
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

lisp/org/org-colview.el lisp/org/org-colview.el +1 -1

No files found.
--- 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.")

 (defun org-columns-uncompile-format (cfmt)
  "Turn the compiled columns format back into a string representation."
-  (let ((rtn "") e s prop title op op-match width fmt printf)
+  (let ((rtn "") e s prop title op op-match width fmt printf fun)
    (while (setq e (pop cfmt))
      (setq prop (car e)
 	    title (nth 1 e)