Explorar el Código

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 hace 17 años
padre
commit
7a202e6100
Se han modificado 2 ficheros con 4 adiciones y 1 borrados
  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