From fddfe9859d7e9a3b9c96034461b75b7bc424135c Mon Sep 17 00:00:00 2001 From: User Date: Sun, 10 May 2026 17:40:10 +0800 Subject: [PATCH] Config: add hs-minor-mode support --- lisp/init-elpa.el | 5 +++-- lisp/init-kbd.el | 6 ++++++ lisp/init-org.el | 20 +++++++++++--------- lisp/init-prog.el | 3 +++ lisp/init-startup.el | 8 ++++++++ lisp/init-ui.el | 2 +- 6 files changed, 32 insertions(+), 12 deletions(-) diff --git a/lisp/init-elpa.el b/lisp/init-elpa.el index de84bda..dcdaf18 100644 --- a/lisp/init-elpa.el +++ b/lisp/init-elpa.el @@ -40,10 +40,11 @@ ;; delight (use-package delight - :config + :init (delight '((eldoc-mode nil eldoc) (org-indent-mode nil org) - (desktop-environment-mode nil desktop-environment)))) + (desktop-environment-mode nil desktop-environment) + (hs-minor-mode nil hideshow)))) ;; 安装gcmh用于管理内存回收 (use-package gcmh diff --git a/lisp/init-kbd.el b/lisp/init-kbd.el index 8a83ade..07fb214 100644 --- a/lisp/init-kbd.el +++ b/lisp/init-kbd.el @@ -158,6 +158,12 @@ "C-," 'duplicate-and-move-to-next-line "C-c o l" 'denote-link) +;; hs-hide-mode +(general-def hs-minor-mode-map + "C-c h" 'hs-toggle-hiding + "C-c H" 'hs-hide-all + "C-c S" 'hs-show-all) + ;; calendar (general-def calendar-mode-map "RET" 'denote-journal-calendar-find-file) diff --git a/lisp/init-org.el b/lisp/init-org.el index e6f9ed6..80cf294 100644 --- a/lisp/init-org.el +++ b/lisp/init-org.el @@ -18,14 +18,14 @@ (electric-pair-default-inhibit char)))))) ;; 预加载,防止windows的org-mode加载卡顿 -(if *is-windows* - (progn (run-with-idle-timer - 0.5 nil - (lambda () - (with-temp-buffer - (org-mode) - (org-mode)) - (message "Org preloaded"))))) +;; (if *is-windows* +;; (progn (run-with-idle-timer +;; 0.5 nil +;; (lambda () +;; (with-temp-buffer +;; (org-mode) +;; (org-mode)) +;; (message "Org preloaded"))))) ;; 设置标题字体大小 ;; (with-eval-after-load 'org @@ -51,7 +51,7 @@ (cond (*is-windows* (setq org-agenda-files '("h:/emacs/hugo/this-is-my-blog/all-blog.org" - "h:/emacs/my-org-daily/"))) + "h:/emacs/my-org-note/20260509T232442==agenda--all-my-todos__org.org"))) (*is-mac* (setq org-agenda-files '("~/org/my-org-note/20260509T232442==agenda--all-my-todos__org.org"))) (*is-linux* @@ -77,6 +77,8 @@ (setq denote-directory "~/org/my-org-note/") (setq denote-prompts '(title signature keywords)) (setq denote-title-history nil) + (setq denote-signature-history + '("note" "project" "fun" "wisdom" "article" "data" "metanote" "agenda")) (setq denote-known-keywords '("emacs" "org" "elisp" "scheme" "programming" "philosophy" "film" "linux" "computerstuff" "game" "masterpiece"))) diff --git a/lisp/init-prog.el b/lisp/init-prog.el index 85fbd80..9a16baa 100644 --- a/lisp/init-prog.el +++ b/lisp/init-prog.el @@ -4,6 +4,9 @@ ;;; Code: +;; hs-minor-mode +(add-hook 'prog-mode-hook 'hs-minor-mode) + ;; tree-sitter (use-package treesit-auto :config diff --git a/lisp/init-startup.el b/lisp/init-startup.el index 21e6c41..932bd13 100644 --- a/lisp/init-startup.el +++ b/lisp/init-startup.el @@ -97,6 +97,14 @@ ;; 移动到垃圾桶 (setq delete-by-moving-to-trash t) +;; 让xref用rg +(setq xref-search-program + (cond + ((or (executable-find "ripgrep") + (executable-find "rg")) + 'ripgrep) + (t 'grep))) + (provide 'init-startup) ;;; init-startup.el ends here diff --git a/lisp/init-ui.el b/lisp/init-ui.el index d9ee38a..30785af 100644 --- a/lisp/init-ui.el +++ b/lisp/init-ui.el @@ -32,7 +32,7 @@ ;; org-mode美化 (use-package olivetti - :config + :init (add-hook 'olivetti-mode-hook (lambda () (display-line-numbers-mode -1)))