Emacs: Fix dashboard startup
This commit is contained in:
@@ -409,7 +409,7 @@
|
||||
"b" '(:ignore t :which-key "buffer/bookmark")
|
||||
"b a" '(auto-revert-mode :which-key "Auto revert buffer")
|
||||
"b b" '(consult-buffer :which-key "Switch buffer")
|
||||
"b d" '(dot/dashboard-goto :which-key "Dashboard")
|
||||
"b d" '(dashboard-refresh-buffer :which-key "Dashboard")
|
||||
"b k" '(kill-current-buffer :which-key "Kill buffer")
|
||||
"b m" '(bookmark-set :which-key "Make bookmark")
|
||||
"b n" '(evil-buffer-new :which-key "New empty buffer")
|
||||
|
||||
@@ -117,7 +117,7 @@
|
||||
(:require dashboard)
|
||||
(:hook dot/hook-disable-line-numbers)
|
||||
(:when-loaded
|
||||
(setq initial-buffer-choice (lambda () (get-buffer-create "*dashboard*")))
|
||||
(setq initial-buffer-choice (lambda () (get-buffer-create "*dashboard*") (dashboard-refresh-buffer)))
|
||||
(setq dashboard-banner-logo-title "GNU Emacs master race!")
|
||||
(setq dashboard-center-content t)
|
||||
(setq dashboard-page-separator "\n\f\n")
|
||||
@@ -131,15 +131,6 @@
|
||||
(bookmarks . 5)
|
||||
(recents . 5)))
|
||||
|
||||
(defun dot/dashboard-goto ()
|
||||
"Go to the *dashboard* buffer, create if non-existing."
|
||||
(interactive)
|
||||
(let ((buffer "*dashboard*"))
|
||||
(unless (get-buffer buffer)
|
||||
(generate-new-buffer buffer)
|
||||
(dashboard-refresh-buffer))
|
||||
(switch-to-buffer buffer)))
|
||||
|
||||
;; Fix keybinds..
|
||||
|
||||
(defun dot/dashboard-goto-bookmarks ()
|
||||
@@ -157,9 +148,7 @@
|
||||
(interactive)
|
||||
(funcall (local-key-binding "r")))
|
||||
|
||||
(let ((command-line-args '("emacs"))) ;; TODO: Remove this when switching over
|
||||
(dashboard-setup-startup-hook)
|
||||
)
|
||||
))
|
||||
|
||||
;; -----------------------------------------
|
||||
|
||||
Reference in New Issue
Block a user