forked from mirrors/org-mode
org.el: Always honor `org-startup-indented', even when `org-inhibit-startup' is non-nil
* org.el (org-mode): Always honor `org-startup-indented', even when `org-inhibit-startup' is non-nil. * org-indent.el (org-indent-mode): Don't check `org-inhibit-startup'. Thanks to Carsten for suggesting this.
This commit is contained in:
parent
35f944aaf0
commit
6d06bcfcbc
|
@ -159,10 +159,9 @@ properties, after each buffer modification, on the modified zone.
|
|||
|
||||
The process is synchronous. Though, initial indentation of
|
||||
buffer, which can take a few seconds on large buffers, is done
|
||||
during idle time." nil " Ind" nil
|
||||
(cond
|
||||
((org-bound-and-true-p org-inhibit-startup)
|
||||
(setq org-indent-mode nil))
|
||||
during idle time."
|
||||
nil " Ind" nil
|
||||
(cond
|
||||
((and org-indent-mode (featurep 'xemacs))
|
||||
(message "org-indent-mode does not work in XEmacs - refusing to turn it on")
|
||||
(setq org-indent-mode nil))
|
||||
|
|
|
@ -4915,6 +4915,7 @@ The following commands are available:
|
|||
(org-set-local 'calc-embedded-open-mode "# ")
|
||||
(modify-syntax-entry ?@ "w")
|
||||
(if org-startup-truncated (setq truncate-lines t))
|
||||
(when org-startup-indented (require 'org-indent) (org-indent-mode 1))
|
||||
(org-set-local 'font-lock-unfontify-region-function
|
||||
'org-unfontify-region)
|
||||
;; Activate before-change-function
|
||||
|
@ -4996,9 +4997,6 @@ The following commands are available:
|
|||
(set-buffer-modified-p bmp)))
|
||||
(when org-startup-with-inline-images
|
||||
(org-display-inline-images))
|
||||
(when org-startup-indented
|
||||
(require 'org-indent)
|
||||
(org-indent-mode 1))
|
||||
(unless org-inhibit-startup-visibility-stuff
|
||||
(org-set-startup-visibility)))
|
||||
;; Try to set org-hide correctly
|
||||
|
|
Loading…
Reference in New Issue