Update
This commit is contained in:
2
init.el
2
init.el
@@ -1,12 +1,14 @@
|
|||||||
;; -*- lexical-binding: t -*-
|
;; -*- lexical-binding: t -*-
|
||||||
|
|
||||||
(require 'init-better-default)
|
(require 'init-better-default)
|
||||||
|
(require 'init-utils)
|
||||||
(require 'init-completion)
|
(require 'init-completion)
|
||||||
(require 'init-meow)
|
(require 'init-meow)
|
||||||
(require 'init-edit)
|
(require 'init-edit)
|
||||||
(require 'init-ui)
|
(require 'init-ui)
|
||||||
(require 'init-bindings)
|
(require 'init-bindings)
|
||||||
|
|
||||||
|
|
||||||
(require 'init-dired)
|
(require 'init-dired)
|
||||||
;; (require 'init-dashboard)
|
;; (require 'init-dashboard)
|
||||||
|
|
||||||
|
|||||||
@@ -14,7 +14,4 @@
|
|||||||
(global-set-key (kbd "s-k") #'kill-current-buffer)
|
(global-set-key (kbd "s-k") #'kill-current-buffer)
|
||||||
(global-set-key (kbd "C-c q r") #'restart-emacs)
|
(global-set-key (kbd "C-c q r") #'restart-emacs)
|
||||||
|
|
||||||
(when (eq system-type 'darwin)
|
|
||||||
(global-set-key (kbd "s-x") #'execute-extended-command))
|
|
||||||
|
|
||||||
(provide 'init-bindings)
|
(provide 'init-bindings)
|
||||||
|
|||||||
@@ -4,6 +4,8 @@
|
|||||||
:ensure nil
|
:ensure nil
|
||||||
:bind (:map dired-mode-map
|
:bind (:map dired-mode-map
|
||||||
("C-c C-p" . wdired-change-to-wdired-mode))
|
("C-c C-p" . wdired-change-to-wdired-mode))
|
||||||
|
:bind (:map dired-mode-map
|
||||||
|
("b" . dired-up-directory))
|
||||||
:config
|
:config
|
||||||
;; Always delete and copy recursively
|
;; Always delete and copy recursively
|
||||||
(setq dired-recursive-deletes 'always
|
(setq dired-recursive-deletes 'always
|
||||||
|
|||||||
34
lisp/init-utils.el
Normal file
34
lisp/init-utils.el
Normal file
@@ -0,0 +1,34 @@
|
|||||||
|
;; -*- lexical-binding: t; -*-
|
||||||
|
|
||||||
|
(use-package which-key
|
||||||
|
:diminish
|
||||||
|
:functions childframe-completion-workable-p
|
||||||
|
:bind ("C-h M-m" . which-key-show-major-mode)
|
||||||
|
:hook (elpaca-after-init . which-key-mode)
|
||||||
|
:init (setq which-key-max-description-length 30
|
||||||
|
which-key-lighter nil
|
||||||
|
which-key-show-remaining-keys t)
|
||||||
|
:config
|
||||||
|
(which-key-add-key-based-replacements "C-c n" "org-mode")
|
||||||
|
(which-key-add-key-based-replacements "C-c l" "llm")
|
||||||
|
(which-key-add-key-based-replacements "C-c s" "search")
|
||||||
|
(which-key-add-key-based-replacements "C-c f" "find")
|
||||||
|
(which-key-add-key-based-replacements "C-c p" "project")
|
||||||
|
(which-key-add-key-based-replacements "C-c q" "quit")
|
||||||
|
(which-key-add-key-based-replacements "C-c w" "windows"))
|
||||||
|
|
||||||
|
(use-package grep
|
||||||
|
:ensure nil
|
||||||
|
:autoload grep-apply-setting
|
||||||
|
:init
|
||||||
|
(when (executable-find "rg")
|
||||||
|
(grep-apply-setting
|
||||||
|
'grep-command "rg --color=auto --null -nH --no-heading -e ")
|
||||||
|
(grep-apply-setting
|
||||||
|
'grep-template "rg --color=auto --null --no-heading -g '!*/' -e <R> <D>")
|
||||||
|
(grep-apply-setting
|
||||||
|
'grep-find-command '("rg --color=auto --null -nH --no-heading -e ''" . 38))
|
||||||
|
(grep-apply-setting
|
||||||
|
'grep-find-template "rg --color=auto --null -nH --no-heading -e <R> <D>")))
|
||||||
|
|
||||||
|
(provide 'init-utils)
|
||||||
Reference in New Issue
Block a user