emacs: update init.el

.config/emacs/init.el

@@ -31,7 +31,59 @@
     :config
     (load-theme 'monokai t))
 
+(use-package nerd-icons)
+(use-package nerd-icons-dired
+    :hook
+    (dired-mode . nerd-icons-dired-mode))
+
+(use-package doom-modeline
+    :init (doom-modeline-mode 1))
+
 ;; configure packages
+(use-package vertico
+    :bind
+    (:map vertico-map
+        (
+            "<tab>" . vertico-insert
+        )
+    )
+    :custom
+    (vertico-resize t)
+    (vertico-cycle t)
+    :config
+    (vertico-mode))
+
+(use-package marginalia
+    :after vertico
+    :custom
+    (marginalia-align 'right)
+    (marginalia-max-relative-age 0)
+    (marginalia-annotators
+      '(marginalia-annotators-heavy marginalia-annotators-light nil))
+    :config
+    (marginalia-mode))
+
+(use-package embark-consult)
+
+(use-package consult
+    :after vertico
+    :bind
+    (("C-s" . 'consult-line)
+     ("C-c p s" . 'consult-line-multi)
+     ("C-x C-b" . 'consult-buffer)
+     ("C-c b b" . 'consult-buffer)
+     ("C-x b" . 'consult-project-buffer)
+     ("C-x C-S-b" . 'ibuffer)))
+
+(use-package embark
+    :bind (("C-h B" . embark-bindings)))
+
+(use-package orderless
+    :custom
+    (completion-styles '(orderless basic))
+    (completion-category-defaults nil)
+    (completion-category-overrides '((file (styles partial-completion)))))
+
 (use-package editorconfig
     :config
     (editorconfig-mode 1))
@@ -41,12 +93,8 @@
 (use-package company
     :config
     (add-hook 'after-init-hook 'global-company-mode))
-
+(use-package company-box
-(use-package counsel)
+    :hook (company-mode . company-box-mode))
-(use-package swiper)
-(use-package ivy
-    :config
-    (ivy-mode 1))
 
 (use-package flycheck
     :config
@@ -57,24 +105,32 @@
   (add-hook 'prog-mode-hook 'highlight-indent-guides-mode)
   (add-hook 'yaml-mode-hook 'highlight-indent-guides-mode)
   (add-hook 'yaml-ts-mode-hook 'highlight-indent-guides-mode)
-  :config
+  :custom
-  (setq highlight-indent-guides-method 'character))
+  (highlight-indent-guides-method 'character))
+
+(use-package golden-ratio
+    :config
+    (golden-ratio-mode 1))
 
 (use-package yaml-mode
     :config
     (add-to-list 'auto-mode-alist '("\\.yml\\'" . yaml-mode))
     (add-to-list 'auto-mode-alist '("\\.yaml\\'" . yaml-mode)))
-
 (use-package markdown-mode
     :hook (markdown-mode . visual-line-mode))
-
 (use-package web-mode)
 (add-to-list 'auto-mode-alist '("\\.j2\\'" . web-mode))
 
-(use-package nerd-icons)
+;; MEOW MODE
+(load-file "~/.config/emacs/meow-setup.el")
+(use-package meow
+    :init
+    (meow-global-mode 1)
+    :config
+    (meow-setup))
 
 ;; config
-;; defaults
+;; modes
 (auto-save-mode -1)
 (global-display-line-numbers-mode 1)
 (menu-bar-mode -1)
@@ -83,42 +139,51 @@
 (delete-selection-mode +1)
 (column-number-mode +1)
 (global-auto-revert-mode +1)
-
 (recentf-mode 1)
 
+(use-package savehist
+    :ensure nil
+    :config
+    (savehist-mode))
+
+;; font
 (add-to-list 'default-frame-alist
-    '(font . "JetBrainsMono Nerd Font Mono-10"))
+    ;; '(font . "JetBrainsMono Nerd Font Mono-10"))
+    '(font . "FiraMono Nerd Font-11")
+    '(alpha-background . 95))
 
-(setq
+;; options
-    inhibit-startup-message t
+(setq inhibit-startup-message t)
-    ring-bell-function 'ignore
+(setq ring-bell-function 'ignore)
-    frame-resize-pixelwise t
+(setq frame-resize-pixelwise t)
-    confirm-kill-processes nil
+(setq confirm-kill-processes nil)
-    create-lockfiles nil
+(setq create-lockfiles nil)
-    backup-directory-alist '(("." . "~/emacs.d/backup"))
+(setq backup-directory-alist '(("." . "~/emacs.d/backup"))
-    auto-revert-interval 2
+(setq auto-revert-interval 2)
-    auto-revert-check-vc-info t
+(setq auto-revert-check-vc-info t)
-    global-auto-revert-non-file-buffers t
+(setq global-auto-revert-non-file-buffers t)
-    auto-revert-verbose nil
+(setq auto-revert-verbose nil)
-    custom-file "~/.config/emacs/init.custom.el")
+(setq custom-file "~/.config/emacs/init.custom.el")
 
+;; parentheses
 (use-package paren
     :ensure nil
-    :init (setq show-paren-delay 0)
+    :custom
-    :config (show-paren-mode +1))
+    (setq show-paren-delay 0)
+    :config
+    (show-paren-mode +1))
 
 ;; scrolling
+(autoload 'View-scroll-half-page-forward "view")
+(autoload 'View-scroll-half-page-backward "view")
+(global-set-key (kbd "C-v") 'View-scroll-half-page-forward)
+(global-set-key (kbd "M-v") 'View-scroll-half-page-backward)
 (setq
     scroll-margin 0
     scroll-conservatively 101
     scroll-preserve-screen-position t
     auto-window-vscroll nil)
 
-(use-package mwheel
-    :ensure nil
-    :config (setq mouse-wheel-scroll-amount '(2 ((shift) . 1))
-                mouse-wheel-progressive-speed nil))
-
 ;; keybinds
 
 (provide 'init)