Browse Source

Fix a bug in `org-columns-get-format-and-top-level' and a compiler warning.

* org-colview.el (org-columns-get-format-and-top-level): Fix bug.
(org-columns-get-format): Fix compiler warning.
Bastien Guerry 12 years ago
parent
commit
74e9a23c01
1 changed files with 2 additions and 2 deletions
  1. 2 2
      lisp/org-colview.el

+ 2 - 2
lisp/org-colview.el

@@ -666,13 +666,13 @@ around it."
     (org-open-link-from-string value arg)))
 
 (defun org-columns-get-format-and-top-level ()
-  (let (fmt (org-columns-get-format))
+  (let ((fmt (org-columns-get-format)))
     (org-columns-goto-top-level)
     fmt))
 
 (defun org-columns-get-format (&optional fmt-string)
   (interactive)
-  (let (fmt-as-property)
+  (let (fmt-as-property fmt)
     (when (condition-case nil (org-back-to-heading) (error nil))
       (setq fmt-as-property (org-entry-get nil "COLUMNS" t)))
     (setq fmt (or fmt-string fmt-as-property org-columns-default-format))