diff options
author | Carsten Dominik <carsten.dominik@gmail.com> | 2009-01-27 07:36:01 +0100 |
---|---|---|
committer | Carsten Dominik <carsten.dominik@gmail.com> | 2009-01-27 07:36:01 +0100 |
commit | 7a202e610075e85a597ff843c9a1b21d11a12179 (patch) | |
tree | 0ab709636f0ea5d892ca8cb9b8e420dfce7e4bad | |
parent | f0899954a3b5e04de7509d1377dced9fabb87a00 (diff) | |
download | org-mode-7a202e610075e85a597ff843c9a1b21d11a12179.tar.gz |
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.
-rwxr-xr-x | lisp/ChangeLog | 3 | ||||
-rw-r--r-- | lisp/org.el | 2 |
2 files changed, 4 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 25946c2..6e16abd 100755 --- a/lisp/ChangeLog +++ b/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> diff --git a/lisp/org.el b/lisp/org.el index 921362f..01970ba 100644 --- a/lisp/org.el +++ b/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 |