;; -*- lexical-binding: t; -*-

;; Buffer-related configuration
(defun kill-other-buffers ()
  "Kill all other buffers."
  (interactive)
  (mapc 'kill-buffer (delq (current-buffer) (buffer-list))))

(defun switch-to-previous-buffer ()
  "Switch to previously open buffer.
Repeated invocations toggle between the two most recently open buffers."
  (interactive)
  (switch-to-buffer (other-buffer (current-buffer) 1)))


(leader-def-key
  "TAB" #'switch-to-previous-buffer
  "b" '(nil :which-key "buffer")
  "bb" #'switch-to-buffer
  "bd" #'kill-buffer
  "bm" #'kill-other-buffers
  "br" #'rename-buffer)

(provide 'init-buffers)