diff --git a/settings/general-settings.el b/settings/general-settings.el index 6f09dfde..15cc3987 100644 --- a/settings/general-settings.el +++ b/settings/general-settings.el @@ -703,18 +703,6 @@ Version 2016-07-13" ["Visual Line (Word Wrap) [↩]" visual-line-mode :style toggle :selected visual-line-mode :help "visual-line-mode"] ) - ("Org" - ["Org Fancy Priorities [Ⓟ]" org-fancy-priorities-mode - :style toggle :selected org-sticky-header-mode :help "org-sticky-header-mode"] - ["Org Num [#]" org-num-mode - :style toggle :selected org-num-mode :help "org-num-mode"] - ["Org Sticky Header" org-sticky-header-mode - :style toggle :selected org-sticky-header-mode :help "org-sticky-header-mode"] - ["Org Superstar" org-superstar-mode - :style toggle :selected org-superstar-mode :help "org-superstar-mode"] - ["Org Table Sticky Header [Ⓣ]" org-table-sticky-header-mode - :style toggle :selected org-table-sticky-header-mode :help "org-table-sticky-header-mode"] - ) ["Pixel Scroll" pixel-scroll-mode :style toggle :selected pixel-scroll-mode :help "pixel-scroll-mode"] ["Rainbow" rainbow-mode @@ -761,20 +749,39 @@ Version 2016-07-13" (easy-menu-add-item nil '("My") '["Transparency" toggle-transparency :style toggle :selected (transparency-p) :help "toggle-transparency"]) - (easy-menu-add-item nil '("My") '("--")) (with-eval-after-load 'org (easy-menu-define my-org-export-menu nil "My Org Export Menu" '("Org Export" :visible (eq major-mode 'org-mode) - ["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 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"] + )) + (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"] + ["Org Link Descriptive" org-toggle-link-display + :style toggle :selected org-link-descriptive :help "org-toggle-link-display"] + ["Org Num [#]" org-num-mode + :style toggle :selected org-num-mode :help "org-num-mode"] + ["Org Pretty Entities \\xyz to UTF8 char" org-toggle-pretty-entities + :style toggle :selected org-pretty-entities :help "org-toggle-pretty-entities"] + ["Org Sticky Header" org-sticky-header-mode + :style toggle :selected org-sticky-header-mode :help "org-sticky-header-mode"] + ["Org Superstar" org-superstar-mode + :style toggle :selected org-superstar-mode :help "org-superstar-mode"] + ["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") '["---" t :visible (eq major-mode 'org-mode)]) (easy-menu-add-item nil '("My") my-org-export-menu) - (easy-menu-add-item nil '("My") '["org-toggle-pretty-entities" org-toggle-pretty-entities :visible (eq major-mode 'org-mode)]) - (easy-menu-add-item nil '("My") '["org-toggle-link-display" org-toggle-link-display :visible (eq major-mode 'org-mode)]) + (easy-menu-add-item nil '("My") my-org-minor-mode-menu) (easy-menu-add-item nil '("My") '["Org Link Description Update" my-org-link-description-update :visible (eq major-mode 'org-mode) :help "my-org-link-description-update"]) + (easy-menu-add-item nil '("My") '["Org Article Help" my-org-article-help :visible (eq major-mode 'org-mode)]) ) (with-eval-after-load 'notmuch