From c2ecfe1ef3e1f5767f0e408c5429d08837cecb68 Mon Sep 17 00:00:00 2001 From: William Moore Date: Sun, 14 Jul 2024 04:03:59 -0500 Subject: [PATCH] Update to code --- whomp/whomp-dashboard.el | 45 ++++++++++++++++++++------------------ whomp/whomp-development.el | 6 ++--- 2 files changed, 27 insertions(+), 24 deletions(-) diff --git a/whomp/whomp-dashboard.el b/whomp/whomp-dashboard.el index 57296f8..d323dcf 100644 --- a/whomp/whomp-dashboard.el +++ b/whomp/whomp-dashboard.el @@ -1,26 +1,29 @@ -(straight-use-package 'dashboard) -(dashboard-setup-startup-hook) +(use-package dashboard + :straight t + :ensure t + :config + (dashboard-setup-startup-hook) -(setq dashboard-banner-logo-title (whomp/dashboard-build-logo-title whomp-help-lines)) -;; "Welcome to the W.H.O.M.P. Emacs Dashboard") -(setq dashboard-startup-banner (whomp/random-string-from-list (whomp/list-files-with-extension "~/.emacs.d/logos" "png"))) -(setq initial-buffer-choice (lambda () (get-buffer-create dashboard-buffer-name))) -(setq dashboard-center-content t) -(setq dashboard-vertically-center-content t) -(setq dashboard-show-shortcuts t) -(setq dashboard-items '((recents . 5) + (setq dashboard-banner-logo-title (whomp/dashboard-build-logo-title whomp-help-lines)) + ;; "Welcome to the W.H.O.M.P. Emacs Dashboard") + (setq dashboard-startup-banner (whomp/random-string-from-list (whomp/list-files-with-extension "~/.emacs.d/logos" "png"))) + (setq initial-buffer-choice (lambda () (get-buffer-create dashboard-buffer-name))) + (setq dashboard-center-content t) + (setq dashboard-vertically-center-content t) + (setq dashboard-show-shortcuts t) + (setq dashboard-items '((recents . 5) (agenda . 5))) -(setq dashboard-startupify-list '(dashboard-insert-banner - dashboard-insert-newline - dashboard-insert-banner-title - dashboard-insert-newline - dashboard-insert-navigator - dashboard-insert-newline - dashboard-insert-init-info - dashboard-insert-items - dashboard-insert-newline - dashboard-insert-footer)) + (setq dashboard-startupify-list '(dashboard-insert-banner + dashboard-insert-newline + dashboard-insert-banner-title + dashboard-insert-newline + dashboard-insert-navigator + dashboard-insert-newline + dashboard-insert-init-info + dashboard-insert-items + dashboard-insert-newline + dashboard-insert-footer)) -(message "W.H.O.M.P. Dashboard loaded") + (message "W.H.O.M.P. Dashboard loaded")) (provide 'whomp-dashboard) ;;; whomp-dashboard.el ends here diff --git a/whomp/whomp-development.el b/whomp/whomp-development.el index 0c625b6..f161145 100644 --- a/whomp/whomp-development.el +++ b/whomp/whomp-development.el @@ -49,9 +49,9 @@ ;; magit (when (memq 'magitmode whomp-development) - (straight-use-package 'magit) - (straight-use-package 'forge) - (straight-use-package 'magit-todos) + (use-package magit + :straight t + :defer t) (whomp/add-key-binding "g s" 'magit-status "Git status (magit entrypoint)") (whomp/add-key-binding "g l" 'magit-log "Git log (magit entrypoint)") (whomp/add-key-binding "g b" 'magit-blame "Git blame (magit entrypoint)")