Create command kill-this-buffer-delet-this-window

It kill the current buffer and deletes the window.

init.el

@@ -1064,6 +1064,7 @@
  ("~" . toggle-char-case)
  ("|" . toggle-window-split)
  ("k" . gpolonkai/kill-this-buffer)
+ ("M-c" . gpolonkai/kill-this-buffer-delete-this-window)
  ("M-k" . gpolonkai/undo-buffer-kill)
  :map isearch-mode-map
  ("<C-return>" . isearch-exit-other-end)

lisp/window-manip.el

@@ -54,3 +54,10 @@
   "Quit WINDOW without killing it."
   (interactive)
   (quit-window nil window))
+
+(defun gpolonkai/kill-this-buffer-delete-this-window ()
+  "Kill the buffer in the current window, and then try to delete
+the current window."
+  (interactive)
+  (kill-this-buffer)
+  (delete-window))