Simplify color handling by using ansi-color-vector-names

1 files changed, 0 insertions, 126 deletions

diff --git a/vterm.el b/vterm.el
index a5d7514..018fd4e 100644
--- a/vterm.el
+++ b/vterm.el
@@ -83,132 +83,6 @@ for different shell. "
   :type 'hook
   :group 'vterm)
 
-(defface vterm-color-default-fg
-  `((t :foreground ,(aref ansi-color-names-vector 0)))
-  "Foreground of the console."
-  :group 'vterm)
-
-(defface vterm-color-default-bg
-  `((t :background ,(aref ansi-color-names-vector 7)))
-  "Background of the console."
-  :group 'vterm)
-
-(defface vterm-color-black-fg
-  `((t :foreground ,(aref ansi-color-names-vector 0)))
-  "Face used to render black color code."
-  :group 'vterm)
-
-(defface vterm-color-black-bg
-  `((t :background ,(aref ansi-color-names-vector 0)))
-  "Face used to render black color code."
-  :group 'vterm)
-
-(defface vterm-color-red-fg
-  `((t :foreground ,(aref ansi-color-names-vector 1)))
-  "Face used to render red color code."
-  :group 'vterm)
-
-(defface vterm-color-red-bg
-  `((t :background ,(aref ansi-color-names-vector 1)))
-  "Face used to render red color code."
-  :group 'vterm)
-
-(defface vterm-color-green-fg
-  `((t :foreground ,(aref ansi-color-names-vector 2)))
-  "Face used to render green color code."
-  :group 'vterm)
-
-(defface vterm-color-green-bg
-  `((t :background ,(aref ansi-color-names-vector 2)))
-  "Face used to render green color code."
-  :group 'vterm)
-
-(defface vterm-color-yellow-fg
-  `((t :foreground ,(aref ansi-color-names-vector 3)))
-  "Face used to render yellow color code."
-  :group 'vterm)
-
-(defface vterm-color-yellow-bg
-  `((t :background ,(aref ansi-color-names-vector 3)))
-  "Face used to render yellow color code."
-  :group 'vterm)
-
-(defface vterm-color-blue-fg
-  `((t :foreground ,(aref ansi-color-names-vector 4)))
-  "Face used to render blue color code."
-  :group 'vterm)
-
-(defface vterm-color-blue-bg
-  `((t :background ,(aref ansi-color-names-vector 4)))
-  "Face used to render yellow color code."
-  :group 'vterm)
-
-(defface vterm-color-magenta-fg
-  `((t :foreground ,(aref ansi-color-names-vector 5)))
-  "Face used to render magenta color code."
-  :group 'vterm)
-
-(defface vterm-color-magenta-bg
-  `((t :background ,(aref ansi-color-names-vector 5)))
-  "Face used to render magenta color code."
-  :group 'vterm)
-
-(defface vterm-color-cyan-fg
-  `((t :foreground ,(aref ansi-color-names-vector 6)))
-  "Face used to render cyan color code."
-  :group 'vterm)
-
-(defface vterm-color-cyan-bg
-  `((t :background ,(aref ansi-color-names-vector 6)))
-  "Face used to render cyan color code."
-  :group 'vterm)
-
-(defface vterm-color-white-fg
-  `((t :foreground ,(aref ansi-color-names-vector 7)))
-  "Face used to render white color code."
-  :group 'vterm)
-
-(defface vterm-color-white-bg
-  `((t :background ,(aref ansi-color-names-vector 7)))
-  "Face used to render white color code."
-  :group 'vterm)
-
-(defvar vterm-color-palette-fg [vterm-color-black-fg
-                                vterm-color-red-fg
-                                vterm-color-green-fg
-                                vterm-color-yellow-fg
-                                vterm-color-blue-fg
-                                vterm-color-magenta-fg
-                                vterm-color-cyan-fg
-                                vterm-color-white-fg
-                                vterm-color-black-fg
-                                vterm-color-red-fg
-                                vterm-color-green-fg
-                                vterm-color-yellow-fg
-                                vterm-color-blue-fg
-                                vterm-color-magenta-fg
-                                vterm-color-cyan-fg
-                                vterm-color-white-fg]
-  "Color palette for the foreground.")
-
-(defvar vterm-color-palette-bg [vterm-color-black-bg
-                                vterm-color-red-bg
-                                vterm-color-green-bg
-                                vterm-color-yellow-bg
-                                vterm-color-blue-bg
-                                vterm-color-magenta-bg
-                                vterm-color-cyan-bg
-                                vterm-color-white-bg
-                                vterm-color-black-bg
-                                vterm-color-red-bg
-                                vterm-color-green-bg
-                                vterm-color-yellow-bg
-                                vterm-color-blue-bg
-                                vterm-color-magenta-bg
-                                vterm-color-cyan-bg
-                                vterm-color-white-bg]
-  "Color palette for the background.")
-
 (defvar vterm--term nil
   "Pointer to Term.")
 (make-variable-buffer-local 'vterm--term)