|
@@ -286,14 +286,16 @@ is Emacs 23 only."
|
|
|
This can also be configured on a per-file basis by adding one of
|
|
|
the following lines anywhere in the buffer:
|
|
|
|
|
|
- #+STARTUP: fold
|
|
|
- #+STARTUP: nofold
|
|
|
- #+STARTUP: content"
|
|
|
+ #+STARTUP: fold (or `overview', this is equivalent)
|
|
|
+ #+STARTUP: nofold (or `showall', this is equivalent)
|
|
|
+ #+STARTUP: content
|
|
|
+ #+STARTUP: showeverything"
|
|
|
:group 'org-startup
|
|
|
:type '(choice
|
|
|
(const :tag "nofold: show all" nil)
|
|
|
(const :tag "fold: overview" t)
|
|
|
- (const :tag "content: all headlines" content)))
|
|
|
+ (const :tag "content: all headlines" content)
|
|
|
+ (const :tag "show everything, even drawers" showeverything)))
|
|
|
|
|
|
(defcustom org-startup-truncated t
|
|
|
"Non-nil means, entering Org-mode will set `truncate-lines'.
|
|
@@ -3510,6 +3512,7 @@ After a match, the following groups carry important information:
|
|
|
("overview" org-startup-folded t)
|
|
|
("nofold" org-startup-folded nil)
|
|
|
("showall" org-startup-folded nil)
|
|
|
+ ("showeverything" org-startup-folded showeverything)
|
|
|
("content" org-startup-folded content)
|
|
|
("indent" org-startup-indented t)
|
|
|
("noindent" org-startup-indented nil)
|
|
@@ -5105,11 +5108,12 @@ With a numeric prefix, show all headlines up to that level."
|
|
|
((eq org-startup-folded 'content)
|
|
|
(let ((this-command 'org-cycle) (last-command 'org-cycle))
|
|
|
(org-cycle '(4)) (org-cycle '(4)))))
|
|
|
- (if org-hide-block-startup (org-hide-block-all))
|
|
|
- (org-set-visibility-according-to-property 'no-cleanup)
|
|
|
- (org-cycle-hide-archived-subtrees 'all)
|
|
|
- (org-cycle-hide-drawers 'all)
|
|
|
- (org-cycle-show-empty-lines 'all))
|
|
|
+ (unless (eq org-startup-folded 'showeverything)
|
|
|
+ (if org-hide-block-startup (org-hide-block-all))
|
|
|
+ (org-set-visibility-according-to-property 'no-cleanup)
|
|
|
+ (org-cycle-hide-archived-subtrees 'all)
|
|
|
+ (org-cycle-hide-drawers 'all)
|
|
|
+ (org-cycle-show-empty-lines 'all)))
|
|
|
|
|
|
(defun org-set-visibility-according-to-property (&optional no-cleanup)
|
|
|
"Switch subtree visibilities according to :VISIBILITY: property."
|