1

Simplify user/scratch-buffer implementation

This commit is contained in:
Jessie Hildebrandt 2023-02-05 00:11:18 -05:00
parent 036d4e7c30
commit 1877a5cafe

View File

@ -243,9 +243,7 @@ init file, which initializes the package manager during compile time."
(defun user/scratch-buffer ()
"Open the scratch buffer, (re)creating it if not present."
(interactive)
(pop-to-buffer (get-buffer-create "*scratch*") '((display-buffer-reuse-window display-buffer-same-window)))
(unless (derived-mode-p initial-major-mode)
(funcall initial-major-mode)))
(pop-to-buffer (startup--get-buffer-create-scratch) '((display-buffer-reuse-window display-buffer-same-window))))
(defun user/scan-directory-for-projects ()
"Prompt for a directory and then scan for any project roots within.