clean up modeline and packages; add conditional SLIME
This commit is contained in:
parent
4a2bbd2741
commit
265512dd17
2
init.el
2
init.el
@ -65,7 +65,7 @@
|
||||
|
||||
;; straight.el: the better package manager?
|
||||
;; minified bootstrap (split lines if you want) (or not)
|
||||
(defvar bootstrap-version) (let ((bootstrap-file (expand-file-name "straight/repos/straight.el/bootstrap.el" user-emacs-directory)) (bootstrap-version 5)) (unless (file-exists-p bootstrap-file) (with-current-buffer (url-retrieve-synchronously "https://raw.githubusercontent.com/raxod502/straight.el/develop/install.el" 'silent 'inhibit-cookies) (goto-char (point-max)) (eval-print-last-sexp))) (load bootstrap-file nil 'nomessage)) (straight-use-package 'use-package) (setq straight-use-package-by-default t)
|
||||
(defvar bootstrap-version) (let ((bootstrap-file (expand-file-name "straight/repos/straight.el/bootstrap.el" user-emacs-directory)) (bootstrap-version 5)) (unless (file-exists-p bootstrap-file) (with-current-buffer (url-retrieve-synchronously "https://raw.githubusercontent.com/radian-software/straight.el/develop/install.el" 'silent 'inhibit-cookies) (goto-char (point-max)) (eval-print-last-sexp))) (load bootstrap-file nil 'nomessage)) (straight-use-package 'use-package) (setq straight-use-package-by-default t)
|
||||
|
||||
(require 'mitch-packages)
|
||||
|
||||
|
@ -174,15 +174,7 @@
|
||||
:prefix "SPC 4"
|
||||
"v" 'multi-vterm-other-window))
|
||||
|
||||
;; Better modeline?
|
||||
(use-package powerline
|
||||
:init
|
||||
:custom
|
||||
(powerline-default-separator 'utf-8)
|
||||
(powerline-utf-8-separator-left 57532)
|
||||
(powerline-utf-8-separator-right 57534)
|
||||
(powerline-display-hud nil)
|
||||
(powerline-gui-use-vcs-glyph t))
|
||||
;; Better modeline? Better modeline.
|
||||
(use-package airline-themes
|
||||
:custom
|
||||
(airline-cursor-colors nil)
|
||||
@ -190,23 +182,13 @@
|
||||
(airline-eshell-colors t)
|
||||
(airline-shortened-directory-length 20)
|
||||
(airline-utf-glyph-separator-left 9585)
|
||||
;; (airline-utf-glyph-separator-left "")
|
||||
(airline-utf-glyph-separator-right 9586)
|
||||
;; (airline-utf-glyph-separator-left "")
|
||||
;; (airline-utf-glyph-separator-right "")
|
||||
:after powerline
|
||||
;; :after doom-modeline
|
||||
:custom-face (mode-line ((t (:box (:line-width 2 :style released-button)))))
|
||||
:config
|
||||
(load-theme 'airline-ravenpower t)
|
||||
;; (load-theme 'airline-kolor t)
|
||||
)
|
||||
(use-package all-the-icons
|
||||
:init
|
||||
(unless (member "all-the-icons" (font-family-list))
|
||||
(all-the-icons-install-fonts t)))
|
||||
;; (use-package doom-modeline
|
||||
;; :custom-face (mode-line ((t (:box "#303030"))))
|
||||
;; :custom (doom-modeline-height 15)
|
||||
;; :config (doom-modeline-mode))
|
||||
(load-theme 'airline-ravenpower t))
|
||||
|
||||
;; Custom Theme.
|
||||
;; Not to be confused with a color theme, or a color scheme, or a custom scheme.
|
||||
@ -218,11 +200,7 @@
|
||||
:config
|
||||
(tooltip-mode -1)
|
||||
(menu-bar-mode -1)
|
||||
(load-theme 'mitch t)
|
||||
)
|
||||
;; (use-package doom-themes
|
||||
;; :init (load-theme 'doom-one t))
|
||||
;; (load-theme 'modus-vivendi t)
|
||||
(load-theme 'mitch t))
|
||||
|
||||
;; (use-package yascroll
|
||||
;; :diminish
|
||||
@ -303,8 +281,6 @@
|
||||
(ob-powershell-powershell-command "pwsh"))
|
||||
(use-package company-org-block
|
||||
:after (org company))
|
||||
(use-package org-modern
|
||||
:hook (org-mode . org-modern-mode))
|
||||
(use-package ox-hugo
|
||||
:after ox)
|
||||
|
||||
@ -654,5 +630,10 @@
|
||||
:straight (:type git :repo "https://git.mitchmarq42.xyz/mitch/ani-el"
|
||||
:files ("ani-el.el" "lib")))
|
||||
|
||||
(use-package slime
|
||||
:if (file-exists-p (expand-file-name "~/quicklisp/slime-helper.el"))
|
||||
:custom (inferior-lisp-program "sbcl")
|
||||
:init (load (expand-file-name "~/quicklisp/slime-helper.el")))
|
||||
|
||||
(provide 'mitch-packages)
|
||||
;;; mitch-packages.el ends here
|
||||
|
@ -125,7 +125,7 @@
|
||||
(transient-heading (:inherit 'default :foreground mitch-magenta :weight 'bold))
|
||||
(rainbow-delimiters-depth-1-face (:foreground mitch-light-magenta))
|
||||
(rainbow-delimiters-depth-2-face (:foreground mitch-magenta :weight 'normal))
|
||||
(vertical-border (:foreground mitch-light-magenta :weight 'bold))
|
||||
(vertical-border (:foreground mitch-mid-violet :weight 'bold))
|
||||
(fringe (:inherit 'default))
|
||||
(whitespace-space (:foreground mitch-black))
|
||||
(whitespace-tab (:foreground mitch-black))
|
||||
|
Loading…
Reference in New Issue
Block a user