commit 5b3a91cd501ed9e980bf6b4285a8fa3124155c6a
from: Lukas Henkel <lh@entf.net>
date: Mon May 16 17:25:08 2022 UTC

Easy way to create new empty buffers

commit - 176221acbe983321ddd8bd6b809c199f717e3583
commit + 5b3a91cd501ed9e980bf6b4285a8fa3124155c6a
blob - e4d2c76e4526238abcdd64b08f21930827fac7b1
blob + 0bbca35d663078a75bafd4d3191de89a51a5e5ca
--- init.el
+++ init.el
@@ -132,6 +132,8 @@
   ("C-# n" . mc/mark-next-like-this)
   ("C-# p" . mc/mark-previous-like-this)
 
+  ("C-c n" . lh/buffer-create-new)
+  
   ("<mouse-8>" . xref-go-back)
   ("<mouse-9>" . xref-go-forward)))
 
blob - 59aca5a5f27872b64f31f654f75eaad9bc2ed022
blob + 50f76ec8f21650eef1e9bc72b48f267ee8a6ffeb
--- lisp/lh.el
+++ lisp/lh.el
@@ -105,4 +105,11 @@
   (interactive "MData: ")
   (insert (json-serialize obj)))
 
+(defun lh/buffer-create-new ()
+  (interactive)
+  (let ((buf (generate-new-buffer "new")))
+    (switch-to-buffer buf)
+    (setq-local buffer-offer-save t)
+    buf))
+
 (provide 'lh)