Initial release

1 files changed, 68 insertions, 0 deletions

diff --git a/modally-faces.el b/modally-faces.el
new file mode 100644
index 0000000..6b8ea17
--- /dev/null
+++ b/modally-faces.el
@@ -0,0 +1,68 @@
+;;; modally-faces.el --- Faces used in Modally       -*- lexical-binding: t; -*-
+
+;; Copyright (C) 2024  Blake Romero
+
+;; Author: Blake Romero <codeblake@outlook.com>
+;; Keywords: faces
+
+;; 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 this program.  If not, see <https://www.gnu.org/licenses/>.
+
+;;; Commentary:
+;;
+
+;;; Code:
+
+;; FACE
+(defface modally-buffer
+  '((t :inherit 'success))
+  "A mode-line face used for the buffer name."
+  :group 'modally)
+
+(defface modally-buffer-readonly
+  '((t :inherit 'error))
+  "A mode-line face used for a read-only buffer."
+  :group 'modally)
+
+(defface modally-buffer-modified
+  '((t :inherit 'warning))
+  "A mode-line face used for a modified buffer."
+  :group 'modally)
+
+(defface modally-buffer-path
+  '((t :inherit 'italic))
+  "A mode-line face used when the buffer has a path."
+  :group 'modally)
+
+(defface modally-major-mode
+  '((t :inherit 'mode-line-emphasis :bold nil))
+  "A mode-line face used for the major-mode."
+  :group 'modally)
+
+(defface modally-git-branch
+  '((t :foreground "#00bcff"))
+  "A mode-line face used for the Git branch name."
+  :group 'modally)
+
+(defface modally-org-timer
+  '((t :inherit 'success))
+  "A mode-line face used for the org timer."
+  :group 'modally)
+
+(defface modally-org-timer-pause
+  '((t :inherit 'warning :bold nil))
+  "A mode-line face used for a paused org timer."
+  :group 'modally)
+
+(provide 'modally-faces)
+;;; modally-faces.el ends here