Update dracula-theme

This commit is contained in:
Andrea Ciceri 2023-09-22 18:57:14 +02:00
parent 2f02170401
commit eb79e3ab91
No known key found for this signature in database
3 changed files with 29 additions and 18 deletions

14
flake.lock generated
View file

@ -55,16 +55,16 @@
"extra-package-dracula-theme": {
"flake": false,
"locked": {
"lastModified": 1695368802,
"narHash": "sha256-i/xIb8jYONVNxADFcU5HVKhejkL+Ou6NlF92QTMFyiY=",
"owner": "dracula",
"repo": "emacs",
"rev": "dabe74904036717b06546c382df6e77a28921cff",
"lastModified": 1695902551,
"narHash": "sha256-uP3icMS0MP4j1Y7ivpMQZv0jLRh7CaRpG8NCn3vLnbE=",
"owner": "aciceri",
"repo": "dracula-emacs",
"rev": "25c2623e65817b5902b7ef74d1e8bafafa9d5a48",
"type": "github"
},
"original": {
"owner": "dracula",
"repo": "emacs",
"owner": "aciceri",
"repo": "dracula-emacs",
"type": "github"
}
},

View file

@ -23,7 +23,7 @@
flake = false;
};
extra-package-dracula-theme = {
url = "github:dracula/emacs";
url = "github:aciceri/dracula-emacs";
flake = false;
};
};

31
init.el
View file

@ -69,33 +69,35 @@
(use-package dracula-theme
:init
;; TODO find better colors (bright white and bright black should be different!)
;; this is used by auto suggestions while typing in eat
(set-face-attribute 'ansi-color-bright-white nil :foreground "grey" :background "grey")
(set-face-attribute 'ansi-color-bright-black nil :foreground "grey" :background "grey")
(set-face-attribute 'ansi-color-bright-magenta nil :foreground "magenta" :background "magenta")
;; (set-face-attribute 'ansi-color-bright-magenta nil :foreground "magenta" :background "magenta")
(set-face-background 'match (color-lighten-name (face-background 'menu) 30))
:config
; TODO abstract the following paradigm in a new use-package keyword :after-frame-one-time
;; TODO abstract the following paradigm in a new use-package keyword :after-frame-one-time
(defvar ccr/theme-loaded nil "Indicate if the theme has already been loaded")
;; load the theme only when a frame is created for the first time (not every time)
:hook (server-after-make-frame . (lambda ()
(when (not ccr/theme-loaded)
(setq ccr/theme-loaded 't)
(load-theme 'dracula t)
(custom-theme-set-faces 'dracula '(default ((t (:background "black")))))
(load-theme 'dracula t)
;; HACK Since dracula doesn't directly expose colors as faces we load
;; term in order to load them as term faces (which instead it provides)
;; term in order to load them as term faces (which instead itq provides)
;; Then we assign these faces to eat faces
;; TODO shouldn't this be moved to eat's use-package section?
(require 'term)
(let ((colors '("black" "red" "green" "yellow" "blue" "magenta" "cyan" "white")))
(dolist (color colors)
(set-face-attribute (intern (format "eat-term-color-%s" color)) nil :inherit (intern (format "term-color-%s" color)))))
;; (require 'term)
;; (let ((colors '("black" "red" "green" "yellow" "blue" "magenta" "cyan" "white")))
;; (dolist (color colors)
;; (set-face-attribute (intern (format "eat-term-color-%s" color)) nil :inherit (intern (format "term-color-%s" color)))))
))))
(use-package solaire-mode
:init
(solaire-global-mode +1)
:config
(set-face-background 'solaire-default-face "#1c1d26"))
:custom ((solaire-mode-themes-to-face-swap '(dracula))))
(use-package ligature
:config
@ -433,6 +435,7 @@
)
(use-package nix-ts-mode
:custom ((nix-ts-mode--embed-bash nil))
:hook (
(nix-ts-mode . (lambda ()
(require 'eglot)
@ -445,6 +448,14 @@
:mode "\\.nix\\'"
)
(use-package python-ts-mode
:hook ((python-ts-mode . (lambda ()
(require 'eglot)
(add-to-list 'eglot-server-programs
'(python-ts-mode . ("jedi-language-server")))
(eglot-ensure))))
:mode "\\.py\\'")
(use-package haskell-mode
:hook ((haskell-mode . eglot-ensure)
(haskell-mode . tree-sitter-hl-mode)))