Emacs: Switch theme to doom-outrun-electric.

This commit is contained in:
tastytea 2020-04-17 03:51:57 +02:00
parent 935352d33a
commit 4f9957a5f1
4 changed files with 28 additions and 27 deletions

View File

@ -1,6 +1,6 @@
;;; appearance.el --- Configure appearance. -*- lexical-binding: t; -*- ;;; appearance.el --- Configure appearance. -*- lexical-binding: t; -*-
;; Time-stamp: <2020-04-10T14:17:26+0200> ;; Time-stamp: <2020-04-17T02:38:34+0200>
;;; Commentary: ;;; Commentary:
@ -54,9 +54,8 @@
(unless slow-computer (unless slow-computer
(use-package doom-themes (use-package doom-themes
:after (all-the-icons) :after (all-the-icons)
:config (progn (load-theme 'doom-molokai t) :config (progn (load-theme 'doom-outrun-electric t)
(doom-themes-visual-bell-config)) ; Flash modeline on error. (doom-themes-visual-bell-config))) ; Flash modeline on error.
:custom-face (font-lock-comment-face ((t (:foreground "#667755")))))
) ; unless slow-computer. ) ; unless slow-computer.
;; Neat modeline. ;; Neat modeline.

View File

@ -1,6 +1,6 @@
;;; ui.el --- Configure user interfaces. -*- lexical-binding: t; -*- ;;; ui.el --- Configure user interfaces. -*- lexical-binding: t; -*-
;; Time-stamp: <2020-04-15T14:24:20+0200> ;; Time-stamp: <2020-04-17T03:22:05+0200>
;;; Commentary: ;;; Commentary:
;; * treemacs ;; * treemacs
@ -99,11 +99,8 @@
(tab-line ((t (:inherit ruler-mode-default)))) (tab-line ((t (:inherit ruler-mode-default))))
(tab-line-tab ((t (:inherit ruler-mode-default)))) (tab-line-tab ((t (:inherit ruler-mode-default))))
(tab-line-tab-inactive ((t (:inherit tab-line-tab)))) (tab-line-tab-inactive ((t (:inherit tab-line-tab))))
(tab-line-tab-current ((t (:inherit tab-line-tab (tab-line-tab-current ((t (:inherit ruler-mode-fill-column))))
:background "grey10" (tab-line-highlight ((t (:inherit tab-line-tab-current))))))
:foreground "grey70"))))
(tab-line-highlight ((t (:inherit tab-line-tab-current
:foreground "white"))))))
(provide 'basics/ui) (provide 'basics/ui)
;;; ui.el ends here ;;; ui.el ends here

View File

@ -1,6 +1,6 @@
;;; common.el --- Common programming settings. -*- lexical-binding: t; -*- ;;; common.el --- Common programming settings. -*- lexical-binding: t; -*-
;; Time-stamp: <2020-03-27T17:09:20+0100> ;; Time-stamp: <2020-04-17T02:54:46+0200>
;;; Commentary: ;;; Commentary:
@ -174,10 +174,11 @@ collapse other projects."
;; Highlight indentation. ;; Highlight indentation.
(use-package hl-indent (use-package hl-indent
:custom-face (hl-indent-face :after (doom-themes whitespace)
((t (:inherit hl-indent-face ; Reversed whitespace. :config (progn
:background "gray18" (set-face-background 'hl-indent-face ; Reverse whitespace-space.
:foreground "#1c1e1f")))) (face-foreground 'whitespace-space))
(set-face-foreground 'hl-indent-face (face-background 'default)))
:hook (prog-mode . hl-indent-mode)) :hook (prog-mode . hl-indent-mode))
;; Tries to find points of interest in buffer and jumps to them. ;; Tries to find points of interest in buffer and jumps to them.

View File

@ -1,6 +1,6 @@
;;; common.el --- Common settings for text files. -*- lexical-binding: t; -*- ;;; common.el --- Common settings for text files. -*- lexical-binding: t; -*-
;; Time-stamp: <2020-04-15T14:23:05+0200> ;; Time-stamp: <2020-04-17T03:49:42+0200>
;;; Commentary: ;;; Commentary:
@ -40,18 +40,23 @@
;; Ruler with fill-column marker. ;; Ruler with fill-column marker.
(use-package ruler-mode (use-package ruler-mode
:config (progn :config (progn
(set-face-background 'ruler-mode-default
(face-foreground 'line-number))
(set-face-foreground 'ruler-mode-default
(face-background 'default))
(set-face-foreground 'ruler-mode-column-number
(face-background 'default))
(set-face-foreground 'ruler-mode-fill-column
(face-foreground 'line-number-current-line))
(set-face-foreground 'ruler-mode-comment-column
(face-foreground 'ruler-mode-fill-column))
(set-face-foreground 'ruler-mode-goal-column
(face-foreground 'ruler-mode-fill-column))
(defun my/ruler-on () (defun my/ruler-on ()
"Turn `ruler-mode' on." "Turn `ruler-mode' on."
(ruler-mode 1))) (ruler-mode 1)))
:custom-face :custom-face (ruler-mode-default ((t (:inherit·default
(ruler-mode-default ((t :box·nil))))
(:inherit default
:background "gray18"
:foreground "dim gray"
:box nil))))
(ruler-mode-column-number ((t
(:inherit ruler-mode-default
:foreground "dark gray"))))
:hook ((find-file . my/ruler-on) :hook ((find-file . my/ruler-on)
(text-mode . my/ruler-on))) ; For the scratch buffer. (text-mode . my/ruler-on))) ; For the scratch buffer.
@ -237,8 +242,7 @@
:hook ((prog-mode . my/ws-load-local-vars-first) :hook ((prog-mode . my/ws-load-local-vars-first)
(conf-mode . my/ws-load-local-vars-first) (conf-mode . my/ws-load-local-vars-first)
(text-mode . my/ws-load-local-vars-first) (text-mode . my/ws-load-local-vars-first)
(before-save . my/ws-maybe-cleanup)) (before-save . my/ws-maybe-cleanup)))
:custom-face (whitespace-space ((nil :foreground "gray18"))))
(use-package ripgrep) (use-package ripgrep)