Improve emacs startup.

This commit is contained in:
KJ 2024-04-26 01:24:39 -04:00
parent 3c6a7b371a
commit 48afb56d36

View File

@ -45,6 +45,15 @@
:defer t
:init
(dashboard-setup-startup-hook)
:hook
(dashboard-after-initialize . (lambda ()
"Refrescamos el dashboard con la agenda luego de cargar todo"
(setq dashboard-items '(
;; (recents . 10)
(agenda . 10)
))
(dashboard-refresh-buffer)
))
:config
(setq dashboard-set-file-icons t
dashboard-set-heading-icons t
@ -53,10 +62,7 @@
dashboard-agenda-time-string-format "%Y-%m-%d %H:%M")
(setq dashboard-startup-banner
(expand-file-name "duck.svg" user-emacs-directory))
(setq dashboard-items '(
(agenda . 10)
;;(recents . 10)
))
(setq dashboard-items '())
)
;; Coloca en emacs la documentacón distribuída por devdocs.io
@ -301,12 +307,13 @@
:defer t
:ensure nil
:bind ("C-x C-r" . recentf-open-files)
:hook
(elpaca-after-init . recentf-mode)
:config
(setq recentf-save-file
(recentf-expand-file-name (concat temp-dir "/recentf"))
recentf-max-saved-items 1000
recentf-max-menu-items 500)
(recentf-mode 1))
recentf-max-menu-items 500))
;; Busqueda rápida con ripgrep
(use-package rg
@ -324,9 +331,12 @@
;; Guardar la posición del cursor en un archivo para volver allí cuando se lo vuelva a abrir.
(use-package saveplace
:ensure nil
:init
:defer t
:hook
(elpaca-after-init . (lambda()
(setq save-place-file (locate-user-emacs-file (concat temp-dir "/places")))
(save-place-mode 1)
))
)
;; Paquete para crear imágens (solo lo uso para sacar capturas SVG de emacs)