mirrors/org-mode
0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-09-22 11:10:42 +00:00
Code Releases Activity

org.el (org-mode): Use org-unmodified during startup initialization for functions that may be inhibited

Browse source 
* org.el (org-mode): Use org-unmodified during startup
initialization for functions that may be inhibited.
This commit is contained in:
Bastien Guerry 2013-02-16 14:10:14 +01:00
parent adcc0d414b
commit 9c4d403ada
1 changed files with 10 additions and 11 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
lisp/org.el
View file

@ -5269,17 +5269,16 @@ The following commands are available:
(= (point-min) (point-max))) (= (point-min) (point-max)))
(insert "# -*- mode: org -*-\n\n")) (insert "# -*- mode: org -*-\n\n"))
(unless org-inhibit-startup (unless org-inhibit-startup
(org-unmodified
(and org-startup-with-beamer-mode (org-beamer-mode)) (and org-startup-with-beamer-mode (org-beamer-mode))
(when org-startup-align-all-tables (when org-startup-align-all-tables
(let ((bmp (buffer-modified-p))) (org-table-map-tables 'org-table-align 'quietly))
(org-table-map-tables 'org-table-align 'quietly)
(set-buffer-modified-p bmp)))
(when org-startup-with-inline-images (when org-startup-with-inline-images
(org-display-inline-images)) (org-display-inline-images))
(when org-startup-with-latex-preview (when org-startup-with-latex-preview
(org-preview-latex-fragment)) (org-preview-latex-fragment))
(unless org-inhibit-startup-visibility-stuff (unless org-inhibit-startup-visibility-stuff
(org-set-startup-visibility))) (org-set-startup-visibility))))
;; Try to set org-hide correctly ;; Try to set org-hide correctly
(set-face-foreground 'org-hide (org-find-invisible-foreground))) (set-face-foreground 'org-hide (org-find-invisible-foreground)))