Simplify user/scratch-buffer implementation
This commit is contained in:
parent
036d4e7c30
commit
1877a5cafe
4
init.el
4
init.el
@ -243,9 +243,7 @@ init file, which initializes the package manager during compile time."
|
|||||||
(defun user/scratch-buffer ()
|
(defun user/scratch-buffer ()
|
||||||
"Open the scratch buffer, (re)creating it if not present."
|
"Open the scratch buffer, (re)creating it if not present."
|
||||||
(interactive)
|
(interactive)
|
||||||
(pop-to-buffer (get-buffer-create "*scratch*") '((display-buffer-reuse-window display-buffer-same-window)))
|
(pop-to-buffer (startup--get-buffer-create-scratch) '((display-buffer-reuse-window display-buffer-same-window))))
|
||||||
(unless (derived-mode-p initial-major-mode)
|
|
||||||
(funcall initial-major-mode)))
|
|
||||||
|
|
||||||
(defun user/scan-directory-for-projects ()
|
(defun user/scan-directory-for-projects ()
|
||||||
"Prompt for a directory and then scan for any project roots within.
|
"Prompt for a directory and then scan for any project roots within.
|
||||||
|
Loading…
Reference in New Issue
Block a user