atuleu/home
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Modifies theme

Browse Source
This commit is contained in:
Alexandre Tuleu
2023-09-12 16:59:33 +02:00
parent 8a9fe89d66
commit f415670298
1 changed files with 24 additions and 54 deletions
Download Patch File Download Diff File Expand all files Collapse all files

78
.emacs
View File

@@ -219,6 +219,7 @@
(use-package flycheck (use-package flycheck
:delight :delight
:bind (("C-c C-n" . 'flycheck-next-error))
:config :config
(defvar-local atu/flycheck-local-cache nil) (defvar-local atu/flycheck-local-cache nil)
@@ -229,19 +230,19 @@
(advice-add 'flycheck-checker-get :around 'atu/flycheck-checker-get) (advice-add 'flycheck-checker-get :around 'atu/flycheck-checker-get)
) )
(use-package which-key) (use-package which-key
:delight
:config
(which-key-mode))
(use-package lsp-mode (use-package lsp-mode
:delight :delight
:after (flycheck) :after (flycheck)
:config :config
(yas-minor-mode) (yas-minor-mode)
(global-set-key (kbd "C-c C-n") 'flycheck-next-error)
(if (display-graphic-p) (if (display-graphic-p)
(setq lsp-ui-doc-use-webkit t) (setq lsp-ui-doc-use-webkit t)
) )
(custom-set-faces
'(lsp-ui-doc-background ((t (:background "#373B41")))))
(add-to-list 'lsp-language-id-configuration '("\\.postcss\\'" . "css")) (add-to-list 'lsp-language-id-configuration '("\\.postcss\\'" . "css"))
(advice-add 'lsp :before (advice-add 'lsp :before
(lambda (&rest _args) (lambda (&rest _args)
@@ -262,14 +263,15 @@
;; if you want which-key integration ;; if you want which-key integration
(c++-mode . lsp-deferred) (c++-mode . lsp-deferred)
(lsp-mode . lsp-enable-which-key-integration)) (lsp-mode . lsp-enable-which-key-integration))
:commands (lsp lsp-deferred)) :commands (lsp lsp-deferred))
(use-package lsp-ui (use-package lsp-ui
:after lsp-mode :commands lsp-ui-mode
:config :config
(setq lsp-ui-sideline-show-diagnostics nil) (setq lsp-ui-sideline-show-diagnostics nil)
:custom-face
(lsp-ui-doc-background ((t (:background "#373B41"))))
) )
(use-package treemacs (use-package treemacs
@@ -624,59 +626,27 @@
(dockerfile-mode . lsp-deferred) (dockerfile-mode . lsp-deferred)
) )
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; After Init
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(use-package zenburn-theme
:config
(setq zenburn-override-colors-alist
'(
;; ("zenburn-bg-2" . "#000000")
;; ("zenburn-bg-1" . "#2B2B2B")
("zenburn-bg-1" . "#151515")
;; ("zenburn-bg-08" . "#303030")
("zenburn-bg-08" . "#1a1a1a")
;; ("zenburn-bg-05" . "#383838")
("zenburn-bg-05" . "#202020")
;;("zenburn-bg" . "#3F3F3F")
("zenburn-bg" . "#2b2b2b")
;; ("zenburn-bg+05" . "#494949")
("zenburn-bg+05" . "#393939")
;; ("zenburn-bg+1" . "#4F4F4F")
("zenburn-bg+1" . "#3F3F3F")
;; ("zenburn-bg+2" . "#5F5F5F")
("zenburn-bg+2" . "#4F4F4F")
;; ("zenburn-bg+3" . "#6F6F6F")
("zenburn-bg+3" . "#5F5F5F")
)
)
(load-theme 'zenburn t) (use-package doom-themes
(zenburn-with-color-variables :config
(custom-theme-set-faces (setq doom-themes-enable-bold t ; if nil, bold is universally disabled
'zenburn doom-themes-enable-italic t) ; if nil, italics is universally disabled
`(whitespace-space ((t (:background ,zenburn-bg :foreground ,zenburn-bg)))) (load-theme 'doom-one t)
`(whitespace-hspace ((t (:background ,zenburn-bg+1 :foreground ,zenburn-bg+1)))) ;; Enable flashing mode-line on errors
`(whitespace-tab ((t (:foreground ,zenburn-bg+3)))) (doom-themes-visual-bell-config)
`(whitespace-newline ((t (:foreground ,zenburn-bg+1)))) ;; or for treemacs users
`(whitespace-trailing ((t (:background ,zenburn-red)))) (setq doom-themes-treemacs-theme "doom-atom") ; use "doom-colors" for less minimal icon theme
`(whitespace-line ((t (:background ,zenburn-bg :foreground ,zenburn-magenta)))) (doom-themes-treemacs-config)
`(whitespace-space-before-tab ((t (:background ,zenburn-orange :foreground ,zenburn-orange)))) ;; Corrects (and improves) org-mode's native fontification.
`(whitespace-indentation ((t (:background ,zenburn-bg+1)))) (doom-themes-org-config))
`(whitespace-empty ((t (:background ,zenburn-bg+1))))
`(whitespace-space-after-tab ((t (:background ,zenburn-bg+1 :foreground ,zenburn-red))))
`(font-lock-type-face ((t (:foreground ,zenburn-blue+1))))
)
(global-whitespace-mode 1)
)
)
(custom-set-faces (custom-set-faces
;; custom-set-faces was added by Custom. ;; custom-set-faces was added by Custom.
;; If you edit it by hand, you could mess it up, so be careful. ;; If you edit it by hand, you could mess it up, so be careful.
;; Your init file should contain only one such instance. ;; Your init file should contain only one such instance.
;; If there is more than one, they won't work right. ;; If there is more than one, they won't work right.
'(default ((t (:family "UbuntuMono Nerd Font" :foundry "DAMA" :slant normal :weight normal :height 113 :width normal)))) )
'(lsp-ui-doc-background ((t (:background "#373B41")))))
;; Local Variables: ;; Local Variables:
;; vc-follow-symlinks: t ;; vc-follow-symlinks: t
;; End: ;; End: