(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/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 ring-bell-function 'ignore) (tool-bar-mode -1) (load-theme 'tango-dark) (use-package evil :config (evil-mode +1)) (use-package evil-surround :after (evil) :config (evil-surround-mode +1)) (use-package which-key :config (which-key-mode +1)) (use-package general :config (general-create-definer leader :prefix "SPC" :states 'normal :keymaps 'override) (general-create-definer localleader :prefix "," :states 'normal :keymaps 'override) (leader "!" #'async-shell-command "f" '(:ignore t :wk "File") "s" '(:ignore t :wk "Search") "b" '(:ignore t :wk "Buffer")) (general-def :states 'visual "gr" 'eval-region) (leader :infix "b" "n" #'next-buffer "p" #'prev-buffer "b" #'counsel-switch-buffer "i" #'ibuffer) (leader :infix "f" "s" #'save-buffer "f" #'find-file "p" #'((lambda () (interactive) (find-file "~/.config/emacs/init.el")) :wk "Open init.el"))) (use-package counsel :general (leader "SPC" #'counsel-M-x) (leader :infix "s" "s" #'(swiper :wk "Search buffer") "r" #'(counsel-rg :wk "Ripgrep")) (general-def :keymaps 'ivy-mode-map "C-j" #'ivy-next-line-or-history "C-k" #'ivy-previous-line-or-history) :config (counsel-mode +1)) (use-package org) (use-package magit) (use-package evil-magit) (use-package telephone-line :hook (after-init . telephone-line-mode) :init ; Faces (defface my-accent-dark '((t (:foreground "Black" :background "Cadet Blue"))) "") (defface my-evil-dark '((t (:foreground "White" :background "Black"))) "") (defface my-accent-light '((t (:foreground "black" :background "Light Slate Grey"))) "") (defface my-evil-light '((t (:foreground "black" :background "Sky Blue"))) "") ;; Set telephone line faces (setq telephone-line-faces '((evil . (my-evil-dark . my-evil-dark)) (modal . telephone-line-modal-face) (ryo . telephone-line-ryo-modal-face) (accent . (my-accent-dark . telephone-line-accent-inactive)) (nil mode-line . mode-line-inactive))) ; Seperators (setq telephone-line-primary-left-separator 'telephone-line-abs-left telephone-line-secondary-left-separator 'telephone-line-identity-hollow-left telephone-line-primary-right-separator 'telephone-line-abs-right telephone-line-secondary-right-separator 'telephone-line-identity-hollow-right) ; LSP segment (telephone-line-defsegment +oreoline-lsp-segment () (if (bound-and-true-p lsp-mode) (propertize "") (propertize ""))) ; LHS (setq telephone-line-lhs '((evil . (telephone-line-evil-tag-segment telephone-line-buffer-modified-segment)) (accent . (telephone-line-vc-segment telephone-line-filesize-segment telephone-line-buffer-name-segment telephone-line-erc-modified-channels-segment telephone-line-process-segment)) (nil . ()))) ; RHS (setq telephone-line-rhs '((nil . (telephone-line-misc-info-segment)) (accent . (telephone-line-major-mode-segment +oreoline-lsp-segment telephone-line-flycheck-segment)) (evil . (telephone-line-airline-position-segment)))) :config (size-indication-mode +1))