jessieh/dot-emacs
jessieh/dot-emacs
1
Fork 0
Code

Fix broken scratch buffer keybind

Browse Source
This commit is contained in:
Jessie Hildebrandt 2020-07-21 20:25:39 -04:00
parent 1904c712f1
commit 331d8b8a13
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
init.el
View File

@ -267,8 +267,8 @@
(when (yes-or-no-p "The contents of this buffer have been modified. Really revert? ") (when (yes-or-no-p "The contents of this buffer have been modified. Really revert? ")
(revert-buffer :ignore-auto :noconfirm)))) (revert-buffer :ignore-auto :noconfirm))))
(defun switch-to-scratch-buffer () (defun open-scratch-buffer ()
"Switch to the scratch buffer, (re)creating it if not present." "Open the scratch buffer, (re)creating it if not present."
(interactive) (interactive)
(if (get-buffer "*scratch*") (if (get-buffer "*scratch*")
(switch-to-buffer "*scratch*") (switch-to-buffer "*scratch*")
@ -288,6 +288,7 @@
("C-z" . undo) ("C-z" . undo)
("C-c o" . switch-to-minibuffer-window) ("C-c o" . switch-to-minibuffer-window)
("C-c r" . revert-buffer-no-confirm) ("C-c r" . revert-buffer-no-confirm)
("C-c s" . open-scratch-buffer)
("C-c RET" . open-default-shell) ("C-c RET" . open-default-shell)
("C-x C-b" . ibuffer) ("C-x C-b" . ibuffer)
("M-n" . scroll-up-line) ("M-n" . scroll-up-line)