emacs/elisp/init-theme.el
2024-05-25 22:49:04 +02:00

81 lines
2.5 KiB
EmacsLisp

;;; init-theme.el --- -*- lexical-binding: t -*-
;;
;; Filename: init-theme.el
;; Description: Initialize Doom Themes and Modeline
;; Author: Mingde (Matthew) Zeng
;; Copyright (C) 2019 Mingde (Matthew) Zeng
;; Created: Thu Mar 14 17:11:56 2019 (-0400)
;; Version: 3.0
;; URL: https://github.com/MatthewZMD/.emacs.d
;; Keywords: M-EMACS .emacs.d doom-themes doom-modeline
;; Compatibility: emacs-version >= 26.1
;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;
;;; Commentary:
;;
;; This initializes doom-themes and doom-modeline
;; This is NOT Doom, but doom-themes and doom-modeine
;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;
;; This program is free software: you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation, either version 3 of the License, or (at
;; your option) any later version.
;;
;; This program is distributed in the hope that it will be useful, but
;; WITHOUT ANY WARRANTY; without even the implied warranty of
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
;; General Public License for more details.
;;
;; You should have received a copy of the GNU General Public License
;; along with GNU Emacs. If not, see <https://www.gnu.org/licenses/>.
;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;
;;; Code:
(eval-when-compile
(require 'init-const))
(use-package zenburn-theme
:ensure t
:config
(load-theme 'zenburn t)
)
;; DoomThemes
;; (use-package doom-themes
;; :custom-face
;; (cursor ((t (:background "BlanchedAlmond"))))
;; :config
;; ;; flashing mode-line on errors
;; (doom-themes-visual-bell-config)
;; ;; Corrects (and improves) org-mode's native fontification.
;; (doom-themes-org-config)
;; (load-theme 'doom-one t)
;; (defun switch-theme ()
;; "An interactive funtion to switch themes."
;; (interactive)
;; (disable-theme (intern (car (mapcar #'symbol-name custom-enabled-themes))))
;; (call-interactively #'load-theme)))
;; ;; -DoomThemes
;; ;; DoomModeline
;; (use-package doom-modeline
;; :custom
;; ;; Don't compact font caches during GC. Windows Laggy Issue
;; (inhibit-compacting-font-caches t)
;; (doom-modeline-minor-modes t)
;; (doom-modeline-icon t)
;; (doom-modeline-major-mode-color-icon t)
;; (doom-modeline-height 15)
;; :config
;; (doom-modeline-mode))
;; ;; -DoomModeline
(provide 'init-theme)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; init-theme.el ends here