| 1 | ;;; smart-mode-line-tangomod-theme.el --- tangomod theme for smart-mode-line |
| 2 | |
| 3 | ;; Copyright (C) 2019 Amin Bandali |
| 4 | |
| 5 | ;; Author: Amin Bandali <bandali@gnu.org> |
| 6 | ;; Version: 0.1.0 |
| 7 | ;; Package-Requires: ((emacs "24.3") (smart-mode-line "2.10")) |
| 8 | ;; Keywords: mode-line themes faces |
| 9 | |
| 10 | ;;; Commentary: |
| 11 | ;; |
| 12 | ;; tangomod theme for smart-mode-line |
| 13 | |
| 14 | ;;; License: |
| 15 | ;; |
| 16 | ;; This file is NOT part of GNU Emacs. |
| 17 | ;; |
| 18 | ;; This program is free software; you can redistribute it and/or |
| 19 | ;; modify it under the terms of the GNU General Public License |
| 20 | ;; as published by the Free Software Foundation; either version 3 |
| 21 | ;; of the License, or (at your option) any later version. |
| 22 | ;; |
| 23 | ;; This program is distributed in the hope that it will be useful, |
| 24 | ;; but WITHOUT ANY WARRANTY; without even the implied warranty of |
| 25 | ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| 26 | ;; GNU General Public License for more details. |
| 27 | ;; |
| 28 | |
| 29 | ;;; Code: |
| 30 | |
| 31 | (deftheme smart-mode-line-tangomod |
| 32 | "tangomod theme for smart-mode-line.") |
| 33 | |
| 34 | (custom-theme-set-faces |
| 35 | 'smart-mode-line-tangomod |
| 36 | '(mode-line-buffer-id ((t :inherit sml/filename :foreground nil :background nil))) |
| 37 | '(mode-line-inactive ((t :background "#e1e1e1"))) |
| 38 | '(mode-line ((t :background "#e7e7e7"))) |
| 39 | '(sml/global ((t :inherit font-lock-preprocessor-face))) |
| 40 | '(sml/filename ((t :inherit mode-line-buffer-id))) |
| 41 | '(sml/modes ((t :foreground nil :inherit sml/filename :weight normal))) |
| 42 | '(sml/prefix ((t :inherit (font-lock-variable-name-face sml/global)))) |
| 43 | '(sml/read-only ((t :inherit (font-lock-type-face sml/not-modified))))) |
| 44 | |
| 45 | ;;;###autoload |
| 46 | (when load-file-name |
| 47 | (add-to-list 'custom-theme-load-path |
| 48 | (file-name-as-directory (file-name-directory load-file-name)))) |
| 49 | |
| 50 | (provide-theme 'smart-mode-line-tangomod) |
| 51 | ;;; smart-mode-line-tangomod-theme.el ends here. |