From: Bastien Guerry <bzg@altern.org>
Date: Sat, 26 Jan 2013 14:03:21 +0000 (+0100)
Subject: org.el (org-mode): Don't initialize `org-beamer-mode' when `org-inhibit-startup'... 
X-Git-Tag: 7.9.3e~12
X-Git-Url: https://repo.or.cz/w/org-mode.git/commitdiff_plain/d0cad612ec9631f06a3e7bb763acb14accf7f083

org.el (org-mode): Don't initialize `org-beamer-mode' when `org-inhibit-startup' is non-nil

* org.el (org-mode): Don't initialize `org-beamer-mode' when
`org-inhibit-startup' is non-nil.
---

diff --git a/lisp/org.el b/lisp/org.el
index 7467db7c3..1fdae2680 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -4970,9 +4970,6 @@ The following commands are available:
     (org-set-local 'outline-isearch-open-invisible-function
 		   (lambda (&rest ignore) (org-show-context 'isearch))))
 
-  ;; Turn on org-beamer-mode?
-  (and org-startup-with-beamer-mode (org-beamer-mode))
-
   ;; Setup the pcomplete hooks
   (set (make-local-variable 'pcomplete-command-completion-function)
        'org-pcomplete-initial)
@@ -4992,6 +4989,7 @@ The following commands are available:
 	   (= (point-min) (point-max)))
       (insert "#    -*- mode: org -*-\n\n"))
   (unless org-inhibit-startup
+    (and org-startup-with-beamer-mode (org-beamer-mode))
     (when org-startup-align-all-tables
       (let ((bmp (buffer-modified-p)))
 	(org-table-map-tables 'org-table-align 'quietly)