do a lot of things... doom-modeline etc

This commit is contained in:
MitchMarq42 2022-06-27 18:58:48 -08:00
parent 7d2aba1dc1
commit 7d3d0bb10d
3 changed files with 45 additions and 12 deletions

View File

@ -117,4 +117,8 @@
(setq gc-cons-threshold (* 2 1000 1000)) (setq gc-cons-threshold (* 2 1000 1000))
;; (add-function :before #'after-focus-change-function #'garbage-collect) ;; (add-function :before #'after-focus-change-function #'garbage-collect)
;; Smallen buffer if windows
(if (equal (window-system) 'w32)
(text-scale-decrease 2))
;;; init.el ends here ;;; init.el ends here

View File

@ -3,6 +3,7 @@
;; the elisp linter wants me to put some text here so I guess I will ;; the elisp linter wants me to put some text here so I guess I will
;;; Code: ;;; Code:
(require 'eshell)
(defun eshell/emacs (&rest args) (defun eshell/emacs (&rest args)
"Basically you can edit ARGS and it will open in a new buffer. "Basically you can edit ARGS and it will open in a new buffer.
When your shell is Emacs, your Emacs is but an oyster... When your shell is Emacs, your Emacs is but an oyster...
@ -10,7 +11,7 @@ This is taken from a website that I can't remember at the moment."
(if (null args) (if (null args)
(bury-buffer) (bury-buffer)
(mapc (mapc
#'find-file #'find-file-other-window
(mapcar (mapcar
#'expand-file-name (eshell-flatten-list (reverse args)))))) #'expand-file-name (eshell-flatten-list (reverse args))))))
(defun eshell/clear () (defun eshell/clear ()

View File

@ -117,6 +117,10 @@
(kbd "C-w") 'evil-window-map) (kbd "C-w") 'evil-window-map)
(evil-collection-define-key 'normal 'vterm-mode-map (evil-collection-define-key 'normal 'vterm-mode-map
(kbd "RET") 'hkey-either) (kbd "RET") 'hkey-either)
(evil-collection-define-key 'normal 'vterm-mode-map
(kbd "k") 'vterm-send-up)
(evil-collection-define-key 'normal 'vterm-mode-map
(kbd "j") 'vterm-send-down)
(add-to-list 'vterm-keymap-exceptions (add-to-list 'vterm-keymap-exceptions
"C-w") "C-w")
(add-to-list 'vterm-keymap-exceptions (add-to-list 'vterm-keymap-exceptions
@ -127,6 +131,8 @@
"find-file-other-window" "find-file-other-window"
"find-file-other-frame" "find-file-other-frame"
"eshell/emacs" "eshell/emacs"
"eshell/man"
"info-other-window"
"add-vterm-eval-cmd")) "add-vterm-eval-cmd"))
(defun add-vterm-eval-cmd (function) (defun add-vterm-eval-cmd (function)
"Add FUNCTION to `vterm-eval-cmds' so it can be ran through sh in vterm." "Add FUNCTION to `vterm-eval-cmds' so it can be ran through sh in vterm."
@ -157,23 +163,30 @@
"v" 'multi-vterm-other-window)) "v" 'multi-vterm-other-window))
;; Better modeline? ;; Better modeline?
(use-package powerline ;; (use-package powerline
:init ;; :init
:custom ;; :custom
(powerline-default-separator 'utf-8) ;; (powerline-default-separator 'utf-8)
(powerline-utf-8-separator-left 57532) ;; (powerline-utf-8-separator-left 57532)
(powerline-utf-8-separator-right 57534) ;; (powerline-utf-8-separator-right 57534)
(powerline-display-hud nil) ;; (powerline-display-hud nil)
(powerline-gui-use-vcs-glyph t)) ;; (powerline-gui-use-vcs-glyph t))
(use-package airline-themes (use-package airline-themes
:custom :custom
(airline-cursor-colors nil) (airline-cursor-colors nil)
(airline-display-directory t) (airline-display-directory t)
(airline-eshell-colors nil) (airline-eshell-colors nil)
(airline-shortened-directory-length 20) (airline-shortened-directory-length 20)
:after powerline ;; :after powerline
:after doom-modeline
:config :config
(load-theme 'airline-ravenpower t)) (load-theme 'airline-ravenpower 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
:config (doom-modeline-mode))
;; Custom Theme. ;; Custom Theme.
;; Not to be confused with a color theme, or a color scheme, or a custom scheme. ;; Not to be confused with a color theme, or a color scheme, or a custom scheme.
@ -530,8 +543,11 @@
(use-package eshell (use-package eshell
:straight (:type built-in) :straight (:type built-in)
:hook (eshell-mode . mitch/terminal-setup) :hook (eshell-mode . mitch/terminal-setup)
:commands eshell/emacs :commands (eshell/emacs eshell/man)
:config (require 'eshell-settings)) :config
(require 'eshell)
(require 'em-unix)
(require 'eshell-settings))
(use-package popper (use-package popper
:custom :custom
@ -589,5 +605,17 @@
:hook (dired-mode . dired-hide-details-mode) :hook (dired-mode . dired-hide-details-mode)
(dired-mode . wdired-mode)) (dired-mode . wdired-mode))
(use-package info-variable-pitch
:straight
(:type git :host github
:repo "kisaragi-hiu/info-variable-pitch")
:config
(add-hook 'Info-mode-hook #'info-variable-pitch-mode))
;; (use-package empv
;; :straight
;; (:type git :host github
;; :repo "isamert/empv.el"))
(provide 'mitch-packages) (provide 'mitch-packages)
;;; mitch-packages.el ends here ;;; mitch-packages.el ends here