From 6c337b21a091afacb9e68f2c293fa449dc26c1e2 Mon Sep 17 00:00:00 2001 From: Daniel Wu Date: Fri, 25 Jul 2014 06:55:00 -0400 Subject: [PATCH] fixed a bug in prelude-create-scratch-buffer --- core/prelude-core.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/core/prelude-core.el b/core/prelude-core.el index 72cb62c..12d15d0 100644 --- a/core/prelude-core.el +++ b/core/prelude-core.el @@ -371,9 +371,9 @@ Doesn't mess with special buffers." (defun prelude-create-scratch-buffer () "Create a new scratch buffer." (interactive) - (let ((buf (get-buffer-create (generate-new-buffer-name "*scratch*")))) - (set-buffer-major-mode buf) - (switch-to-buffer buf))) + (let ((buf (generate-new-buffer "*scratch*"))) + (switch-to-buffer buf) + (funcall initial-major-mode))) (defvar prelude-tips '("Press to open a file with external program."