diff --git a/config.el b/config.el index 33f67dc..ea77700 100644 --- a/config.el +++ b/config.el @@ -352,7 +352,7 @@ (map! "C-M-\\" #'+x/indent-region-or-buffer - "C-x k" #'kill-current-buffer + "C-x k" #'+x/kill-buffer "C-<" #'+x/scroll-down-one "C->" #'+x/scroll-up-one "M-Q" #'+x/unfill-paragraph diff --git a/repos/x-lib/x-lib.el b/repos/x-lib/x-lib.el index 03fce17..ab38e06 100644 --- a/repos/x-lib/x-lib.el +++ b/repos/x-lib/x-lib.el @@ -11,6 +11,12 @@ (indent-region (region-beginning) (region-end)) (indent-region (point-min) (point-max)))) +;;;###autoload +(defun +x/kill-buffer () + "Kill current buffer without prompting for which buffer." + (interactive) + (kill-buffer)) + ;;;###autoload (defun +x/scroll-down-one () "Scroll text (but not the point) of selected window downward one line."