No menu entry suppression.

1 files changed, 13 insertions, 11 deletions

diff --git a/blendoit/themes/blendoit-light-theme.el b/blendoit/themes/blendoit-light-theme.el
index a80b34e..9131a6c 100644
--- a/blendoit/themes/blendoit-light-theme.el
+++ b/blendoit/themes/blendoit-light-theme.el
@@ -1,9 +1,9 @@
 (deftheme blendoit-light
-  "Created 2020-08-03.")
+  "Created 2020-08-09.")
 
 (custom-theme-set-faces
  'blendoit-light
- '(fixed-pitch ((t (:inherit default :family "Dejavu Sans Mono"))))
+ '(fixed-pitch ((t (:family "Dejavu Sans Mono"))))
  '(variable-pitch ((t (:family "Liberation Sans"))))
  '(escape-glyph ((((background dark)) (:foreground "cyan")) (((type pc)) (:foreground "magenta")) (t (:foreground "brown"))))
  '(homoglyph ((((background dark)) (:foreground "cyan")) (((type pc)) (:foreground "magenta")) (t (:foreground "brown"))))
@@ -16,15 +16,14 @@
  '(font-lock-builtin-face ((((class grayscale) (background light)) (:weight bold :foreground "LightGray")) (((class grayscale) (background dark)) (:weight bold :foreground "DimGray")) (((class color) (min-colors 88) (background light)) (:foreground "dark slate blue")) (((class color) (min-colors 88) (background dark)) (:foreground "LightSteelBlue")) (((class color) (min-colors 16) (background light)) (:foreground "Orchid")) (((class color) (min-colors 16) (background dark)) (:foreground "LightSteelBlue")) (((class color) (min-colors 8)) (:weight bold :foreground "blue")) (t (:weight bold))))
  '(font-lock-comment-delimiter-face ((t (:inherit font-lock-comment-face :foreground "dim gray"))))
  '(font-lock-comment-face ((t (:foreground "dark gray" :slant italic))))
- '(font-lock-constant-face ((((class grayscale) (background light)) (:underline (:color foreground-color :style line) :weight bold :foreground "LightGray")) (((class grayscale) (background dark)) (:underline (:color foreground-color :style line) :weight bold :foreground "Gray50")) (((class color) (min-colors 88) (background light)) (:foreground "dark cyan")) (((class color) (min-colors 88) (background dark)) (:foreground "Aquamarine")) (((class color) (min-colors 16) (background light)) (:foreground "CadetBlue")) (((class color) (min-colors 16) (background dark)) (:foreground "Aquamarine")) (((class color) (min-colors 8)) (:foreground "magenta")) (t (:underline (:color foreground-color :style line) :weight bold))))
- '(font-lock-doc-face ((t (:inherit font-lock-string-face))))
+ '(font-lock-constant-face ((t (:foreground "dark cyan"))))
  '(font-lock-function-name-face ((((class color) (min-colors 88) (background light)) (:foreground "Blue1")) (((class color) (min-colors 88) (background dark)) (:foreground "LightSkyBlue")) (((class color) (min-colors 16) (background light)) (:foreground "Blue")) (((class color) (min-colors 16) (background dark)) (:foreground "LightSkyBlue")) (((class color) (min-colors 8)) (:weight bold :foreground "blue")) (t (:weight bold :inverse-video t))))
  '(font-lock-keyword-face ((t (:foreground "DodgerBlue4"))))
  '(font-lock-negation-char-face ((t nil)))
  '(font-lock-preprocessor-face ((t (:inherit (font-lock-builtin-face)))))
  '(font-lock-regexp-grouping-backslash ((t (:inherit (bold)))))
  '(font-lock-regexp-grouping-construct ((t (:inherit (bold)))))
- '(font-lock-string-face ((t (:foreground "dark cyan"))))
+ '(font-lock-string-face ((t (:foreground "DeepSkyBlue3"))))
  '(font-lock-type-face ((t (:foreground "ForestGreen"))))
  '(font-lock-variable-name-face ((t (:foreground "sienna"))))
  '(font-lock-warning-face ((t (:inherit (error)))))
@@ -41,7 +40,7 @@
  '(isearch-fail ((((class color) (min-colors 88) (background light)) (:background "RosyBrown1")) (((class color) (min-colors 88) (background dark)) (:background "red4")) (((class color) (min-colors 16)) (:background "red")) (((class color) (min-colors 8)) (:background "red")) (((class color grayscale)) (:foreground "grey")) (t (:inverse-video t))))
  '(lazy-highlight ((t (:background "paleturquoise"))))
  '(match ((((class color) (min-colors 88) (background light)) (:background "yellow1")) (((class color) (min-colors 88) (background dark)) (:background "RoyalBlue3")) (((class color) (min-colors 8) (background light)) (:foreground "black" :background "yellow")) (((class color) (min-colors 8) (background dark)) (:foreground "white" :background "blue")) (((type tty) (class mono)) (:inverse-video t)) (t (:background "gray"))))
- '(next-error ((t (:inherit (region)))))
+ '(next-error ((t (:inherit region))))
  '(query-replace ((t (:inherit (isearch)))))
  '(org-table ((t (:box (:line-width 2 :color "gainsboro" :style released-button)))))
  '(org-formula ((t (:inherit org-table))))
@@ -50,8 +49,8 @@
  '(org-level-1 ((t (:inherit fixed-pitch :height 1.6 :weight bold))))
  '(org-level-2 ((t (:inherit fixed-pitch :height 1.4 :weight bold))))
  '(org-level-3 ((t (:inherit fixed-pitch :weight bold :height 1.2))))
- '(org-level-4 ((t (:height 1.1 :weight bold :inherit fixed-pitch))))
- '(org-date ((t (:inherit link :foreground "DodgerBlue3" :slant italic :family "Liberation Serif"))))
+ '(org-level-4 ((t (:inherit fixed-pitch :weight bold :height 1.1))))
+ '(org-date ((t (:family "Liberation Serif" :slant italic :foreground "DodgerBlue3" :inherit link))))
  '(org-footnote ((t (:foreground "DodgerBlue3" :inherit link))))
  '(org-block ((t (:inherit nil :family "Hermit"))))
  '(org-tag ((t (:inherit link :weight bold :foreground "DodgerBlue3"))))
@@ -59,8 +58,11 @@
  '(link ((t (:foreground "blue" :underline t))))
  '(org-document-info-keyword ((t (:inherit org-meta-line))))
  '(dashboard-heading ((t (:inherit font-lock-keyword-face))))
- '(default ((t (:background "white" :foreground "black" :height 142 :family "Liberation Mono"))))
- '(org-todo ((t (:foreground "Red1" :box 2 :weight bold))))
- '(org-done ((t (:foreground "ForestGreen" :box 2 :weight bold)))))
+ '(org-todo ((t (:weight bold :box nil :foreground "Red1"))))
+ '(org-done ((t (:weight bold :box nil :foreground "ForestGreen"))))
+ '(font-lock-doc-face ((t (:foreground "steel blue" :inherit default))))
+ '(org-code ((t (:inherit default :background "light grey" :foreground "black"))))
+ '(org-verbatim ((t (:inherit org-meta-line))))
+ '(default ((t (:background "white" :foreground "black" :height 142 :family "Liberation Mono")))))
 
 (provide-theme 'blendoit-light)