fix org async export
This commit is contained in:
@@ -574,6 +574,7 @@ Version 2016-07-13"
|
||||
;; https://stackoverflow.com/questions/26638015/elisp-easy-menu-positioning#29396939
|
||||
;; add menus to the global menu bar: map nil
|
||||
(use-package easymenu
|
||||
:after (org) ;; org export async needs org loaded before
|
||||
:config
|
||||
(easy-menu-add-item nil '("File") ["Kill Emacs" kill-emacs :help "Run function `kill-emacs'"] "Quit")
|
||||
|
||||
@@ -723,10 +724,6 @@ Version 2016-07-13"
|
||||
;; ["--" 'ignore :visible (featurep 'bookmark+-lit)] ;; conditional separator
|
||||
;; ["How Many..." how-many]
|
||||
))
|
||||
;; add menus explicitly (required by XEmacs), after easy-menu-define
|
||||
(easy-menu-add my-major-menu nil)
|
||||
(easy-menu-add my-lang-menu nil)
|
||||
(easy-menu-add my-minor-menu nil)
|
||||
|
||||
(easy-menu-add-item nil () my-menu ;; add empty my menu to menu-bar
|
||||
;; "Edit" ;; before Edit
|
||||
@@ -744,25 +741,22 @@ Version 2016-07-13"
|
||||
["Python" my-view-python :help "my-view-python"]
|
||||
["Shell" my-view-shell :help "my-view-shell"]
|
||||
))
|
||||
(easy-menu-add my-view-menu nil)
|
||||
(easy-menu-add-item nil '("My") my-view-menu)
|
||||
|
||||
(easy-menu-add-item nil '("My") '["Transparency" toggle-transparency :style toggle :selected (transparency-p) :help "toggle-transparency"])
|
||||
|
||||
(with-eval-after-load 'org
|
||||
(with-eval-after-load 'org ;; org-mode, org-toggle-pretty-entities
|
||||
(easy-menu-define my-org-export-menu nil "My Org Export Menu"
|
||||
'("Org Export" :visible (eq major-mode 'org-mode)
|
||||
["Article HTML" my-org-article-html-export-to-html :help "my-org-article-html-export-to-html"]
|
||||
["Article PDF" my-org-article-latex-export-to-pdf :help "my-org-article-latex-export-to-pdf"]
|
||||
["HTML" my-org-export-html :help "my-org-export-html"]
|
||||
["HTML async" my-org-export-html-async :help "my-org-export-html-async"]
|
||||
["PDF (LaTeX)" my-org-export-pdf :help "my-org-export-pdf"]
|
||||
["PDF (LaTeX) async" my-org-export-pdf-async :help "my-org-export-pdf-async"]
|
||||
["Article HTML" my-org-article-html-export-to-html :help "my-org-article-html-export-to-html"]
|
||||
["Article HTML async" my-org-article-html-export-to-html-notify-async :help "my-org-article-html-export-to-html-notify-async"]
|
||||
["Article PDF" my-org-article-latex-export-to-pdf :help "my-org-article-latex-export-to-pdf"]
|
||||
["Article PDF async" my-org-article-latex-export-to-pdf-notify-async :help "my-org-article-latex-export-to-pdf-notify-async"]
|
||||
))
|
||||
(easy-menu-define my-org-minor-mode-menu nil "My Org Minor Mode Menu"
|
||||
'("Org Minor Mode / Toggles" :visible (eq major-mode 'org-mode)
|
||||
["Org Fancy Priorities [Ⓟ]" org-fancy-priorities-mode
|
||||
:style toggle :selected org-sticky-header-mode :help "org-sticky-header-mode"]
|
||||
:style toggle :selected org-fancy-priorities-mode :help "org-sticky-header-mode"]
|
||||
["Org Latex Remove Logfiles" (setq org-latex-remove-logfiles (not org-latex-remove-logfiles))
|
||||
:style toggle :selected org-latex-remove-logfiles :help "org-latex-remove-logfiles"]
|
||||
["Org Link Descriptive" org-toggle-link-display
|
||||
@@ -778,7 +772,6 @@ Version 2016-07-13"
|
||||
["Org Table Sticky Header [Ⓣ]" org-table-sticky-header-mode
|
||||
:style toggle :selected org-table-sticky-header-mode :help "org-table-sticky-header-mode"]
|
||||
))
|
||||
(easy-menu-add my-org-export-menu nil)
|
||||
(easy-menu-add-item nil '("My") ["---" 'ignore :visible (eq major-mode 'org-mode)])
|
||||
(easy-menu-add-item nil '("My") my-org-export-menu)
|
||||
(easy-menu-add-item nil '("My") my-org-minor-mode-menu)
|
||||
|
||||
Reference in New Issue
Block a user