From 6a9e67ceb414ea567a20c2d182884e5d9337e3c9 Mon Sep 17 00:00:00 2001
From: Chris Cochrun <chris@cochrun.xyz>
Date: Tue, 2 Aug 2022 13:33:12 -0500
Subject: [PATCH] some color changes

---
 README.org | 17 +++++++++++++++--
 init.el    | 17 +++++++++++++++--
 2 files changed, 30 insertions(+), 4 deletions(-)

diff --git a/README.org b/README.org
index 1b76c8a7..a9e2eb1c 100644
--- a/README.org
+++ b/README.org
@@ -540,6 +540,7 @@ Let's start by creating a self contained function of what I'd like started on ev
                   org-verbatim))
     (set-face-attribute `,face nil :inherit 'fixed-pitch))
 
+  ;; changing height and boldness
   (dolist (face
            '((org-level-1 1.4 ultra-bold)
              (org-level-2 1.3 extra-bold)
@@ -548,6 +549,13 @@ Let's start by creating a self contained function of what I'd like started on ev
              (org-level-5 1.0 normal)))
     (set-face-attribute (nth 0 face) nil :weight (nth 2 face) :height (nth 1 face)))
 
+  ;; changing colors
+  (dolist (face
+           '((outline-2 "#5af78e")
+             (outline-3 "#ffb86c")
+             (outline-4 "#f3f99d")))
+    (set-face-attribute (nth 0 face) nil :foreground (nth 1 face)))
+
   (set-face-attribute 'org-block-end-line nil :inherit 'org-block-begin-line)
   (set-face-attribute 'org-quote nil :background "#242631" :inherit 'fixed-pitch))
 
@@ -2994,9 +3002,14 @@ Since Bongo seems kinda difficult I shall give EMMS another try.
     :states 'normal
     :keymaps 'override
     "mo" 'emms
-    "mb" 'emms-browser
+    "ml" 'emms-browser
     "mp" 'emms-pause
-    "ma" 'emms-add-dired)
+    "ma" 'emms-add-dired
+    "mr" 'emms-toggle-repeat-track
+    "mn" 'emms-next
+    "mb" 'emms-previous
+    "m]" 'emms-seek-forward
+    "m[" 'emms-seek-backward)
   (general-def 'normal emms-playlist-mode-map
     "q" 'bury-buffer
     "d" 'emms-playlist-mode-kill-track
diff --git a/init.el b/init.el
index fe3bf8bf..a8900708 100644
--- a/init.el
+++ b/init.el
@@ -338,6 +338,7 @@
                   org-verbatim))
     (set-face-attribute `,face nil :inherit 'fixed-pitch))
 
+  ;; changing height and boldness
   (dolist (face
            '((org-level-1 1.4 ultra-bold)
              (org-level-2 1.3 extra-bold)
@@ -346,6 +347,13 @@
              (org-level-5 1.0 normal)))
     (set-face-attribute (nth 0 face) nil :weight (nth 2 face) :height (nth 1 face)))
 
+  ;; changing colors
+  (dolist (face
+           '((outline-2 "#5af78e")
+             (outline-3 "#ffb86c")
+             (outline-4 "#f3f99d")))
+    (set-face-attribute (nth 0 face) nil :foreground (nth 1 face)))
+
   (set-face-attribute 'org-block-end-line nil :inherit 'org-block-begin-line)
   (set-face-attribute 'org-quote nil :background "#242631" :inherit 'fixed-pitch))
 
@@ -2160,9 +2168,14 @@ interfere with the default `bongo-playlist-buffer'."
     :states 'normal
     :keymaps 'override
     "mo" 'emms
-    "mb" 'emms-browser
+    "ml" 'emms-browser
     "mp" 'emms-pause
-    "ma" 'emms-add-dired)
+    "ma" 'emms-add-dired
+    "mr" 'emms-toggle-repeat-track
+    "mn" 'emms-next
+    "mb" 'emms-previous
+    "m]" 'emms-seek-forward
+    "m[" 'emms-seek-backward)
   (general-def 'normal emms-playlist-mode-map
     "q" 'bury-buffer
     "d" 'emms-playlist-mode-kill-track