(org-archive-subtree): Quote variable name.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 21f1332e85660cefe08af1754a37c73ca952c05d..66ac3e93490b8863d3c28911cf982a02b9164768 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2007-02-27  Carsten Dominik  <dominik@science.uva.nl>
+
+       * textmodes/org.el (org-archive-subtree): Quote variable name.
+
 2007-02-26  Nick Roberts  <nickrob@snap.net.nz>
 
        * progmodes/gud.el (gud, gud-menu-map): Remove references to bash/bashdb.

diff --git a/lisp/textmodes/org.el b/lisp/textmodes/org.el
index 313748e8e43d60a986140377a07ff2e619fbfb6d..5e3e9e968b83c02304e36c04e8af9a629334b707 100644 (file)
--- a/lisp/textmodes/org.el
+++ b/lisp/textmodes/org.el
@@ -5528,9 +5528,10 @@ this heading. "
              (org-done-string tr-org-done-string)
              (org-todo-regexp tr-org-todo-regexp)
              (org-todo-line-regexp tr-org-todo-line-regexp)
-             (org-odd-levels-only (if (local-variable-p org-odd-levels-only)
-                                      org-odd-levels-only
-                                    tr-org-odd-levels-only)))
+             (org-odd-levels-only
+              (if (local-variable-p 'org-odd-levels-only)
+                  org-odd-levels-only
+                tr-org-odd-levels-only)))
          (goto-char (point-min))
          (if heading
              (progn