Config: add theme fix script, install doom-themes and color-theme-modern, update keybindings

lisp/init-ui.el

@@ -20,12 +20,19 @@
 (use-package solarized-theme)
 (load-theme 'solarized-dark t)
 
+;; 很多主题
+(use-package doom-themes)
+(use-package color-theme-modern)
+
+;; 信任所有主题
+(setq custom-safe-themes t)
+
 ;; 安装smart-mode-line
 (use-package smart-mode-line
   :defer 0.5
   :config
-  (setq sml/no-confirm-load-theme t
-        sml/theme 'respectful)
+  (setq sml/no-confirm-load-theme t)
+        ;; sml/theme 'respectful)
   (sml/setup))
 
 ;; eshell高亮
@@ -122,6 +129,12 @@
   (cnfonts-mode 1)
   (cnfonts--select-profile "profile1"))
 
+;; 主题修复脚本
+(defun fix-theme-colors ()
+  "Fix invalid color name in theme files."
+  (interactive)
+  (load-file (expand-file-name "~/.emacs.d/lisp/fix-theme-colors.el")))
+
 (provide 'init-ui)
 
 ;;; init-ui.el ends here