diff options
| author | jao <jao@gnu.org> | 2020-04-23 20:59:44 +0100 |
|---|---|---|
| committer | jao <jao@gnu.org> | 2020-04-23 20:59:44 +0100 |
| commit | ca93790b0c05a68a41a81a363173814ebba66994 (patch) | |
| tree | 5d1ddf9e313dfd169439b1de6e1019e34ff232d7 /themes/jao-themes.el | |
| parent | ff0e001c1e4ca04357d8642718016270f0e1f34d (diff) | |
| download | elibs-ca93790b0c05a68a41a81a363173814ebba66994.tar.gz elibs-ca93790b0c05a68a41a81a363173814ebba66994.tar.bz2 | |
themes: explicit ansi-colors vector
Diffstat (limited to 'themes/jao-themes.el')
| -rw-r--r-- | themes/jao-themes.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/themes/jao-themes.el b/themes/jao-themes.el index f2e91dc..004796e 100644 --- a/themes/jao-themes.el +++ b/themes/jao-themes.el @@ -955,8 +955,10 @@ (faces (cdr (assoc :faces args))) (x-faces (cdr (assoc :x-faces args))) (x-colors (cdr (assoc :x-colors args))) - (ansi-colors (apply 'vector (butlast x-colors - (- (length x-colors) 8))))) + (a-colors (cdr (assoc :ansi-colors args))) + (ansi-colors (when a-colors + (apply 'vector (butlast a-colors + (- (length a-colors) 8)))))) `(progn (setq ansi-color-names-vector ,ansi-colors) (ansi-color-map-update 'ansi-color-names-vector ,ansi-colors) |