;ELC   
;;; Compiled
;;; in Emacs version 26.3
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.

;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


#@172 Show the name of BUFFERS in the echo area.

BUFFERS is a list of buffers.
If optional arg COUNT is non-nil, then it's the length
of BUFFERS.

(fn BUFFERS &optional COUNT)
(defalias 'kmb--show-matches #[513 "\204 \300\301!\207\300\302\206 GA\203 \303\202 \304\305\306\307#$\207" [message "No buffers matching regexp" "Found %d match%s: %s" "es" "" mapconcat buffer-name ", "] 10 (#$ . 409)])
#@171 Return list of buffers whose name matching REGEXP.
If optional arg WITH-PROCESS is non-nil, then list just buffers
running a process.

(fn REGEXP &optional WITH-PROCESS)
(defalias 'kmb-list-matching-buffers #[513 "\300\301\302\303\304\305\306\307		\"\310\"\311\312%\313 \"\"\314!\210\211\207" [delq nil mapcar make-byte-code 257 "\302\300\303!\"\205 \301\203 \304!\205 \207\211\207" vconcat vector [string-match buffer-name get-buffer-process] 5 "\n\n(fn X)" buffer-list kmb--show-matches] 12 (#$ . 817) (byte-code "\211\203 \301\302!\202 \301\303!\211D\207" [current-prefix-arg read-string "List buffers running a process and matching regexp: " "List buffers matching regexp: "] 4)])
#@162 Kill all buffers whose name matching REGEXP without confirmation.
If a buffer is running a process, then delete the process before
kill the buffer.

(fn REGEXP)
(defalias 'kmb-kill-matching-buffers-no-ask #[257 "\300 \211\205 \211@\301\302!\"\203 \303!\210A\266\202\202 \207" [buffer-list string-match buffer-name kmb-delete-process-and-kill-buffer-no-ask] 7 (#$ . 1521) "sKill buffers matching regexp: "])
(defalias 'kmb-kill-matching-buffers 'kmb-kill-matching-buffers-no-ask)
#@65 Return list of buffers whose content match REGEXP.

(fn REGEXP)
(defalias 'kmb-list-buffers-matching-content #[257 "\300C\301\302\303\304\305\306\307\310		\"\311\"\312\313%\314 \"\"\315\242\"\210\207" [0 delq nil mapcar make-byte-code 257 "\302rq\210\303ed\"\262)\304\300\"\205 \301\211\242T\240\210\207" vconcat vector [nil buffer-substring-no-properties string-match] 5 "\n\n(fn B)" buffer-list kmb--show-matches] 12 (#$ . 2013) "sList buffers whose content matches regexp: "])
#@230 Delete BUFFER without confirmation.
BUFFER is a buffer or a list of buffers.
If the buffer is running a process, then delete the processes
before kill the buffer.
Interactivelly, delete the current buffer.

(fn &optional BUFFER)
(defalias 'kmb-delete-process-and-kill-buffer-no-ask #[256 "\211\206 p\300\301\302\303<\204 C\202 \"\"\304 \211\205[ \211@\305!\203A \211\203@ \211@\306!=\2039 \307\301\"\210A\266\202\202& \210\310!\203P r\211q\210\311\301!\210)\312!\210A\266\202\202 \262\207" [delq nil mapcar get-buffer process-list get-buffer-process process-buffer set-process-query-on-exit-flag buffer-modified-p set-buffer-modified-p kill-buffer] 11 (#$ . 2509) "i"])
(byte-code "\300\301\302\"\210\303\304!\207" [defalias kmb-kill-buffer kmb-delete-process-and-kill-buffer-no-ask provide kmb] 3)