correctly configure grep command, duplicate line, man program

This commit is contained in:
2026-06-25 11:46:21 -04:00
parent bac6f949ab
commit 05e0f0a082

27
init.el
View File

@@ -7,14 +7,10 @@
(set-frame-font "Berkeley Mono 16" nil t) (set-frame-font "Berkeley Mono 16" nil t)
(set-frame-font "BerkeleyMono 14" nil t)) (set-frame-font "BerkeleyMono 14" nil t))
;; dark mode
;; (load-theme 'modus-vivendi)
;; light mode
;; (load-theme 'modus-operandi)
(load-theme 'deeper-blue) (load-theme 'deeper-blue)
(when (string= system-type "darwin") (when (string= system-type "darwin")
(setq manual-program "gman")
(setq dired-use-ls-dired nil) (setq dired-use-ls-dired nil)
(setq mac-command-modifier 'control)) (setq mac-command-modifier 'control))
@@ -27,12 +23,14 @@
(keymap-global-set "M-3" #'split-window-right) (keymap-global-set "M-3" #'split-window-right)
(keymap-global-set "C-c e i" #'hgh/edit-init-file) (keymap-global-set "C-c e i" #'hgh/edit-init-file)
(keymap-global-set "C-," #'hgh/duplicate-dwim) (keymap-global-set "C-," #'duplicate-dwim)
(keymap-set help-map "h" #'eldoc) (keymap-set help-map "h" #'eldoc)
;; (keymap-global-set "C-h h" #'eldoc) ;; (keymap-global-set "C-h h" #'eldoc)
(setopt grep-find-program "rg --no-heading") (require 'grep)
(grep-apply-setting 'grep-command "rg --no-heading")
(grep-apply-setting 'grep-find-command nil)
(setq (setq
custom-file "~/.emacs.d/custom.el" custom-file "~/.emacs.d/custom.el"
@@ -41,14 +39,13 @@
manual-program "gman" manual-program "gman"
speedbar-window-default-width 25 speedbar-window-default-width 25
speedbar-window-max-width 25 speedbar-window-max-width 25
) duplicate-line-final-position -1
duplicate-region-final-position -1)
(load-file "~/.emacs.d/utils.el") (load-file "~/.emacs.d/utils.el")
;; (setq-default cursor-type 'bar)
(setopt (setopt
use-short-answers t use-short-answers t
use-dialog-box nil use-dialog-box nil
@@ -145,13 +142,7 @@
:bind (("C->" . mc/mark-next-like-this) :bind (("C->" . mc/mark-next-like-this)
("C-<" . mc/mark-previous-like-this) ("C-<" . mc/mark-previous-like-this)
("C-c C-<" . mc/mark-all-like-this) ("C-c C-<" . mc/mark-all-like-this)
("C-c C->" . mc/mark-lines)) ("C-c C->" . mc/mark-lines)))
:init
;; (advice-add 'mc/mark-next-like-this :before #'hgh/set-box-cursor)
;; (advice-add 'mc/mark-previous-like-this :before #'hgh/set-box-cursor)
;; (advice-add 'mc/mark-all-like-this :before #'hgh/set-box-cursor)
;; (add-hook 'multiple-cursors-mode-disabled-hook #'hgh/set-bar-cursor)
)
(use-package cape (use-package cape
:hook ((completion-at-point-functions . cape-dabbrev) :hook ((completion-at-point-functions . cape-dabbrev)
@@ -192,8 +183,6 @@
(use-package yaml-mode) (use-package yaml-mode)
;; (use-package vterm)
(use-package fish-mode) (use-package fish-mode)
(use-package yasnippet (use-package yasnippet