Added key binding to erase buffer conveniently.
authorOleksandr Gavenko <gavenkoa@gmail.com>
Wed, 06 Sep 2017 14:42:39 +0300
changeset 1536 5854fc2dbece
parent 1535 15388800a8e2
child 1537 592689d6d222
Added key binding to erase buffer conveniently.
.emacs-my
--- a/.emacs-my	Sun Aug 27 23:12:42 2017 +0300
+++ b/.emacs-my	Wed Sep 06 14:42:39 2017 +0300
@@ -1084,6 +1084,12 @@
 (global-set-key [?\C-x down] #'other-window)
 (global-set-key [s-up] #'my--backward-other-window)
 (global-set-key [s-down] #'other-window)
+(defun my--erase-buffer ()
+  (interactive)
+  (erase-buffer)
+  (when (buffer-file-name)
+    (basic-save-buffer)))
+(global-set-key [s-backspace] #'my--erase-buffer)
 
 (require 'uniquify)
 (setq uniquify-buffer-name-style 'post-forward)