From 140c0aa9e49b76bbedf8347d70a7d4a62a3723ba Mon Sep 17 00:00:00 2001 From: tslil clingman <> Date: Fri, 31 Dec 2021 14:59:45 -0500 Subject: Slight update to acme-theme Removed swiper/ivy stuff, added a relevant vertico setting --- emacs/themes/acme-theme.el | 41 +++++++++++++---------------------------- 1 file changed, 13 insertions(+), 28 deletions(-) (limited to 'emacs') diff --git a/emacs/themes/acme-theme.el b/emacs/themes/acme-theme.el index 317fe56..89e0136 100644 --- a/emacs/themes/acme-theme.el +++ b/emacs/themes/acme-theme.el @@ -1,7 +1,7 @@ ;; acme-theme.el -- A theme inspired by the classic colours of the ACME editor. -;; Copyright (C) 2014 , Tslil Clingman +;; Copyright (C) 2021 , tslil clingman -;; Version: 0.1 +;; Version: 0.2 ;; Package-Requires: ((emacs "24")) ;; This program is free software: you can redistribute it and/or modify @@ -93,16 +93,16 @@ '(eshell-prompt-face ((t (:inherit default :weight bold)))) - `(company-echo-common ((t (:foreground "black" :background ,bg-blue :weight bold)))) - `(company-preview-common ((t (:foreground "black" :background ,yellow)))) - `(company-scrollbar-bg ((t (:background "grey")))) - `(company-scrollbar-fg ((t (:background ,green)))) - `(company-tooltip ((t (:foreground "black" :background ,bg-blue)))) - `(company-tooltip-search ((t (:foreground "black" :background ,yellow)))) - `(company-tooltip-annotation ((t (:foreground ,link :slant italic)))) - `(company-tooltip-common ((t (:foreground "black" :weight bold)))) - `(company-tooltip-common-selection ((t (:foreground "black" :background ,yellow :weight bold)))) - `(company-tooltip-selection ((t (:background ,yellow :foreground "black")))) + ;; `(company-echo-common ((t (:foreground "black" :background ,bg-blue :weight bold)))) + ;; `(company-preview-common ((t (:foreground "black" :background ,yellow)))) + ;; `(company-scrollbar-bg ((t (:background "grey")))) + ;; `(company-scrollbar-fg ((t (:background ,green)))) + ;; `(company-tooltip ((t (:foreground "black" :background ,bg-blue)))) + ;; `(company-tooltip-search ((t (:foreground "black" :background ,yellow)))) + ;; `(company-tooltip-annotation ((t (:foreground ,link :slant italic)))) + ;; `(company-tooltip-common ((t (:foreground "black" :weight bold)))) + ;; `(company-tooltip-common-selection ((t (:foreground "black" :background ,yellow :weight bold)))) + ;; `(company-tooltip-selection ((t (:background ,yellow :foreground "black")))) '(sh-quoted-exec ((t (:foreground "black" :underline t)))) @@ -153,22 +153,7 @@ '(proof-tacticals-name-face ((t (:foreground "black" :underline t)))) `(proof-locked-face ((t (:background ,bg-blue)))) - `(ivy-current-match ((t (:foreground "black" :background ,purple :weight bold)))) - '(ivy-minibuffer-match-face-1 ((t (:inherit default)))) - '(ivy-minibuffer-match-face-2 ((t (:inherit ivy-minibuffer-match-face-1)))) - '(ivy-minibuffer-match-face-3 ((t (:inherit ivy-minibuffer-match-face-1)))) - '(ivy-minibuffer-match-face-4 ((t (:inherit ivy-minibuffer-match-face-1)))) - `(ivy-cursor-face ((t (:background ,yellow)))) - - `(swiper-line-face ((t (:inherit default)))) - `(swiper-match-face-1 ((t (:background ,bg-blue :weight bold :box 1)))) - `(swiper-match-face-2 ((t (:inherit swiper-match-face-1)))) - `(swiper-match-face-3 ((t (:inherit swiper-match-face-1)))) - `(swiper-match-face-4 ((t (:inherit swiper-match-face-1)))) - `(swiper-background-match-face-1 ((t (:weight bold)))) - `(swiper-background-match-face-2 ((t (:inherit swiper-background-match-face-1)))) - `(swiper-background-match-face-3 ((t (:inherit swiper-background-match-face-1)))) - `(swiper-background-match-face-4 ((t (:inherit swiper-background-match-face-1)))) + `(vertico-current ((t (:foreground "black" :background ,bg-blue :weight bold)))) '(magit-blame-heading ((t (inherit :default)))) '(magit-blame-margin ((t (inherit :default)))) -- cgit v1.2.3