oreodave/dotfiles
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

~formatting oreoline/config.el

Browse Source
This commit is contained in:
dx
2020-05-31 15:38:09 +01:00
parent 6e605639ee
commit 6c262a85bc
1 changed files with 31 additions and 31 deletions
Download Patch File Download Diff File Expand all files Collapse all files

62
Doom/.doom.d/modules/private/oreoline/config.el
View File

@@ -3,7 +3,7 @@
(use-package! telephone-line (use-package! telephone-line
:hook (after-init . telephone-line-mode) :hook (after-init . telephone-line-mode)
:init :init
; Faces ;; Faces
(defface my-accent-dark '((t (:foreground "Black" :background "Cadet Blue"))) "") (defface my-accent-dark '((t (:foreground "Black" :background "Cadet Blue"))) "")
(defface my-evil-dark '((t (:foreground "White" :background "Black"))) "") (defface my-evil-dark '((t (:foreground "White" :background "Black"))) "")
(defface my-accent-light '((t (:foreground "black" :background "Light Slate Grey"))) "") (defface my-accent-light '((t (:foreground "black" :background "Light Slate Grey"))) "")
@@ -11,49 +11,49 @@
;; Set telephone line faces ;; Set telephone line faces
(setq telephone-line-faces (setq telephone-line-faces
'((evil . (my-evil-dark . my-evil-dark)) '((evil . (my-evil-dark . my-evil-dark))
(modal . telephone-line-modal-face) (modal . telephone-line-modal-face)
(ryo . telephone-line-ryo-modal-face) (ryo . telephone-line-ryo-modal-face)
(accent . (my-accent-dark . telephone-line-accent-inactive)) (accent . (my-accent-dark . telephone-line-accent-inactive))
(nil mode-line . mode-line-inactive))) (nil mode-line . mode-line-inactive)))
(when (featurep! +light) (when (featurep! +light)
(setq telephone-line-faces (setq telephone-line-faces
'((evil . (my-evil-light . my-evil-light)) '((evil . (my-evil-light . my-evil-light))
(modal . telephone-line-modal-face) (modal . telephone-line-modal-face)
(ryo . telephone-line-ryo-modal-face) (ryo . telephone-line-ryo-modal-face)
(accent . (my-accent-light . telephone-line-accent-inactive)) (accent . (my-accent-light . telephone-line-accent-inactive))
(nil mode-line . mode-line-inactive)))) (nil mode-line . mode-line-inactive))))
; Seperators ;; Seperators
(setq telephone-line-primary-left-separator 'telephone-line-abs-left (setq telephone-line-primary-left-separator 'telephone-line-abs-left
telephone-line-secondary-left-separator 'telephone-line-identity-hollow-left telephone-line-secondary-left-separator 'telephone-line-identity-hollow-left
telephone-line-primary-right-separator 'telephone-line-abs-right telephone-line-primary-right-separator 'telephone-line-abs-right
telephone-line-secondary-right-separator 'telephone-line-identity-hollow-right) telephone-line-secondary-right-separator 'telephone-line-identity-hollow-right)
; LSP segment ;; LSP segment
(telephone-line-defsegment +oreoline-lsp-segment () (telephone-line-defsegment +oreoline-lsp-segment ()
(if (bound-and-true-p lsp-mode) (if (bound-and-true-p lsp-mode)
(propertize "") (propertize "")
(propertize ""))) (propertize "")))
; LHS ;; LHS
(setq telephone-line-lhs (setq telephone-line-lhs
'((evil . (telephone-line-evil-tag-segment '((evil . (telephone-line-evil-tag-segment
telephone-line-buffer-modified-segment)) telephone-line-buffer-modified-segment))
(accent . (telephone-line-vc-segment (accent . (telephone-line-vc-segment
telephone-line-filesize-segment telephone-line-filesize-segment
telephone-line-buffer-name-segment telephone-line-buffer-name-segment
telephone-line-erc-modified-channels-segment telephone-line-erc-modified-channels-segment
telephone-line-process-segment)) telephone-line-process-segment))
(nil . ()))) (nil . ())))
; RHS ;; RHS
(setq telephone-line-rhs (setq telephone-line-rhs
'((nil . (telephone-line-misc-info-segment)) '((nil . (telephone-line-misc-info-segment))
(accent . (telephone-line-major-mode-segment (accent . (telephone-line-major-mode-segment
+oreoline-lsp-segment +oreoline-lsp-segment
telephone-line-flycheck-segment)) telephone-line-flycheck-segment))
(evil . (telephone-line-airline-position-segment)))) (evil . (telephone-line-airline-position-segment))))
:config :config
(size-indication-mode +1)) (size-indication-mode +1))