43 lines
2.0 KiB
EmacsLisp
43 lines
2.0 KiB
EmacsLisp
(use-package dashboard
|
|
:straight t
|
|
:ensure t
|
|
:config
|
|
(dashboard-setup-startup-hook)
|
|
|
|
(setq whomp-banner-logo-title '("____ __ ____ __ __ ______ .___ ___. .______ "
|
|
"\\ \\ / \\ / / | | | | / __ \\ | \\/ | | _ \\"
|
|
" \\ \\/ \\/ / | |__| | | | | | | \\ / | | |_) |"
|
|
" \\ / | __ | | | | | | |\\/| | | ___/ "
|
|
" \\ /\\ / __ | | | | __| `--' | __| | | | __| | __ "
|
|
" \\__/ \\__/ (__)|__| |__| (__)\\______/ (__)__| |__| (__) _| (__)"
|
|
""
|
|
"It was created by Fuzzy and extended by William Moore"
|
|
""
|
|
"All W.H.O.M.P. commands will start with 'C-c w'"
|
|
"--------------"))
|
|
(setq whomp-banner-logo-title (append whomp-banner-logo-title whomp-help-lines))
|
|
|
|
(setq dashboard-banner-logo-title (mapconcat 'identity whomp-banner-logo-title "\n"))
|
|
(setq dashboard-startup-banner 'logo)
|
|
(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)
|
|
(bookmarks . 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))
|
|
|
|
(message "W.H.O.M.P. Dashboard loaded"))
|
|
(provide 'whomp-dashboard)
|
|
;;; whomp-dashboard.el ends here
|