# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1254277964 0
# Node ID 36a73e354d6c6f69034cf78971bfaa4d8644ccc7
# Parent  2f1ad455dc64dfc31b0bb71cf6b1140a05453726
(org-columns-uncompile-format): Avoid assignment to free variable `fun'.

diff -r 2f1ad455dc64 -r 36a73e354d6c lisp/org/org-colview.el
--- a/lisp/org/org-colview.el	Wed Sep 30 02:28:17 2009 +0000
+++ b/lisp/org/org-colview.el	Wed Sep 30 02:32:44 2009 +0000
@@ -1015,7 +1015,7 @@
 
 (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)