Browse Source

Bugfix: Fix property-driven startup visibility

A user setting of

  (setq org-show-entry-below t)

could overrule a visibility property with value FOLDED.  This commit
fixes this by turning off the above setting for the context of setting
startup visibility.
Carsten Dominik 16 years ago
parent
commit
7a202e6100
2 changed files with 4 additions and 1 deletions
  1. 3 0
      lisp/ChangeLog
  2. 1 1
      lisp/org.el

+ 3 - 0
lisp/ChangeLog

@@ -2,6 +2,9 @@
 
 	* org.el (org-shiftselect-error, org-call-for-shift-select): New
 	functions.
+	(org-set-visibility-according-to-property): Turn off the setting
+	of `org-show-entry-below', to avoid overruling a FOLDED visibility
+	property.
 
 2009-01-26  Carsten Dominik  <carsten.dominik@gmail.com>
 

+ 1 - 1
lisp/org.el

@@ -4441,7 +4441,7 @@ With a numeric prefix, show all headlines up to that level."
 (defun org-set-visibility-according-to-property (&optional no-cleanup)
   "Switch subtree visibilities according to :VISIBILITY: property."
   (interactive)
-  (let (state)
+  (let (org-show-entry-below state)
     (save-excursion
       (goto-char (point-min))
       (while (re-search-forward