From c5f0d846895422f47e2b7489a2d5fd5379eb5996 Mon Sep 17 00:00:00 2001
From: Jesus E <heckyel@riseup.net>
Date: Sat, 13 May 2023 15:40:16 -0400
Subject: [PATCH] improve dashboard

---
 modules/init-dashboard.el | 25 +++++++++++++++++++------
 1 file changed, 19 insertions(+), 6 deletions(-)

diff --git a/modules/init-dashboard.el b/modules/init-dashboard.el
index 4fea7e6..03ffa83 100644
--- a/modules/init-dashboard.el
+++ b/modules/init-dashboard.el
@@ -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