improve dashboard

This commit is contained in:
Jesus E 2023-05-13 15:40:16 -04:00
parent 79cc50ce64
commit c5f0d84689
No known key found for this signature in database
GPG Key ID: 159C8F8BC9AED8B6

View File

@ -7,6 +7,7 @@
:pin "MELPA"
:ensure t
:config
;; Dashboard configuration
(dashboard-setup-startup-hook)
(setq dashboard-banner-logo-title "Emacs personal")
(setq dashboard-startup-banner 'logo)
@ -15,12 +16,24 @@
(setq dashboard-set-heading-icons t)
(setq dashboard-set-file-icons t)
(setq dashboard-set-footer nil)
(setq show-week-agenda-p t)
(setq dashboard-items '((recents . 5)
(bookmarks . 5)
(projects . 5)
(agenda . 5)
(registers . 5))))
;; Configuration of dashboard sections
(setq num-recents 5)
(setq num-bookmarks 5)
(setq num-projects 5)
(setq num-agenda 5)
(setq num-registers 5)
;; Note:
;; grave accent (`) is used to access Emacs commands known like "execute commands".
;; syntax ,variable is used in context of backquote (`) macro to evaluate
;; the variable and replace it with its value time of evaluation.
;; This is known as "unquote" and is useful for constructing complex forms or lists.
(setq dashboard-items `((recents . ,num-recents)
(bookmarks . ,num-bookmarks)
(projects . ,num-projects)
(agenda . ,num-agenda)
(registers . ,num-registers))))
(provide 'init-dashboard)
;;; init-dashboard.el ends here