branch: elpa/dracula-theme
commit e3a708719c4f4a78685418b684c234b4e2040b58
Author: wmedrano <[email protected]>
Commit: wmedrano <[email protected]>

    Allow using less bold
---
 README.md        |  3 +++
 dracula-theme.el | 17 ++++++++++++++---
 2 files changed, 17 insertions(+), 3 deletions(-)

diff --git a/README.md b/README.md
index 2235160083..bc524f9b42 100644
--- a/README.md
+++ b/README.md
@@ -37,6 +37,9 @@ need to be set before `load-theme` is invoked for Dracula.
 
 ;; Use less pink and bold on the mode-line and minibuffer (default nil)
 (setq dracula-alternate-mode-line-and-minibuffer t)
+
+;; Use normal weight for syntax faces like keywords, functions, and variables 
(default nil)
+(setq dracula-alternate-syntax t)
 ```
 
 ## Test
diff --git a/dracula-theme.el b/dracula-theme.el
index 6f325363d4..442a43cd98 100644
--- a/dracula-theme.el
+++ b/dracula-theme.el
@@ -152,6 +152,11 @@ The theme has to be reloaded after changing anything in 
this group."
   :type 'boolean
   :group 'dracula)
 
+(defcustom dracula-alternate-syntax nil
+  "Use normal weight for syntax faces (keywords, functions, variables)."
+  :type 'boolean
+  :group 'dracula)
+
 (defvar dracula-use-24-bit-colors-on-256-colors-terms nil
   "Use true colors even on terminals announcing less capabilities.
 
@@ -244,8 +249,12 @@ read it before opening a new issue about your will.")
                (font-lock-comment-delimiter-face :inherit shadow)
                (font-lock-constant-face :foreground ,dracula-purple)
                (font-lock-doc-face :foreground ,dracula-comment)
-               (font-lock-function-name-face :foreground ,dracula-green 
:weight bold)
-               (font-lock-keyword-face :foreground ,dracula-pink :weight bold)
+               (font-lock-function-name-face :foreground ,dracula-green
+                                             ,@(unless dracula-alternate-syntax
+                                                 (list :weight 'bold)))
+               (font-lock-keyword-face :foreground ,dracula-pink
+                                       ,@(unless dracula-alternate-syntax
+                                           (list :weight 'bold)))
                (font-lock-negation-char-face :foreground ,dracula-cyan)
                (font-lock-number-face :foreground ,dracula-purple)
                (font-lock-operator-face :foreground ,dracula-pink)
@@ -255,7 +264,9 @@ read it before opening a new issue about your will.")
                (font-lock-regexp-grouping-construct :foreground 
,dracula-purple)
                (font-lock-string-face :foreground ,dracula-yellow)
                (font-lock-type-face :inherit font-lock-builtin-face)
-               (font-lock-variable-name-face :foreground ,dracula-fg :weight 
bold)
+               (font-lock-variable-name-face :foreground ,dracula-fg
+                                             ,@(unless dracula-alternate-syntax
+                                                 (list :weight 'bold)))
                (font-lock-warning-face :inherit warning :background ,bg2)
                ;; auto-complete
                (ac-completion-face :underline t :foreground ,dracula-pink)

Reply via email to