Remove useless comments.

1 files changed, 11 insertions, 10 deletions

diff --git a/themes/sd-compagnon-theme.el b/themes/sd-compagnon-theme.el
index b668363..3a4c9b1 100644
--- a/themes/sd-compagnon-theme.el
+++ b/themes/sd-compagnon-theme.el
@@ -1,5 +1,5 @@
 (deftheme sd-compagnon
-  "Created 2021-05-22.")
+  "Created 2021-05-23.")
 
 (custom-theme-set-faces
  'sd-compagnon
@@ -14,12 +14,12 @@
  '(shadow ((t (:foreground "light slate gray"))))
  '(secondary-selection ((((class color) (min-colors 88) (background light)) (:extend t :background "yellow1")) (((class color) (min-colors 88) (background dark)) (:extend t :background "SkyBlue4")) (((class color) (min-colors 16) (background light)) (:extend t :background "yellow")) (((class color) (min-colors 16) (background dark)) (:extend t :background "SkyBlue4")) (((class color) (min-colors 8)) (:extend t :foreground "black" :background "cyan")) (t (:inverse-video t))))
  '(trailing-whitespace ((((class color) (background light)) (:background "red1")) (((class color) (background dark)) (:background "red1")) (t (:inverse-video t))))
- '(font-lock-builtin-face ((t (:foreground "medium purple"))))
+ '(font-lock-builtin-face ((t (:foreground "light pink"))))
  '(font-lock-comment-delimiter-face ((t (:foreground "slate gray" :inherit (fixed-pitch)))))
  '(font-lock-comment-face ((t (:family "Compagnon Bold"))))
- '(font-lock-constant-face ((t (:foreground "chocolate"))))
+ '(font-lock-constant-face ((t (:foreground "saddle brown" :weight bold))))
  '(font-lock-doc-face ((t (:inherit variable-pitch))))
- '(font-lock-function-name-face ((t (:foreground "sienna" :weight bold))))
+ '(font-lock-function-name-face ((t (:foreground "RosyBrown3" :weight bold))))
  '(font-lock-keyword-face ((t (:foreground "pink4"))))
  '(font-lock-negation-char-face ((t nil)))
  '(font-lock-preprocessor-face ((t (:inherit (font-lock-builtin-face)))))
@@ -29,12 +29,12 @@
  '(font-lock-type-face ((t (:foreground "orchid2"))))
  '(font-lock-variable-name-face ((t (:weight bold))))
  '(font-lock-warning-face ((t (:inherit (error)))))
- '(button ((t (:inherit (link)))))
+ '(button ((t (:inherit link))))
  '(link ((t (:family "Compagnon Light Italic"))))
  '(link-visited ((t (:inherit link))))
  '(fringe ((t (:background "gainsboro"))))
  '(header-line ((t (:height 1.8 :weight bold :inherit org-meta-line))))
- '(tooltip ((t (:family "Hermit" :foreground "black" :background "gainsboro"))))
+ '(tooltip ((t (:background "old lace" :foreground "black" :family "Hermit"))))
  '(mode-line ((t (:inherit org-meta-line :box (:line-width -1 :style released-button)))))
  '(mode-line-buffer-id ((t (:weight bold))))
  '(mode-line-emphasis ((t (:weight bold))))
@@ -47,12 +47,12 @@
  '(next-error ((t (:inherit (region)))))
  '(query-replace ((t (:inherit (isearch)))))
  '(org-meta-line ((t (:extend t :background "burlywood2" :family "Compagnon Light"))))
- '(org-table ((t (:background "lemon chiffon" :inherit fixed-pitch))))
+ '(org-table ((t (:inherit fixed-pitch :background "lemon chiffon"))))
  '(org-block ((t (:inherit fixed-pitch :extend t))))
  '(org-code ((t (:inherit fixed-pitch))))
  '(custom-variable-tag ((t (:weight bold))))
- '(org-block-begin-line ((t (:background "lemon chiffon" :extend t :inherit org-meta-line))))
- '(org-block-end-line ((t (:inherit org-block-begin-line :extend t))))
+ '(org-block-begin-line ((t (:inherit org-meta-line :extend t :background "lemon chiffon"))))
+ '(org-block-end-line ((t (:extend t :inherit org-block-begin-line))))
  '(outline-1 ((t (:family "Compagnon Medium"))))
  '(outline-2 ((t (:inherit outline-1))))
  '(outline-3 ((t (:inherit outline-1))))
@@ -74,6 +74,7 @@
  '(custom-link ((t (:inherit fixed-pitch :background "burlywood1"))))
  '(show-paren-match ((t (:background "aquamarine"))))
  '(show-paren-mismatch ((t (:background "orange red" :foreground "white"))))
- '(default ((t (:inherit nil :extend nil :stipple nil :background "cornsilk" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight semi-bold :height 142 :width normal :foundry "UKWN" :family "Compagnon Medium")))))
+ '(default ((t (:inherit nil :extend nil :stipple nil :background "cornsilk" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight semi-bold :height 142 :width normal :foundry "UKWN" :family "Compagnon Medium"))))
+ '(org-drawer ((t (:inherit org-block-begin-line)))))
 
 (provide-theme 'sd-compagnon)