Ver Fonte

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 há 17 anos atrás
pai
commit
7a202e6100
2 ficheiros alterados com 4 adições e 1 exclusões
  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