From fad95d40e147be1787640f3eaf54cc4c706d1d55 Mon Sep 17 00:00:00 2001 From: Thanos Apollo Date: Sun, 1 Oct 2023 14:26:45 +0300 Subject: [fix] Redo faces as part of yeetube-buffer Redo faces as part of yeetube-buffer using inherit. This way it will follow emacs theme. --- yeetube-buffer.el | 24 +++++++++++++++++++--- yeetube-face.el | 59 ------------------------------------------------------- 2 files changed, 21 insertions(+), 62 deletions(-) delete mode 100644 yeetube-face.el diff --git a/yeetube-buffer.el b/yeetube-buffer.el index c671177..26b9586 100644 --- a/yeetube-buffer.el +++ b/yeetube-buffer.el @@ -29,9 +29,6 @@ ;;; Code: -(require 'yeetube-face) - - (defcustom yeetube-buffer-display-emojis nil "Display video title's emojis. @@ -40,6 +37,27 @@ Emojis cause formatting issues, this should be off by default." :safe #'booleanp :group 'yeetube) + +(defface yeetube-face-header-query + '((t :inherit font-lock-function-name-face)) + "Face used for the video published date.") + +(defface yeetube-face-duration + '((t :inherit font-lock-string-face)) + "Face used for the video duration.") + +(defface yeetube-face-view-count + '((t :inherit font-lock-keyword-face)) + "Face used for the video view count.") + +(defface yeetube-face-title + '((t :inherit font-lock-variable-use-face)) + "Face used for video title.") + +(defface yeetube-face-channel + '((t :inherit font-lock-function-call-face)) + "Face used for video title.") + (defun yeetube-buffer-strip-emojis (str) "Remove characters which are part of the `emoji' script from STR." (cl-remove-if (lambda (c) diff --git a/yeetube-face.el b/yeetube-face.el deleted file mode 100644 index 469cdfd..0000000 --- a/yeetube-face.el +++ /dev/null @@ -1,59 +0,0 @@ -;;; yeetube-face.el --- Yeetube Face -*- lexical-binding: t; -*- - -;; Copyright (C) 2023 Thanos Apollo - -;; Author: Thanos Apollo -;; Keywords: extensions youtube videos -;; URL: https://git.thanosapollo.com/yeetube -;; Version: 0.0.1 - -;; Package-Requires: ((emacs "27.2")) - -;; 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 . - -;;; Commentary: - -;; This package is a yeetube extension, providing custom faces for -;; yeetube variables - -;;; Code: - -(defface yeetube-face-header-query - '((((class color) (background light)) (:foreground "#b6e63e")) - (((class color) (background dark)) (:foreground "#b6e63e"))) - "Face used for the video published date.") - -(defface yeetube-face-duration - '((((class color) (background light)) (:foreground "#e2c770")) - (((class color) (background dark)) (:foreground "#e2c770"))) - "Face used for the video duration.") - -(defface yeetube-face-view-count - '((((class color) (background light)) (:foreground "#fb2874")) - (((class color) (background dark)) (:foreground "#fb2874"))) - "Face used for the video view count.") - -(defface yeetube-face-title - '((((class color) (background light)) (:foreground "#fd971f")) - (((class color) (background dark)) (:foreground "#fd971f"))) - "Face used for video title.") - -(defface yeetube-face-channel - '((((class color) (background light)) (:foreground "#b6e63e")) - (((class color) (background dark)) (:foreground "#b6e63e"))) - "Face used for video title.") - -(provide 'yeetube-face) - -;;; yeetube-face.el ends here -- cgit v1.2.3