[elpa] externals/ergoemacs-mode bd169a6 109/325: Make ergoemacs-install-standard-theme()

[Stefan Monnier]

branch: externals/ergoemacs-mode
commit bd169a6b7d347b415f66e0ce3b3bd2123df36119
Author: Walter Landry <wlandry@caltech.edu>
Commit: Walter Landry <wlandry@caltech.edu>

    Make ergoemacs-install-standard-theme()
---
 ergoemacs-themes.el | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/ergoemacs-themes.el b/ergoemacs-themes.el
index ea69dc8..3ca87de 100644
--- a/ergoemacs-themes.el
+++ b/ergoemacs-themes.el
@@ -150,8 +150,6 @@
   (recentf-mode (if noninteractive -1 1))
   )
 
-(add-hook 'ergoemacs-mode-startup-hook #'ergoemacs-set-standard-vars)
-
 ;;; Fixed components
 (ergoemacs-component standard-fixed ()
   "Standard Fixed Shortcuts"
@@ -1315,6 +1313,12 @@
                  ("Mode Line" (mode-line-major-mode-switch))
                   ("Ergoemacs global menus" (menu-bar-file menu-bar-edit 
menu-bar-search menu-bar-view menu-bar-help))))
 
+(defun ergoemacs-install-standard-theme ()
+  (ergoemacs-set-standard-vars)
+  )
+
+(add-hook 'ergoemacs-mode-startup-hook #'ergoemacs-install-standard-theme)
+
 (ergoemacs-translation normal ()
   "Identify transformation"
   :keymap (let ((map (make-sparse-keymap)))