From 78e9e7ca8199ba1341bea7e664678fa8d02f8402 Mon Sep 17 00:00:00 2001 From: jao Date: Sat, 2 Oct 2021 01:56:46 +0100 Subject: themes: ansi colors faces --- lib/themes/jao-themes.el | 10 +--------- 1 file changed, 1 insertion(+), 9 deletions(-) (limited to 'lib/themes/jao-themes.el') diff --git a/lib/themes/jao-themes.el b/lib/themes/jao-themes.el index 96e8398..86273df 100644 --- a/lib/themes/jao-themes.el +++ b/lib/themes/jao-themes.el @@ -18,8 +18,6 @@ ;;; Code: -(require 'ansi-color) - ;;; palette (defvar jao-themes--face-family "Inconsolata") (defvar jao-themes--fg "black") @@ -1176,14 +1174,8 @@ (palette (cdr (assoc :palette args))) (faces (or (cdr (assoc :faces args)) (list))) (x-faces (cdr (assoc :x-faces args))) - (x-colors (cdr (assoc :x-colors args))) - (a-colors (cdr (assoc :ansi-colors args))) - (ansi-colors (when a-colors - (apply 'vector (butlast a-colors - (- (length a-colors) 8)))))) + (x-colors (cdr (assoc :x-colors args)))) `(progn - (setq ansi-color-names-vector ,ansi-colors) - (ansi-color-map-update 'ansi-color-names-vector ,ansi-colors) (custom-make-theme-feature ',name) (deftheme ,name) (let ((*jao-themes--color-names* ',(cdr (assoc :names args)))) -- cgit v1.2.3