Improve emacs startup with a new hook.

This commit is contained in:
KJ 2024-04-27 01:24:25 -04:00
parent 2fd710ea54
commit b8cb8e3ad6
2 changed files with 11 additions and 3 deletions

View File

@ -94,5 +94,12 @@ If PROJECT is not specified, assume current project root."
(setq title-bar-maximixed t))) (setq title-bar-maximixed t)))
) )
;; Creando un hook para luego de que el theme ha cargado
(defvar after-load-theme-hook nil
"Hook run after a color theme is loaded using `load-theme'.")
(defadvice load-theme (after run-after-load-theme-hook activate)
"Run `after-load-theme-hook'."
(run-hooks 'after-load-theme-hook))
(provide 'init-functions) (provide 'init-functions)
;;; init-functions.el ends here. ;;; init-functions.el ends here.

View File

@ -325,18 +325,19 @@
:defer t :defer t
:ensure nil :ensure nil
:bind ("C-x C-r" . recentf-open-files) :bind ("C-x C-r" . recentf-open-files)
:hook :hook (after-load-theme . recentf-mode)
(elpaca-after-init . recentf-mode)
:config :config
(setq recentf-save-file (setq recentf-save-file
(recentf-expand-file-name (concat temp-dir "/recentf")) (recentf-expand-file-name (concat temp-dir "/recentf"))
recentf-auto-cleanup 'never
recentf-keep '(file-remote-p file-readable-p)
recentf-max-saved-items 1000 recentf-max-saved-items 1000
recentf-max-menu-items 500)) recentf-max-menu-items 500))
;; Busqueda rápida con ripgrep ;; Busqueda rápida con ripgrep
(use-package rg (use-package rg
:defer t :defer t
:hook (elpaca-after-init . rg-enable-default-bindings) ;; :hook (elpaca-after-init . rg-enable-default-bindings)
:bind (:map rg-global-map :bind (:map rg-global-map
("c" . rg-dwim-current-dir) ("c" . rg-dwim-current-dir)
("f" . rg-dwim-current-file) ("f" . rg-dwim-current-file)