ikan Uploader :
Directory : /usr/share/emacs/25.2/lisp/
Upload File : |
| Current File : //usr/share/emacs/25.2/lisp/ibuf-ext.elc |
;ELC
;;; Compiled
;;; in Emacs version 25.2.1
;;; 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.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(require 'ibuffer)
#@75 Delete all entries in ALIST that have a key equal to KEY.
(fn KEY ALIST)
(defalias 'ibuffer-delete-alist #[514 "\300\301\"\211\262\203 \302\"\262\202 \207" [nil assoc delete] 6 (#$ . 429)])
#@67 Return a copy of LIST with duplicate elements removed.
(fn LIST)
(defalias 'ibuffer-remove-duplicates #[257 "\300\211\203 \211@\235\204 \211@B\262\211A\262\202 \237\207" [nil] 5 (#$ . 635)])
(defalias 'ibuffer-split-list #[514 "\300\211\211\203# \211@!\203 \211B\262\202 \211B\262A\266\202\202 \210\237\237D\207" [nil] 8 "\n\n(fn IBUFFER-SPLIT-LIST-FN IBUFFER-SPLIT-LIST-ELTS)"])
(byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313& \210\300\314\302\303\315DD\316\306\317\312\313&\207" [custom-declare-variable ibuffer-never-show-predicates funcall function #[0 "\300\207" [nil] 1] "A list of predicates (a regexp or function) for buffers not to display.\nIf a regexp, then it will be matched against the buffer's name.\nIf a function, it will be called with the buffer as an argument, and\nshould return non-nil if this buffer should not be shown." :type (repeat (choice regexp function)) :require ibuf-ext :group ibuffer ibuffer-always-show-predicates #[0 "\300\207" [nil] 1] "A list of predicates (a regexp or function) for buffers to always display.\nIf a regexp, then it will be matched against the buffer's name.\nIf a function, it will be called with the buffer as an argument, and\nshould return non-nil if this buffer should be shown.\nNote that buffers matching one of these predicates will be shown\nregardless of any active filters in this buffer." (repeat (choice regexp function))] 10)
#@64 A list of regexps which should match buffer names to not show.
(defvar ibuffer-tmp-hide-regexps nil (#$ . 2076))
#@67 A list of regexps which should match buffer names to always show.
(defvar ibuffer-tmp-show-regexps nil (#$ . 2195))
(defvar ibuffer-auto-buffers-changed nil)
(byte-code "\300\301\302\303\304DD\305\306\307\310\311&\207" [custom-declare-variable ibuffer-saved-filters funcall function #[0 "\300\207" [(("gnus" ((or (mode . message-mode) (mode . mail-mode) (mode . gnus-group-mode) (mode . gnus-summary-mode) (mode . gnus-article-mode)))) ("programming" ((or (mode . emacs-lisp-mode) (mode . cperl-mode) (mode . c-mode) (mode . java-mode) (mode . idl-mode) (mode . lisp-mode)))))] 1] "An alist of filter qualifiers to switch between.\n\nThis variable should look like ((\"STRING\" QUALIFIERS)\n (\"STRING\" QUALIFIERS) ...), where\nQUALIFIERS is a list of the same form as\n`ibuffer-filtering-qualifiers'.\nSee also the variables `ibuffer-filtering-qualifiers',\n`ibuffer-filtering-alist', and the functions\n`ibuffer-switch-to-saved-filters', `ibuffer-save-filters'." :type (repeat sexp) :group ibuffer] 8)
#@109 A list like (SYMBOL . QUALIFIER) which filters the current buffer list.
See also `ibuffer-filtering-alist'.
(defvar ibuffer-filtering-qualifiers nil (#$ . 3239))
#@394 An alist of (SYMBOL DESCRIPTION FUNCTION) which describes a filter.
You most likely do not want to modify this variable directly; see
`define-ibuffer-filter'.
SYMBOL is the symbolic name of the filter. DESCRIPTION is used when
displaying information to the user. FUNCTION is given a buffer and
the value of the qualifier, and returns non-nil if and only if the
buffer should be displayed.
(defvar ibuffer-filtering-alist nil (#$ . 3408))
(byte-code "\300\301\302\303\304DD\305\306\307\310\311&\207" [custom-declare-variable ibuffer-filter-format-alist funcall function #[0 "\300\207" [nil] 1] "An alist which has special formats used when a filter is active.\nThe contents of this variable should look like:\n ((FILTER (FORMAT FORMAT ...)) (FILTER (FORMAT FORMAT ...)) ...)\n\nFor example, suppose that when you add a filter for buffers whose\nmajor mode is `emacs-lisp-mode', you only want to see the mark and the\nname of the buffer. You could accomplish that by adding:\n (mode ((mark \" \" name)))\nto this variable." :type (repeat (list :tag "Association" (symbol :tag "Filter") (list :tag "Formats" (repeat (sexp :tag "Format"))))) :group ibuffer] 8)
(defvar ibuffer-cached-filter-formats nil)
(defvar ibuffer-compiled-filter-formats nil)
#@214 A list like (("NAME" ((SYMBOL . QUALIFIER) ...) ...) which groups buffers.
The SYMBOL should be one from `ibuffer-filtering-alist'.
The QUALIFIER should be the same as QUALIFIER in
`ibuffer-filtering-qualifiers'.
(defvar ibuffer-filter-groups nil (#$ . 4666))
(byte-code "\300\301\302\303\304DD\305\306\307\310\311&\210\300\312\302\303\313DD\314\306\315\310\311&\207" [custom-declare-variable ibuffer-show-empty-filter-groups funcall function #[0 "\300\207" [t] 1] "If non-nil, then show the names of filter groups which are empty." :type boolean :group ibuffer ibuffer-saved-filter-groups #[0 "\300\207" [nil] 1] "An alist of filtering groups to switch between.\n\nThis variable should look like ((\"STRING\" QUALIFIERS)\n (\"STRING\" QUALIFIERS) ...), where\nQUALIFIERS is a list of the same form as\n`ibuffer-filtering-qualifiers'.\n\nSee also the variables `ibuffer-filter-groups',\n`ibuffer-filtering-qualifiers', `ibuffer-filtering-alist', and the\nfunctions `ibuffer-switch-to-saved-filter-groups',\n`ibuffer-save-filter-groups'." (repeat sexp)] 8)
#@56 A list of filtering groups which are currently hidden.
(defvar ibuffer-hidden-filter-groups nil (#$ . 5761))
(defvar ibuffer-filter-group-kill-ring nil)
(byte-code "\300\301\302\303\304DD\305\306\307\310\311&\210\300\312\302\303\313DD\314\306\315\310\311&\207" [custom-declare-variable ibuffer-old-time funcall function #[0 "\300\207" [72] 1] "The number of hours before a buffer is considered \"old\"." :type (choice (const :tag "72 hours (3 days)" 72) (const :tag "48 hours (2 days)" 48) (const :tag "24 hours (1 day)" 24) (integer :tag "hours")) :group ibuffer ibuffer-save-with-custom #[0 "\300\207" [t] 1] "If non-nil, then use Custom to save interactively changed variables.\nCurrently, this only applies to `ibuffer-saved-filters' and\n`ibuffer-saved-filter-groups'." boolean] 8)
(defalias 'ibuffer-ext-visible-p #[770 "\306\"\206= \306 \"\206 \306\n\"?\205= \204\" \306 \"?\205= \f\2041 \211\205= \211=?\205= \307
\"\206= \306\"\207" [ibuffer-tmp-show-regexps ibuffer-tmp-hide-regexps ibuffer-never-show-predicates ibuffer-maybe-show-predicates ibuffer-view-ibuffer ibuffer-filtering-qualifiers ibuffer-buf-matches-predicates ibuffer-included-in-filters-p ibuffer-always-show-predicates] 6 "\n\n(fn BUF ALL &optional IBUFFER-BUF)"])
#@103 Non-nil if Ibuffer-Auto mode is enabled.
Use the command `ibuffer-auto-mode' to change this variable.
(defvar ibuffer-auto-mode nil (#$ . 7023))
(make-variable-buffer-local 'ibuffer-auto-mode)
#@250 Toggle use of Ibuffer's auto-update facility (Ibuffer Auto mode).
With a prefix argument ARG, enable Ibuffer Auto mode if ARG is
positive, and disable it otherwise. If called from Lisp, enable
the mode if ARG is omitted or nil.
(fn &optional ARG)
(defalias 'ibuffer-auto-mode #[256 "\301 \302=\203
?\202 \303!\304V\305\306!\204 \307\310!\210\311\312!\210\313\314\315\"\210\316\317\2030 \320\2021 \321\"\210\322\323!\203U \301 \203E \211\301 \232\203U \324\325\326\203P \327\202Q \330#\266\210\331 \210\207" [ibuffer-auto-mode current-message toggle prefix-numeric-value 0 derived-mode-p ibuffer-mode error "This buffer is not in Ibuffer mode" frame-or-buffer-changed-p ibuffer-auto-buffers-changed add-hook post-command-hook ibuffer-auto-update-changed run-hooks ibuffer-auto-mode-hook ibuffer-auto-mode-on-hook ibuffer-auto-mode-off-hook called-interactively-p any " in current buffer" message "Ibuffer-Auto mode %sabled%s" "en" "dis" force-mode-line-update] 7 (#$ . 7223) (byte-code "\206 \301C\207" [current-prefix-arg toggle] 1)])
#@182 Hook run after entering or leaving `ibuffer-auto-mode'.
No problems result if this variable is not bound.
`add-hook' automatically binds it. (This is true for all hook variables.)
(defvar ibuffer-auto-mode-hook nil (#$ . 8281))
(byte-code "\301\302\303\304\300!\205\n \303\211%\207" [ibuffer-auto-mode-map add-minor-mode ibuffer-auto-mode nil boundp] 6)
(defalias 'ibuffer-auto-update-changed #[0 "\301\302!\2057 \303 \211\2055 \211@\3041) r\211q\210\205$ \305\306!\205$ \307\310\311\")0\202- \210\202. \210A\266\202\202 \262\207" [ibuffer-auto-mode frame-or-buffer-changed-p ibuffer-auto-buffers-changed buffer-list (error) derived-mode-p ibuffer-mode ibuffer-update nil t] 5])
#@77 Enable or disable filtering by the major mode chosen via mouse.
(fn EVENT)
(defalias 'ibuffer-mouse-filter-by-mode #[257 "\300!\207" [ibuffer-interactive-filter-by-mode] 3 (#$ . 8972) "e"])
#@78 Enable or disable filtering by the major mode at point.
(fn EVENT-OR-POINT)
(defalias 'ibuffer-interactive-filter-by-mode #[257 "\301!\203 \302\303!!\210\202 \211b\210\304 \305\236\203\" \306\305\"\202+ \307\305\310\311\"B!\210\210\312\313\314\"\207" [ibuffer-filtering-qualifiers eventp posn-set-point event-end ibuffer-current-buffer mode ibuffer-delete-alist ibuffer-push-filter buffer-local-value major-mode ibuffer-update nil t] 7 (#$ . 9170) "d"])
#@82 Toggle the display status of the filter group chosen with the mouse.
(fn EVENT)
(defalias 'ibuffer-mouse-toggle-filter-group #[257 "\300\212\301!\210`)!\207" [ibuffer-toggle-filter-group-1 mouse-set-point] 4 (#$ . 9639) "e"])
#@61 Toggle the display status of the filter group on this line.
(defalias 'ibuffer-toggle-filter-group #[0 "\300`!\207" [ibuffer-toggle-filter-group-1] 2 (#$ . 9873) nil])
(defalias 'ibuffer-toggle-filter-group-1 #[257 "\301\302\"\211;\204
\303\304!\210\211\235\203 \305\"\202 \211B\306\307\310\"\207" [ibuffer-hidden-filter-groups get-text-property ibuffer-filter-group-name error "No filtering group name present" delete ibuffer-update nil t] 5 "\n\n(fn POSN)"])
#@70 Move point forwards by COUNT filtering groups.
(fn &optional COUNT)
(defalias 'ibuffer-forward-filter-group #[256 "\211\204 \300\262\211\301V\203) \302`\303\"\203 \304`\303\305d$b\210\304`\303\305d$b\210\306S!\210\307\301!\207" [1 0 get-text-property ibuffer-filter-group-name next-single-property-change nil ibuffer-forward-filter-group ibuffer-forward-line] 6 (#$ . 10350) "P"])
#@71 Move point backwards by COUNT filtering groups.
(fn &optional COUNT)
(defalias 'ibuffer-backward-filter-group #[256 "\211\204 \300\262\211\301V\203) \302`\303\"\203 \304`\303\305e$b\210\304`\303\305e$b\210\306S!\210`eU\2036 db\210\306\300!\210\307\301!\207" [1 0 get-text-property ibuffer-filter-group-name previous-single-property-change nil ibuffer-backward-filter-group ibuffer-forward-line] 6 (#$ . 10742) "P"])
#@81 Pipe the contents of each marked buffer to shell command COMMAND.
(fn COMMAND)
(defalias 'ibuffer-do-shell-command-pipe #[257 "\302\303!\204\n \304\305!\210\306\307 !\211\204 \310\311 !C\262\312 !\210\313\314\315\316\317!\320\"\321\322%\323 \"\324\325!\210\262\324\325!\210\326\327\"\262\207" [ibuffer-did-modification ibuffer-marked-char derived-mode-p ibuffer-mode cl--assertion-failed (derived-mode-p 'ibuffer-mode) nil ibuffer-buffer-names-with-mark buffer-name ibuffer-current-buffer ibuffer-set-mark make-byte-code 514 "rq\210\212\301ed\300\302\303!$\210*\304\207" vconcat vector [shell-command-on-region get-buffer-create "* ibuffer-shell-output*" t] 8 "\n\n(fn BUF MARK)" ibuffer-map-on-mark ibuffer-redisplay t message "Operation finished; Shell command executed on %s buffers"] 8 (#$ . 11169) "sPipe to shell command: "])
#@86 Replace the contents of marked buffers with output of pipe to COMMAND.
(fn COMMAND)
(defalias 'ibuffer-do-shell-command-pipe-replace #[257 "\302\303!\204\n \304\305!\210\306\307 !\211\204 \310\311 !C\262\312 !\210\313\314\"\205H \315\316\317\320\321!\322\"\323\324%\325 \"\326\327!\210\262\327\326\327!\210\330\331\"\262\207" [ibuffer-did-modification ibuffer-marked-char derived-mode-p ibuffer-mode cl--assertion-failed (derived-mode-p 'ibuffer-mode) nil ibuffer-buffer-names-with-mark buffer-name ibuffer-current-buffer ibuffer-set-mark ibuffer-confirm-operation-on "replace buffer contents in" make-byte-code 514 "rq\210\212rq\210\301ed\300\302\303%\210+\303\207" vconcat vector [shell-command-on-region nil t] 8 "\n\n(fn BUF MARK)" ibuffer-map-on-mark ibuffer-redisplay t message "Operation finished; Buffer contents replaced in %s buffers"] 8 (#$ . 12018) "sPipe to shell command (replace): "])
#@80 Run shell command COMMAND separately on files of marked buffers.
(fn COMMAND)
(defalias 'ibuffer-do-shell-command-file #[257 "\302\303!\204\n \304\305!\210\306\307 !\211\204 \310\311 !C\262\312 !\210\313\314\315\316\317!\320\"\321\322%\323 \"\324\325!\210\262\324\325!\210\326\327\"\262\207" [ibuffer-did-modification ibuffer-marked-char derived-mode-p ibuffer-mode cl--assertion-failed (derived-mode-p 'ibuffer-mode) nil ibuffer-buffer-names-with-mark buffer-name ibuffer-current-buffer ibuffer-set-mark make-byte-code 514 "rq\210\212\302\300\303\304 \203 \202 \305\306 \307\310\306 G^O!!Q!\210*\311\207" vconcat vector [buffer-file-name shell-command " " shell-quote-argument make-temp-file buffer-name 0 10 t] 11 "\n\n(fn BUF MARK)" ibuffer-map-on-mark ibuffer-redisplay t message "Operation finished; Shell command executed on %s buffers"] 8 (#$ . 12938) "sShell command on buffer's file: "])
#@138 Evaluate FORM in each of the buffers.
Does not display the buffer during evaluation. See
`ibuffer-do-view-and-eval' for that.
(fn FORM)
(defalias 'ibuffer-do-eval #[257 "\302\303!\204\n \304\305!\210\306\307 !\211\204 \310\311 !C\262\312 !\210\313\314\315\316\317!\320\"\321\322%\323 \"\324\325!\210\262\324\325!\210\326\327\"\262\207" [ibuffer-did-modification ibuffer-marked-char derived-mode-p ibuffer-mode cl--assertion-failed (derived-mode-p 'ibuffer-mode) nil ibuffer-buffer-names-with-mark buffer-name ibuffer-current-buffer ibuffer-set-mark make-byte-code 514 "\302!rq\210\212\303\300!\210*\304\302!=\204 \304\207" vconcat vector [ibuffer-did-modification buffer-modified-p eval t] 7 "\n\n(fn BUF MARK)" ibuffer-map-on-mark ibuffer-redisplay t message "Operation finished; evaluated in %s buffers"] 8 (#$ . 13856) (byte-code "\301\302\303\304\305%C\207" [read-expression-map read-from-minibuffer "Eval in buffers (form): " nil t read-expression-history] 6)])
#@141 Evaluate FORM while displaying each of the marked buffers.
To evaluate a form without viewing the buffer, see `ibuffer-do-eval'.
(fn FORM)
(defalias 'ibuffer-do-view-and-eval #[257 "\302\303!\204\n \304\305!\210\306\307 !\211\204 \310\311 !C\262\312 !\210\313\314\315\316\317!\320\"\321\322%\323 \"\324\325!\210\262\324\325!\210\326\327\"\262\207" [ibuffer-did-modification ibuffer-marked-char derived-mode-p ibuffer-mode cl--assertion-failed (derived-mode-p 'ibuffer-mode) nil ibuffer-buffer-names-with-mark buffer-name ibuffer-current-buffer ibuffer-set-mark make-byte-code 514 "\302!p\303\304\305\306\307!\310\"\311$\216\312!\210\313\300!)\262\302!=\204$ \314\207" vconcat vector [ibuffer-did-modification buffer-modified-p make-byte-code 0 "\301\300!\207" vconcat vector [switch-to-buffer] 2 switch-to-buffer eval t] 10 "\n\n(fn BUF MARK)" ibuffer-map-on-mark ibuffer-redisplay t message "Operation finished; evaluated in %s buffers"] 8 (#$ . 14847) (byte-code "\301\302\303\304\305%C\207" [read-expression-map read-from-minibuffer "Eval viewing in buffers (form): " nil t read-expression-history] 6)])
#@50 Rename marked buffers as with `rename-uniquely'.
(defalias 'ibuffer-do-rename-uniquely #[0 "\302\303!\204\n \304\305!\210\306\307 !\211\204 \310\311 !C\262\312 !\210\313\314 \"\315\316!\210\262\316\315\316!\210\317\320\"\262\207" [ibuffer-did-modification ibuffer-marked-char derived-mode-p ibuffer-mode cl--assertion-failed (derived-mode-p 'ibuffer-mode) nil ibuffer-buffer-names-with-mark buffer-name ibuffer-current-buffer ibuffer-set-mark #[514 "rq\210\212\300 \210*\301\207" [rename-uniquely t] 3 "\n\n(fn BUF MARK)"] ibuffer-map-on-mark ibuffer-redisplay t message "Operation finished; renamed %s buffers"] 5 (#$ . 15978) nil])
#@48 Revert marked buffers as with `revert-buffer'.
(defalias 'ibuffer-do-revert #[0 "\302\303!\204\n \304\305!\210\306\307 !\211\204 \310\311 !C\262\312 !\210\313\314\"\205: \315\316 \"\317\320!\210\262\317\320!\210\321\322\"\262\207" [ibuffer-did-modification ibuffer-marked-char derived-mode-p ibuffer-mode cl--assertion-failed (derived-mode-p 'ibuffer-mode) nil ibuffer-buffer-names-with-mark buffer-name ibuffer-current-buffer ibuffer-set-mark ibuffer-confirm-operation-on "revert" #[514 "\301!rq\210\212\302\303\211\"\210*\303\301!=\204 \303\207" [ibuffer-did-modification buffer-modified-p revert-buffer t] 7 "\n\n(fn BUF MARK)"] ibuffer-map-on-mark ibuffer-redisplay t message "Operation finished; reverted %s buffers"] 5 (#$ . 16627) nil])
#@48 Perform a `isearch-forward' in marked buffers.
(defalias 'ibuffer-do-isearch #[0 "\302\303!\204\n \304\305!\210\306\307 !\211\204 \310\311 !C\262\312 !\210\313\314 \"\315\316!\210\262\315\316!\210\317\320\"\262\207" [ibuffer-did-modification ibuffer-marked-char derived-mode-p ibuffer-mode cl--assertion-failed (derived-mode-p 'ibuffer-mode) nil ibuffer-buffer-names-with-mark buffer-name ibuffer-current-buffer ibuffer-set-mark #[514 "\301!\302\303 !\301!=\204 \304\207" [ibuffer-did-modification buffer-modified-p multi-isearch-buffers ibuffer-get-marked-buffers t] 7 "\n\n(fn BUF MARK)"] ibuffer-map-on-mark ibuffer-redisplay t message "Operation finished; searched in %s buffers"] 5 (#$ . 17391) nil])
#@55 Perform a `isearch-forward-regexp' in marked buffers.
(defalias 'ibuffer-do-isearch-regexp #[0 "\302\303!\204\n \304\305!\210\306\307 !\211\204 \310\311 !C\262\312 !\210\313\314 \"\315\316!\210\262\315\316!\210\317\320\"\262\207" [ibuffer-did-modification ibuffer-marked-char derived-mode-p ibuffer-mode cl--assertion-failed (derived-mode-p 'ibuffer-mode) nil ibuffer-buffer-names-with-mark buffer-name ibuffer-current-buffer ibuffer-set-mark #[514 "\301!\302\303 !\301!=\204 \304\207" [ibuffer-did-modification buffer-modified-p multi-isearch-buffers-regexp ibuffer-get-marked-buffers t] 7 "\n\n(fn BUF MARK)"] ibuffer-map-on-mark ibuffer-redisplay t message "Operation finished; searched regexp in %s buffers"] 5 (#$ . 18115) nil])
#@69 Perform a `replace-regexp' in marked buffers.
(fn FROM-STR TO-STR)
(defalias 'ibuffer-do-replace-regexp #[514 "\302\303!\204\n \304\305!\210\306\307 !\211\204 \310\311 !C\262\312 !\210\313\314\315\316\317\"\320\"\321\322%\323 \"\324\325!\210\262\324\325!\210\326\327\"\262\207" [ibuffer-did-modification ibuffer-marked-char derived-mode-p ibuffer-mode cl--assertion-failed (derived-mode-p 'ibuffer-mode) nil ibuffer-buffer-names-with-mark buffer-name ibuffer-current-buffer ibuffer-set-mark make-byte-code 514 "\305!\306 \307\310\311\312\313!\314\"\315$\216\316!\210\212eb\210\n\317\300\320\321#\203* \322\301!\210\202 +\321\262\305!=\2048 \321\207" vconcat vector [ibuffer-case-fold-search case-fold-search ibuffer-did-modification buffer-modified-p current-window-configuration make-byte-code 0 "\301\300!\207" vconcat vector [set-window-configuration] 2 switch-to-buffer re-search-forward nil t replace-match] 10 "\n\n(fn BUF MARK)" ibuffer-map-on-mark ibuffer-redisplay t message "Operation finished; replaced in %s buffers"] 10 (#$ . 18867) (byte-code "\300\301!\300\302\303Q!D\207" [read-from-minibuffer "Replace regexp: " "Replace " " with: "] 5)])
#@63 Perform a `query-replace' in marked buffers.
(fn &rest ARGS)
(defalias 'ibuffer-do-query-replace #[128 "\302\303!\204\n \304\305!\210\306\307 !\211\204 \310\311 !C\262\312 !\210\313\314\315\316\317!\320\"\321\322%\323 \"\324\325!\210\262\324\325!\210\326\327\"\262\207" [ibuffer-did-modification ibuffer-marked-char derived-mode-p ibuffer-mode cl--assertion-failed (derived-mode-p 'ibuffer-mode) nil ibuffer-buffer-names-with-mark buffer-name ibuffer-current-buffer ibuffer-set-mark make-byte-code 514 "\304!\305 \306\307\310\311\312!\313\"\314$\216\315!\210\212 eb\210\316\317\300\"\210+\320\262\304!=\204. \320\207" vconcat vector [ibuffer-case-fold-search case-fold-search ibuffer-did-modification buffer-modified-p current-window-configuration make-byte-code 0 "\301\300!\207" vconcat vector [set-window-configuration] 2 switch-to-buffer apply query-replace t] 10 "\n\n(fn BUF MARK)" ibuffer-map-on-mark ibuffer-redisplay t message "Operation finished; replaced in %s buffers"] 8 (#$ . 20053) (byte-code "\300\301\302\211#\207" [query-replace-read-args "Query replace" t] 4)])
#@70 Perform a `query-replace-regexp' in marked buffers.
(fn &rest ARGS)
(defalias 'ibuffer-do-query-replace-regexp #[128 "\302\303!\204\n \304\305!\210\306\307 !\211\204 \310\311 !C\262\312 !\210\313\314\315\316\317!\320\"\321\322%\323 \"\324\325!\210\262\324\325!\210\326\327\"\262\207" [ibuffer-did-modification ibuffer-marked-char derived-mode-p ibuffer-mode cl--assertion-failed (derived-mode-p 'ibuffer-mode) nil ibuffer-buffer-names-with-mark buffer-name ibuffer-current-buffer ibuffer-set-mark make-byte-code 514 "\304!\305 \306\307\310\311\312!\313\"\314$\216\315!\210\212 eb\210\316\317\300\"\210+\320\262\304!=\204. \320\207" vconcat vector [ibuffer-case-fold-search case-fold-search ibuffer-did-modification buffer-modified-p current-window-configuration make-byte-code 0 "\301\300!\207" vconcat vector [set-window-configuration] 2 switch-to-buffer apply query-replace-regexp t] 10 "\n\n(fn BUF MARK)" ibuffer-map-on-mark ibuffer-redisplay t message "Operation finished; replaced in %s buffers"] 8 (#$ . 21158) (byte-code "\300\301\302\211#\207" [query-replace-read-args "Query replace regexp" t] 4)])
#@46 Print marked buffers as with `print-buffer'.
(defalias 'ibuffer-do-print #[0 "\302\303!\204\n \304\305!\210\306\307 !\211\204 \310\311 !C\262\312 !\210\313\314 \"\315\316!\210\262\315\316!\210\317\320\"\262\207" [ibuffer-did-modification ibuffer-marked-char derived-mode-p ibuffer-mode cl--assertion-failed (derived-mode-p 'ibuffer-mode) nil ibuffer-buffer-names-with-mark buffer-name ibuffer-current-buffer ibuffer-set-mark #[514 "rq\210\212\300 \210*\301\207" [print-buffer t] 3 "\n\n(fn BUF MARK)"] ibuffer-map-on-mark ibuffer-redisplay t message "Operation finished; printed %s buffers"] 5 (#$ . 22291) nil])
(defalias 'ibuffer-included-in-filters-p #[514 "\300\301\302\303\304\305\306!\307\"\310\311%\">?\207" [nil mapcar make-byte-code 257 "\301\300\"\207" vconcat vector [ibuffer-included-in-filter-p] 4 "\n\n(fn QUAL)"] 10 "\n\n(fn BUF FILTERS)"])
(defalias 'ibuffer-included-in-filter-p #[514 "\211@\300=\203 \301A\"?\207\301\"\207" [not ibuffer-included-in-filter-p-1] 5 "\n\n(fn BUF FILTER)"])
(defalias 'ibuffer-included-in-filter-p-1 #[514 "\211@\211\302=\203 \303\304\305\306\307\310\311 !\312\"\313\314%A\">\202p \211\315=\203B \316A\"\211\2047 \317\303!\210\320\321A\"\210\322A@\"\262\202p @ \236\211@A\211@A\211@A\204e \317\303!\210\320\323
@\"\210
A\"\266\203\266\207\262??\207" [ibuffer-saved-filters ibuffer-filtering-alist or t mapcar make-byte-code 257 "\301\300\"\207" vconcat vector [ibuffer-included-in-filter-p] 4 "\n\n(fn X)" saved assoc ibuffer-filter-disable error "Unknown saved filter %s" ibuffer-included-in-filters-p "Undefined filter %s"] 16 "\n\n(fn BUF FILTER)"])
(defalias 'ibuffer-generate-filter-groups #[769 "\211\203 \202 \301\302\303BC\"\304G\303\"\305\211\203K \211@\211A\306\307\310\311\312\313!\314\"\315\316%\n\"\211@A@I\210T\262\262 \266A\266\202\202 \210\303\305\211W\203v \211H \203b \211\203m 8@BB\262\266\211T\262\202O \266\211\262\266\202\207" [ibuffer-filter-groups append "Default" nil make-vector 0 ibuffer-split-list make-byte-code 257 "\301@\300\"\207" vconcat vector [ibuffer-included-in-filters-p] 4 "\n\n(fn BUFMARK)"] 16 "\n\n(fn BMARKLIST &optional NOEMPTY NODEFAULT)"])
#@61 Make the current filters into a filtering group.
(fn NAME)
(defalias 'ibuffer-filters-to-filter-group #[257 "\204 \302\303!\210\211B B\304 \207" [ibuffer-filtering-qualifiers ibuffer-filter-groups error "No filters in effect" ibuffer-filter-disable] 3 (#$ . 24509) "sName for filtering group: "])
#@50 Set the current filter groups to filter by mode.
(defalias 'ibuffer-set-filter-groups-by-mode #[0 "\302\303\304\302\305\306 \"!\203 \211\202 \307\310\"\262\"\311\312\313\"\207" [ibuffer-view-ibuffer ibuffer-filter-groups mapcar #[257 "\300\301\"\302BCB\207" [format "%s" mode] 4 "\n\n(fn MODE)"] ibuffer-remove-duplicates #[257 "\300\301\"\207" [buffer-local-value major-mode] 4 "\n\n(fn BUF)"] buffer-list delq ibuffer-mode ibuffer-update nil t] 6 (#$ . 24817) nil])
#@32 Remove the first filter group.
(defalias 'ibuffer-pop-filter-group #[0 "\204 \302\303!\210\304\211A\242 \"\305\306\307\"\207" [ibuffer-filter-groups ibuffer-hidden-filter-groups error "No filter groups active" delete ibuffer-update nil t] 3 (#$ . 25300) nil])
(defalias 'ibuffer-read-filter-group-name #[769 "\211\204\f \204\f \303\304!\210\305\306\307 ?#\203! \310\311\n\"\202\" \n\244\312\313$\207" [ibuffer-filter-groups ibuffer-show-empty-filter-groups ibuffer-hidden-filter-groups error "No filter groups active" completing-read ibuffer-generate-filter-groups ibuffer-current-state-list remove "Default" nil t] 9 "\n\n(fn MSG &optional NODEFAULT NOERROR)"])
#@67 Decompose the filter group GROUP into active filters.
(fn GROUP)
(defalias 'ibuffer-decompose-filter-group #[257 "\302\"A\303\"\304\305\306\"\207" [ibuffer-filter-groups ibuffer-filtering-qualifiers assoc ibuffer-delete-alist ibuffer-update nil t] 5 (#$ . 25980) (byte-code "\300\301\302\"C\207" [ibuffer-read-filter-group-name "Decompose filter group: " t] 3)])
#@27 Remove all filter groups.
(defalias 'ibuffer-clear-filter-groups #[0 "\302\211\303\302\304\"\207" [ibuffer-filter-groups ibuffer-hidden-filter-groups nil ibuffer-update t] 4 (#$ . 26356) nil])
(defalias 'ibuffer-current-filter-groups-with-position #[0 "\212eb\210\300\211m\204* \301`\302\"\211\262\203* b\210\303`\302\"BB\262\301\302\"b\210\202 \211\237\266\202)\207" [nil next-single-property-change ibuffer-filter-group-name get-text-property] 5])
#@63 Move point to the filter group whose name is NAME.
(fn NAME)
(defalias 'ibuffer-jump-to-filter-group #[257 "\300\301 \"\211\203 \211\211Ab\262\202 \302\303\"\207" [assoc ibuffer-current-filter-groups-with-position error "No filter group with name %s"] 5 (#$ . 26821) (byte-code "\300\301!C\207" [ibuffer-read-filter-group-name "Jump to filter group: "] 2)])
#@107 Kill the filter group named NAME.
The group will be added to `ibuffer-filter-group-kill-ring'.
(fn NAME)
(defalias 'ibuffer-kill-filter-group #[257 "\211\303\232\203\n \304\305!\210\306\"\211\203' \211\307! B\310\"\311\n\"\210\202, \304\312\"\210\210\313\314\315\"\207" [ibuffer-filter-groups ibuffer-filter-group-kill-ring ibuffer-hidden-filter-groups "Default" error "Can't kill default filter group" assoc copy-tree ibuffer-delete-alist delete "No filter group with name \"%s\"" ibuffer-update nil t] 6 (#$ . 27192) (byte-code "\300\301\302\"C\207" [ibuffer-read-filter-group-name "Kill filter group: " t] 3)])
#@105 Kill the filter group at point.
See also `ibuffer-kill-filter-group'.
(fn &optional ARG INTERACTIVE-P)
(defalias 'ibuffer-kill-line #[512 "\212\300\301!\210\302`\303\")\211\203 \211\304!\262\202# \203 \305\202 \306\307\"\207" [ibuffer-forward-line 0 get-text-property ibuffer-filter-group-name ibuffer-kill-filter-group call-interactively funcall kill-line] 6 (#$ . 27824) "P\np"])
(defalias 'ibuffer-insert-filter-group-before #[514 "\301\302\303\"\304\203% @\232\203 \305\262\301\262\202 \211T\262A\262\202 \262\2044 C\244\211\202X \211\304U\203B B\211\202X \211\233\211\211@AB\241\266\211\211\240\262\262\207" [ibuffer-filter-groups nil mapcar car 0 t] 9 "\n\n(fn NEWGROUP GROUP)"])
#@58 Yank the last killed filter group before group at point.
(defalias 'ibuffer-yank #[0 "\300\301`\302\"\206 \301`\303\"\206 \304\305!!\207" [ibuffer-yank-filter-group get-text-property ibuffer-filter-group-name ibuffer-filter-group error "No filter group at point"] 4 (#$ . 28552) nil])
#@71 Yank the last killed filter group before group named NAME.
(fn NAME)
(defalias 'ibuffer-yank-filter-group #[257 "\204 \301\302!\210\212\303\304!\210\305\211A\242\"\210)\306\307\310\"\207" [ibuffer-filter-group-kill-ring error "The Ibuffer filter group kill-ring is empty" ibuffer-forward-line 0 ibuffer-insert-filter-group-before ibuffer-update nil t] 4 (#$ . 28845) (byte-code "\300\301!C\207" [ibuffer-read-filter-group-name "Yank filter group before group: "] 2)])
#@176 Save all active filter groups GROUPS as NAME.
They are added to `ibuffer-saved-filter-groups'. Interactively,
prompt for NAME, and use the current filters.
(fn NAME GROUPS)
(defalias 'ibuffer-save-filter-groups #[514 "\301\"\211\203 \211\211\241\266\202 BB\210\302 \207" [ibuffer-saved-filter-groups assoc ibuffer-maybe-save-stuff] 6 (#$ . 29326) (byte-code "\204 \301\302!\207\303\304!D\207" [ibuffer-filter-groups error "No filter groups active" read-from-minibuffer "Save current filter groups as: "] 2)])
#@103 Delete saved filter groups with NAME.
They are removed from `ibuffer-saved-filter-groups'.
(fn NAME)
(defalias 'ibuffer-delete-saved-filter-groups #[257 "\301\"\302 \210\303\304\305\"\207" [ibuffer-saved-filter-groups ibuffer-delete-alist ibuffer-maybe-save-stuff ibuffer-update nil t] 4 (#$ . 29857) (byte-code "\204\n \301\302!\202 \303\304\305\306$C\207" [ibuffer-saved-filter-groups error "No saved filter groups" completing-read "Delete saved filter group: " nil t] 5)])
#@126 Set this buffer's filter groups to saved version with NAME.
The value from `ibuffer-saved-filter-groups' is used.
(fn NAME)
(defalias 'ibuffer-switch-to-saved-filter-groups #[257 "\303\"A\304\305\304\306\"\207" [ibuffer-saved-filter-groups ibuffer-filter-groups ibuffer-hidden-filter-groups assoc nil ibuffer-update t] 4 (#$ . 30347) (byte-code "\204\n \301\302!\202 A\204 @@\202 \303\304\305\306$C\207" [ibuffer-saved-filter-groups error "No saved filters" completing-read "Switch to saved filter group: " nil t] 5)])
#@221 Disable all filters currently in effect in this buffer.
With optional arg DELETE-FILTER-GROUPS non-nil, delete all filter
group definitions by setting `ibuffer-filter-groups' to nil.
(fn &optional DELETE-FILTER-GROUPS)
(defalias 'ibuffer-filter-disable #[256 "\302\211\203 \302\303 \304\302\305\"\210\211\205 \306\307!!\207" [ibuffer-filtering-qualifiers ibuffer-filter-groups nil ibuffer-current-buffer ibuffer-update t ibuffer-jump-to-buffer buffer-name] 5 (#$ . 30885) nil])
#@39 Remove the top filter in this buffer.
(defalias 'ibuffer-pop-filter #[0 "\204 \301\302!\210\210A\303 \304\305\306\"\210\211\205 \307\310!!\207" [ibuffer-filtering-qualifiers error "No filters in effect" ibuffer-current-buffer ibuffer-update nil t ibuffer-jump-to-buffer buffer-name] 4 (#$ . 31375) nil])
#@66 Add QUALIFIER to `ibuffer-filtering-qualifiers'.
(fn QUALIFIER)
(defalias 'ibuffer-push-filter #[257 "\211B\211\207" [ibuffer-filtering-qualifiers] 3 (#$ . 31692)])
#@276 Separate the top compound filter (OR, NOT, or SAVED) in this buffer.
This means that the topmost filter on the filtering stack, which must
be a complex filter like (OR [name: foo] [mode: bar-mode]), will be
turned into two separate filters [name: foo] and [mode: bar-mode].
(defalias 'ibuffer-decompose-filter #[0 "\204 \302\303!\210\211A\242\211@\211\304=\203 \305A\"\202U \211\306=\203A \307A \"\211\2046 \310 \210\302\311A\"\210\305A@\"\210\202U \211\312=\203O AB\202U \302\313@\"\210\266\314\315\316\"\207" [ibuffer-filtering-qualifiers ibuffer-saved-filters error "No filters in effect" or append saved assoc ibuffer-filter-disable "Unknown saved filter %s" not "Filter type %s is not compound" ibuffer-update nil t] 6 (#$ . 31867) nil])
#@59 Exchange the top two filters on the stack in this buffer.
(defalias 'ibuffer-exchange-filters #[0 "G\301W\203 \302\303!\210\211A\242\211A\242B\211B\266\304\305\306\"\207" [ibuffer-filtering-qualifiers 2 error "Need two filters to exchange" ibuffer-update nil t] 4 (#$ . 32635) nil])
#@59 Negate the sense of the top filter in the current buffer.
(defalias 'ibuffer-negate-filter #[0 "\204 \301\302!\210\211A\242\211@\303=\203 \211A\202 \303BB\210\304\305\306\"\207" [ibuffer-filtering-qualifiers error "No filters in effect" not ibuffer-update nil t] 3 (#$ . 32936) nil])
#@176 Replace the top two filters in this buffer with their logical OR.
If optional argument REVERSE is non-nil, instead break the top OR
filter into parts.
(fn &optional REVERSE)
(defalias 'ibuffer-or-filter #[256 "\211\203\" \203 @@\301=\204 \302\303!\210\211A\242\211A\244\210\202S G\304W\203- \302\305!\210\211A\242\211A\242\211@\301=\203J \301DA\244B\202Q \301EB\266\306\307\310\"\207" [ibuffer-filtering-qualifiers or error "Top filter is not an OR" 2 "Need two filters to OR" ibuffer-update nil t] 6 (#$ . 33236) "P"])
(defalias 'ibuffer-maybe-save-stuff #[0 "\205 \303\304!\203 \304\301 \"\210\304\302\n\"\207\305\306!\207" [ibuffer-save-with-custom ibuffer-saved-filters ibuffer-saved-filter-groups fboundp customize-save-variable message "Not saved permanently: Customize not available"] 3])
#@152 Save FILTERS in this buffer with name NAME in `ibuffer-saved-filters'.
Interactively, prompt for NAME, and use the current filters.
(fn NAME FILTERS)
(defalias 'ibuffer-save-filters #[514 "\301\"\211\203 \211\211\241\266\202 DB\210\302 \207" [ibuffer-saved-filters assoc ibuffer-maybe-save-stuff] 6 (#$ . 34065) (byte-code "\204 \301\302!\207\303\304!D\207" [ibuffer-filtering-qualifiers error "No filters currently in effect" read-from-minibuffer "Save current filters as: "] 2)])
#@73 Delete saved filters with NAME from `ibuffer-saved-filters'.
(fn NAME)
(defalias 'ibuffer-delete-saved-filters #[257 "\301\"\302 \210\303\304\305\"\207" [ibuffer-saved-filters ibuffer-delete-alist ibuffer-maybe-save-stuff ibuffer-update nil t] 4 (#$ . 34567) (byte-code "\204\n \301\302!\202 \303\304\305\306$C\207" [ibuffer-saved-filters error "No saved filters" completing-read "Delete saved filters: " nil t] 5)])
#@85 Add saved filters from `ibuffer-saved-filters' to this buffer's filters.
(fn NAME)
(defalias 'ibuffer-add-saved-filters #[257 "\301BB\302\303\304\"\207" [ibuffer-filtering-qualifiers saved ibuffer-update nil t] 4 (#$ . 34997) (byte-code "\204\n \301\302!\202 \303\304\305\306$C\207" [ibuffer-saved-filters error "No saved filters" completing-read "Add saved filters: " nil t] 5)])
#@89 Set this buffer's filters to filters with NAME from `ibuffer-saved-filters'.
(fn NAME)
(defalias 'ibuffer-switch-to-saved-filters #[257 "\301BC\302\303\304\"\207" [ibuffer-filtering-qualifiers saved ibuffer-update nil t] 4 (#$ . 35391) (byte-code "\204\n \301\302!\202 \303\304\305\306$C\207" [ibuffer-saved-filters error "No saved filters" completing-read "Switch to saved filters: " nil t] 5)])
(defalias 'ibuffer-format-filter-group-data #[257 "\211\301\232\203 \302\207\303\304\305\236A\306#P\207" [ibuffer-filter-groups "Default" "" "Filter:" mapconcat ibuffer-format-qualifier " "] 6 "\n\n(fn FILTER)"])
(defalias 'ibuffer-format-qualifier #[257 "\211\242\300=\203 \301\302A!\303Q\207\302!\207" [not " [NOT" ibuffer-format-qualifier-1 "]"] 4 "\n\n(fn QUALIFIER)"])
(defalias 'ibuffer-format-qualifier-1 #[257 "\211@\211\301=\203 \302A\303Q\202= \211\304=\203\" \305\306\307A\310#\303Q\202= @\236\204/ \311\312\"\210\313A@\314\315\316A\"R\262\207" [ibuffer-filtering-alist saved " [filter: " "]" or " [OR" mapconcat ibuffer-format-qualifier "" error "Ibuffer: bad qualifier %s" " [" ": " format "%s]"] 9 "\n\n(fn QUALIFIER)"])
#@150 Create a completion table of buffer modes currently in use.
If INCLUDE-PARENTS is non-nil then include parent modes.
(fn &optional INCLUDE-PARENTS)
(defalias 'ibuffer-list-buffer-modes #[256 "\300\301 \211\2030 \211@\302\303\"\211\203( \211>\204( \211B\262\205# \211\304N\262\202
\210A\266\202\202 \210\305\306\"\207" [nil buffer-list buffer-local-value major-mode derived-mode-parent mapcar symbol-name] 7 (#$ . 36553)])
#@75 Toggle current view to buffers with major mode QUALIFIER.
(fn QUALIFIER)
(defalias 'ibuffer-filter-by-mode #[257 "\300\301B!\210\302\303\304\305\"\"\210\306\307\310\"\207" [ibuffer-push-filter mode message "%s" format "Filter by major mode added: %s" ibuffer-update nil t] 6 (#$ . 36992) (byte-code "\301 \211\205 \302!\205 \303\304\305\"!\306\307\203 \310\311\"\202 \312\313\314\315\211&!\266\202C\207" [obarray ibuffer-current-buffer buffer-live-p symbol-name buffer-local-value major-mode intern completing-read format "Filter by major mode (default %s): " "Filter by major mode: " #[257 "\300\301\302!\"\207" [string-match "-mode\\'" symbol-name] 5 "\n\n(fn E)"] t nil] 11)])
(byte-code "\301\302\303EB\301\207" [ibuffer-filtering-alist mode "major mode" #[514 "\211\300\301\"=\207" [buffer-local-value major-mode] 6 "\n\n(fn BUF QUALIFIER)"]] 3)
#@164 Toggle current view to buffers with major mode QUALIFIER.
Called interactively, this function allows selection of modes
currently used by buffers.
(fn QUALIFIER)
(defalias 'ibuffer-filter-by-used-mode #[257 "\300\301B!\210\302\303\304\305\"\"\210\306\307\310\"\207" [ibuffer-push-filter used-mode message "%s" format "Filter by major mode in use added: %s" ibuffer-update nil t] 6 (#$ . 37870) (byte-code "\300 \211\205 \301!\205 \302\303\304\"!\305\306\203 \307\310\"\202 \311\312 \313\314\313\211&!\266\202C\207" [ibuffer-current-buffer buffer-live-p symbol-name buffer-local-value major-mode intern completing-read format "Filter by major mode (default %s): " "Filter by major mode: " ibuffer-list-buffer-modes nil t] 11)])
(byte-code "\301\302\303EB\301\207" [ibuffer-filtering-alist used-mode "major mode in use" #[514 "\211\300\301\"=\207" [buffer-local-value major-mode] 6 "\n\n(fn BUF QUALIFIER)"]] 3)
#@90 Toggle current view to buffers whose major mode inherits from QUALIFIER.
(fn QUALIFIER)
(defalias 'ibuffer-filter-by-derived-mode #[257 "\300\301B!\210\302\303\304\305\"\"\210\306\307\310\"\207" [ibuffer-push-filter derived-mode message "%s" format "Filter by derived mode added: %s" ibuffer-update nil t] 6 (#$ . 38804) (byte-code "\300\301\302\303\304!\305\304$!C\207" [intern completing-read "Filter by derived mode: " ibuffer-list-buffer-modes t nil] 6)])
(byte-code "\301\302\303EB\301\207" [ibuffer-filtering-alist derived-mode "derived mode" #[514 "rq\210\300!)\207" [derived-mode-p] 4 "\n\n(fn BUF QUALIFIER)"]] 3)
#@78 Toggle current view to buffers with name matching QUALIFIER.
(fn QUALIFIER)
(defalias 'ibuffer-filter-by-name #[257 "\300\301B!\210\302\303\304\305\"\"\210\306\307\310\"\207" [ibuffer-push-filter name message "%s" format "Filter by buffer name added: %s" ibuffer-update nil t] 6 (#$ . 39441) (byte-code "\300\301!C\207" [read-from-minibuffer "Filter by name (regexp): "] 2)])
(byte-code "\301\302\303EB\301\207" [ibuffer-filtering-alist name "buffer name" #[514 "\300\301!\"\207" [string-match buffer-name] 6 "\n\n(fn BUF QUALIFIER)"]] 3)
#@82 Toggle current view to buffers with filename matching QUALIFIER.
(fn QUALIFIER)
(defalias 'ibuffer-filter-by-filename #[257 "\300\301B!\210\302\303\304\305\"\"\210\306\307\310\"\207" [ibuffer-push-filter filename message "%s" format "Filter by filename added: %s" ibuffer-update nil t] 6 (#$ . 39994) (byte-code "\300\301!C\207" [read-from-minibuffer "Filter by filename (regexp): "] 2)])
(byte-code "\301\302\303EB\301\207" [ibuffer-filtering-alist filename "filename" #[514 "rq\210\300 )\211\205 \211\301\"\262\207" [ibuffer-buffer-file-name string-match] 7 "\n\n(fn BUF QUALIFIER)"]] 3)
#@82 Toggle current view to buffers with size greater than QUALIFIER.
(fn QUALIFIER)
(defalias 'ibuffer-filter-by-size-gt #[257 "\300\301B!\210\302\303\304\305\"\"\210\306\307\310\"\207" [ibuffer-push-filter size-gt message "%s" format "Filter by size greater than added: %s" ibuffer-update nil t] 6 (#$ . 40601) (byte-code "\300\301\302!!C\207" [string-to-number read-from-minibuffer "Filter by size greater than: "] 3)])
(byte-code "\301\302\303EB\301\207" [ibuffer-filtering-alist size-gt "size greater than" #[514 "rq\210\300 )V\207" [buffer-size] 4 "\n\n(fn BUF QUALIFIER)"]] 3)
#@79 Toggle current view to buffers with size less than QUALIFIER.
(fn QUALIFIER)
(defalias 'ibuffer-filter-by-size-lt #[257 "\300\301B!\210\302\303\304\305\"\"\210\306\307\310\"\207" [ibuffer-push-filter size-lt message "%s" format "Filter by size less than added: %s" ibuffer-update nil t] 6 (#$ . 41194) (byte-code "\300\301\302!!C\207" [string-to-number read-from-minibuffer "Filter by size less than: "] 3)])
(byte-code "\301\302\303EB\301\207" [ibuffer-filtering-alist size-lt "size less than" #[514 "rq\210\300 )W\207" [buffer-size] 4 "\n\n(fn BUF QUALIFIER)"]] 3)
#@80 Toggle current view to buffers whose contents match QUALIFIER.
(fn QUALIFIER)
(defalias 'ibuffer-filter-by-content #[257 "\300\301B!\210\302\303\304\305\"\"\210\306\307\310\"\207" [ibuffer-push-filter content message "%s" format "Filter by content added: %s" ibuffer-update nil t] 6 (#$ . 41775) (byte-code "\300\301!C\207" [read-from-minibuffer "Filter by content (regexp): "] 2)])
(byte-code "\301\302\303EB\301\207" [ibuffer-filtering-alist content "content" #[514 "rq\210\212eb\210\300\301\302#*\207" [re-search-forward nil t] 6 "\n\n(fn BUF QUALIFIER)"]] 3)
#@85 Toggle current view to buffers for which QUALIFIER returns non-nil.
(fn QUALIFIER)
(defalias 'ibuffer-filter-by-predicate #[257 "\300\301B!\210\302\303\304\305\"\"\210\306\307\310\"\207" [ibuffer-push-filter predicate message "%s" format "Filter by predicate added: %s" ibuffer-update nil t] 6 (#$ . 42352) (byte-code "\300\301!C\207" [read-minibuffer "Filter by predicate (form): "] 2)])
(byte-code "\301\302\303EB\301\207" [ibuffer-filtering-alist predicate "predicate" #[514 "rq\210\300!)\207" [eval] 4 "\n\n(fn BUF QUALIFIER)"]] 3)
#@225 Toggle the current sorting mode.
Default sorting modes are:
Recency - the last time the buffer was viewed
Name - the name of the buffer
Major Mode - the name of the major mode of the buffer
Size - the size of the buffer
(defalias 'ibuffer-toggle-sorting-mode #[0 "\302\303\"\304\305\"\204 \305B\262\306\307\"\262 >\243\242\206 \211@\211\310\311\"\266\312\313!\207" [ibuffer-sorting-functions-alist ibuffer-sorting-mode mapcar car memql recency sort string-lessp message "Sorting by %s" ibuffer-redisplay t] 5 (#$ . 42903) nil])
#@52 Toggle whether or not sorting is in reverse order.
(defalias 'ibuffer-invert-sorting #[0 "?\301\302\203
\303\202 \304\"\210\305\306!\207" [ibuffer-sorting-reversep message "Sorting order %s" "reversed" "normal" ibuffer-redisplay t] 3 (#$ . 43453) nil])
#@61 Sort the buffers by major modes.
Ordering is lexicographic.
(defalias 'ibuffer-do-sort-by-major-mode #[0 "\303\211 =\203 \n?\304\305!\210\303\211\207" [ibuffer-sorting-mode ibuffer-last-sorting-mode ibuffer-sorting-reversep major-mode ibuffer-redisplay t] 3 (#$ . 43717) nil])
(byte-code "\301\302\303EB\301\207" [ibuffer-sorting-functions-alist major-mode "major mode" #[514 "\300\301\302@\"!\227\300\301\302@\"!\227\231\207" [symbol-name buffer-local-value major-mode] 7 "\n\n(fn A B)"]] 3)
#@65 Sort the buffers by their mode name.
Ordering is lexicographic.
(defalias 'ibuffer-do-sort-by-mode-name #[0 "\303\211 =\203 \n?\304\305!\210\303\211\207" [ibuffer-sorting-mode ibuffer-last-sorting-mode ibuffer-sorting-reversep mode-name ibuffer-redisplay t] 3 (#$ . 44224) nil])
(byte-code "\301\302\303EB\301\207" [ibuffer-sorting-functions-alist mode-name "major mode name" #[514 "r@q\210\301!)\227r@q\210\301!)\227\231\207" [mode-name format-mode-line] 5 "\n\n(fn A B)"]] 3)
#@61 Sort the buffers by their names.
Ordering is lexicographic.
(defalias 'ibuffer-do-sort-by-alphabetic #[0 "\303\211 =\203 \n?\304\305!\210\303\211\207" [ibuffer-sorting-mode ibuffer-last-sorting-mode ibuffer-sorting-reversep alphabetic ibuffer-redisplay t] 3 (#$ . 44718) nil])
(byte-code "\301\302\303EB\301\207" [ibuffer-sorting-functions-alist alphabetic "buffer name" #[514 "\300@!\300@!\231\207" [buffer-name] 5 "\n\n(fn A B)"]] 3)
#@33 Sort the buffers by their size.
(defalias 'ibuffer-do-sort-by-size #[0 "\303\211 =\203 \n?\304\305!\210\303\211\207" [ibuffer-sorting-mode ibuffer-last-sorting-mode ibuffer-sorting-reversep size ibuffer-redisplay t] 3 (#$ . 45168) nil])
(byte-code "\301\302\303EB\301\207" [ibuffer-sorting-functions-alist size "size" #[514 "r@q\210\300 )r@q\210\300 )W\207" [buffer-size] 4 "\n\n(fn A B)"]] 3)
#@51 Sort the buffers by their file name/process name.
(defalias 'ibuffer-do-sort-by-filename/process #[0 "\303\211 =\203 \n?\304\305!\210\303\211\207" [ibuffer-sorting-mode ibuffer-last-sorting-mode ibuffer-sorting-reversep filename/process ibuffer-redisplay t] 3 (#$ . 45576) nil])
(byte-code "\301\302\303EB\301\207" [ibuffer-sorting-functions-alist filename/process "file name" #[514 "\300@!\206 \301@!\302!\205 \303!\262\300@!\206, \301@!\302!\205* \303!\262\231\207" [buffer-file-name get-buffer-process processp process-name] 6 "\n\n(fn A B)"]] 3)
#@43 Emulate `bs-show' from the bs.el package.
(defalias 'ibuffer-bs-show #[0 "\300\301\302\303\304\301%\210\305\306 \307\310#\207" [ibuffer t "*Ibuffer-bs*" ((filename . ".*")) nil define-key current-local-map "a" ibuffer-bs-toggle-all] 6 (#$ . 46150) nil])
#@54 Emulate `bs-toggle-show-all' from the bs.el package.
(defalias 'ibuffer-bs-toggle-all #[0 "\203 \301 \207\302\303!\210\304\305\306\"\207" [ibuffer-filtering-qualifiers ibuffer-pop-filter ibuffer-push-filter (filename . ".*") ibuffer-update nil t] 3 (#$ . 46410) nil])
#@150 Add REGEXP to `ibuffer-tmp-hide-regexps'.
This means that buffers whose name matches REGEXP will not be shown
for this Ibuffer session.
(fn REGEXP)
(defalias 'ibuffer-add-to-tmp-hide #[257 "\211B\211\207" [ibuffer-tmp-hide-regexps] 3 (#$ . 46687) (byte-code "\300\301\302\303\304\305!!!\"C\207" [read-from-minibuffer "Never show buffers matching: " regexp-quote buffer-name ibuffer-current-buffer t] 6)])
#@153 Add REGEXP to `ibuffer-tmp-show-regexps'.
This means that buffers whose name matches REGEXP will always be shown
for this Ibuffer session.
(fn REGEXP)
(defalias 'ibuffer-add-to-tmp-show #[257 "\211B\211\207" [ibuffer-tmp-show-regexps] 3 (#$ . 47102) (byte-code "\300\301\302\303\304\305!!!\"C\207" [read-from-minibuffer "Always show buffers matching: " regexp-quote buffer-name ibuffer-current-buffer t] 6)])
#@343 Move forward by COUNT marked buffers (default 1).
If MARK is non-nil, it should be a character denoting the type of mark
to move by. The default is `ibuffer-marked-char'.
If DIRECTION is non-nil, it should be an integer; negative integers
mean move backwards, non-negative integers mean move forwards.
(fn &optional COUNT MARK DIRECTION)
(defalias 'ibuffer-forward-next-marked #[768 "\204 \301\262\204 \262\211\204 \301\262\302\303!\210`\302!\210`U\2047 \304\305 \306\"A@=\2047 \302!\210\202 `U\205N \304\305 \306\"A@=?\205N \307\310\"\207" [ibuffer-marked-char 1 ibuffer-forward-line 0 get-text-property line-beginning-position ibuffer-properties error "No buffers with mark %c"] 7 (#$ . 47521) "P"])
#@203 Move backwards by COUNT marked buffers (default 1).
If MARK is non-nil, it should be a character denoting the type of mark
to move by. The default is `ibuffer-marked-char'.
(fn &optional COUNT MARK)
(defalias 'ibuffer-backwards-next-marked #[512 "\300\301#\207" [ibuffer-forward-next-marked -1] 6 (#$ . 48251) "P"])
#@41 Hide all of the currently marked lines.
(defalias 'ibuffer-do-kill-lines #[0 "\301 \302U\203 \303\304!\207\305\306\"\307\310!\210\262\303\311\"\207" [ibuffer-marked-char ibuffer-count-marked-lines 0 message "No buffers marked; use 'm' to mark a buffer" #[514 "\300\207" [kill] 3 "\n\n(fn BUF MARK)"] ibuffer-map-on-mark ibuffer-redisplay t "Killed %s lines"] 4 (#$ . 48578) nil])
#@410 Move point to the buffer whose name is NAME.
If called interactively, prompt for a buffer name and go to the
corresponding line in the Ibuffer buffer. If said buffer is in a
hidden group filter, open it.
If `ibuffer-jump-offer-only-visible-buffers' is non-nil, only offer
visible buffers in the completion list. Calling the command with
a prefix argument reverses the meaning of that variable.
(fn NAME)
(defalias 'ibuffer-jump-to-buffer #[257 "\211\301\230?\205x \302C\303\304\305\306\307\310\"\311\"\312\313%\314\302#\210\211\242\204g \203g \3152f \211\205c \211@\316!\210\317 \210\303\304\305\306\307\310 \"\320\"\312\313%\314#\210\242\203Y \321\315\302\"\210\202\\ \317 \210A\266\202\202+ \2620\210\211\242\204s \322\323\"\202v \211\242b\262\207" [ibuffer-hidden-filter-groups "" nil ibuffer-map-lines make-byte-code 514 "\302!\300\230\205
\301`\240\210\303\207" vconcat vector [buffer-name nil] 4 "\n\n(fn BUF MARKS)" t found ibuffer-jump-to-filter-group ibuffer-toggle-filter-group [buffer-name nil] throw error "No buffer with name %s"] 12 (#$ . 48970) (byte-code " \203 \211?\262\211\203% \302\303\304 \"\211\204 \305\306!\210\307\310\311\312$\262\202* \313\310\311\312#\262C\207" [ibuffer-jump-offer-only-visible-buffers current-prefix-arg mapcar #[257 "\300@!\207" [buffer-name] 3 "\n\n(fn X)"] ibuffer-current-state-list error "No buffers!" completing-read "Jump to buffer: " nil t read-buffer] 7)])
(defalias 'ibuffer-diff-buffer-with-file-1 #[257 "\305\306\"\307\310!\205\217 \311\216rq\210\312\313\211\313\314%\210)\315!\315!\316!\316!\317\320 \321<\2034 \2026 C \204@ \205P \322\323 !\322\323\324\325\326!\"!F\323 \206X !\323 \206a !D#B\327#\330\211\331\261\210\332\333 \313p\313\f&!\210\331c\210)\266)\334\335!\210\336!\205\217 \337!\207" [diff-switches diff-command inhibit-read-only shell-file-name shell-command-switch buffer-local-value buffer-file-name make-temp-file "buffer-content-" #[0 "\300\207" [nil] 1] write-region nil nomessage expand-file-name file-local-copy mapconcat identity append "-L" shell-quote-argument format "Buffer %s" buffer-name " " t "\n" diff-sentinel call-process sit-for 0 file-exists-p delete-file] 21 "\n\n(fn BUFFER)"])
#@189 View the differences between marked buffers and their associated files.
If no buffers are marked, use buffer at point.
This requires the external program "diff" to be in your `exec-path'.
(defalias 'ibuffer-diff-with-file #[0 "\301\302!\210\303 \211\204 \304\305!C\262r\306\307!q\210\310\311p!\210\312 \210\313p!\210\314 \210\211\211\203C \211@\315!\2048 \316\317\"\210\320!\210A\266\202\202' \210\305)\210\321\307!\207" [buffer-read-only require diff ibuffer-get-marked-buffers ibuffer-current-buffer t get-buffer-create "*Ibuffer Diff*" nil buffer-disable-undo erase-buffer buffer-enable-undo diff-mode buffer-live-p error "Buffer %s has been killed" ibuffer-diff-buffer-with-file-1 switch-to-buffer] 6 (#$ . 51212) nil])
#@520 Copy filenames of marked buffers into the kill ring.
The names are separated by a space.
If a buffer has no filename, it is ignored.
With no prefix arg, use the filename sans its directory of each marked file.
With a zero prefix arg, use the complete filename of each marked file.
With \[universal-argument], use the filename of each marked file relative
to `ibuffer-default-directory' if non-nil, otherwise `default-directory'.
You can then feed the file name(s) to other commands with \[yank].
(fn &optional ARG)
(defalias 'ibuffer-copy-filename-as-kill #[256 "\301 \302U\203 \303\304!\207\305C\302U\203 \306\202\" \307U\203! \310\202\" \311\312\313\314\315\316\"\317\"\320\321%\322\"\210\323\324!\266\325\242!\207" [ibuffer-marked-char ibuffer-count-marked-lines 0 message "No buffers marked; use 'm' to mark a buffer" #1="" full 4 relative name make-byte-code 514 "\300\211\242\304!\211\203+ \301\305=\203 \211\202, \301\306=\203% \307\n\206! \"\202, \310!\202, \311\262\312Q\240\207" vconcat vector [ibuffer-default-directory default-directory buffer-file-name full relative file-relative-name file-name-nondirectory #1# " "] 8 "\n\n(fn BUF MARK)" ibuffer-map-on-mark ibuffer-redisplay t kill-new] 10 (#$ . 51951) "p"])
(defalias 'ibuffer-mark-on-buffer #[769 "\300\301\302\303\304\305\"\306\"\307\310%\311#\312\313!\210\314=?\205\" \315\316\"\207" [ibuffer-map-lines make-byte-code 514 "\300!\205 \303\301\206\f \n!\210\304\207" vconcat vector [ibuffer-marked-char ibuffer-set-mark-1 t] 4 "\n\n(fn BUF MARK)" nil ibuffer-redisplay t 32 message "Marked %s buffers"] 11 "\n\n(fn FUNC &optional IBUFFER-MARK-ON-BUFFER-MARK GROUP)"])
#@58 Mark all buffers whose name matches REGEXP.
(fn REGEXP)
(defalias 'ibuffer-mark-by-name-regexp #[257 "\300\301\302\303\304\305!\306\"\307\310%!\207" [ibuffer-mark-on-buffer make-byte-code 257 "\301\300\302!\"\207" vconcat vector [string-match buffer-name] 5 "\n\n(fn BUF)"] 8 (#$ . 53624) "sMark by name (regexp): "])
#@64 Mark all buffers whose major mode matches REGEXP.
(fn REGEXP)
(defalias 'ibuffer-mark-by-mode-regexp #[257 "\300\301\302\303\304\305!\306\"\307\310%!\207" [ibuffer-mark-on-buffer make-byte-code 257 "r\211q\210\302\300\303 \304\211$\")\207" vconcat vector [mode-name string-match format-mode-line nil] 8 "\n\n(fn BUF)"] 8 (#$ . 53952) "sMark by major mode (regexp): "])
#@63 Mark all buffers whose file name matches REGEXP.
(fn REGEXP)
(defalias 'ibuffer-mark-by-file-name-regexp #[257 "\300\301\302\303\304\305!\306\"\307\310%!\207" [ibuffer-mark-on-buffer make-byte-code 257 "\302!\206 r\211q\210\303\301!\205 ;\205 )\211\205 \304\300\"\207" vconcat vector [dired-directory buffer-file-name boundp string-match] 5 "\n\n(fn BUF)"] 8 (#$ . 54332) "sMark by file name (regexp): "])
#@59 Mark all buffers whose major mode equals MODE.
(fn MODE)
(defalias 'ibuffer-mark-by-mode #[257 "\300\301\302\303\304\305!\306\"\307\310%!\207" [ibuffer-mark-on-buffer make-byte-code 257 "\301\302\"\300=\207" vconcat vector [buffer-local-value major-mode] 4 "\n\n(fn BUF)"] 8 (#$ . 54755) (byte-code "\300 \211\205 \301!\205 \302\303\304\"!\305\306\203 \307\310\"\202 \311\312 \313\314\313\211&!C\207" [ibuffer-current-buffer buffer-live-p symbol-name buffer-local-value major-mode intern completing-read format "Mark by major mode (default %s): " "Mark by major mode: " ibuffer-list-buffer-modes nil t] 11)])
#@28 Mark all modified buffers.
(defalias 'ibuffer-mark-modified-buffers #[0 "\300\301!\207" [ibuffer-mark-on-buffer #[257 "\300!\207" [buffer-modified-p] 3 "\n\n(fn BUF)"]] 2 (#$ . 55385) nil])
#@57 Mark all modified buffers that have an associated file.
(defalias 'ibuffer-mark-unsaved-buffers #[0 "\300\301!\207" [ibuffer-mark-on-buffer #[257 "\300\301\"\205\n \302!\207" [buffer-local-value buffer-file-name buffer-modified-p] 4 "\n\n(fn BUF)"]] 2 (#$ . 55582) nil])
#@56 Mark all buffers whose associated file does not exist.
(defalias 'ibuffer-mark-dissociated-buffers #[0 "\300\301!\207" [ibuffer-mark-on-buffer #[257 "r\211q\210\203 \303!?\206& \304=\205& \305\302!\205& \n;\205& \303\306\n!!?)\207" [buffer-file-name major-mode dired-directory file-exists-p dired-mode boundp file-name-directory] 4 "\n\n(fn BUF)"]] 2 (#$ . 55861) nil])
#@75 Mark buffers whose major mode is in variable `ibuffer-help-buffer-modes'.
(defalias 'ibuffer-mark-help-buffers #[0 "\300\301!\207" [ibuffer-mark-on-buffer #[257 "r\211q\210 >)\207" [major-mode ibuffer-help-buffer-modes] 3 "\n\n(fn BUF)"]] 2 (#$ . 56241) nil])
#@51 Mark buffers whose associated file is compressed.
(defalias 'ibuffer-mark-compressed-file-buffers #[0 "\300\301!\207" [ibuffer-mark-on-buffer #[257 "r\211q\210\205\f \302 \")\207" [buffer-file-name ibuffer-compressed-file-name-regexp string-match] 4 "\n\n(fn BUF)"]] 2 (#$ . 56508) nil])
#@70 Mark buffers which have not been viewed in `ibuffer-old-time' hours.
(defalias 'ibuffer-mark-old-buffers #[0 "\300\301!\207" [ibuffer-mark-on-buffer #[257 "r\211q\210\205 \302 \302!Z \303_V\266\202)\207" [buffer-display-time ibuffer-old-time float-time 3600] 6 "\n\n(fn BUF)"]] 2 (#$ . 56804) nil])
#@55 Mark all buffers whose name begins and ends with `*'.
(defalias 'ibuffer-mark-special-buffers #[0 "\300\301!\207" [ibuffer-mark-on-buffer #[257 "\300\301\302!\"\207" [string-match "^\\*.+\\*$" buffer-name] 5 "\n\n(fn BUF)"]] 2 (#$ . 57114) nil])
#@29 Mark all read-only buffers.
(defalias 'ibuffer-mark-read-only-buffers #[0 "\300\301!\207" [ibuffer-mark-on-buffer #[257 "\300\301\"\207" [buffer-local-value buffer-read-only] 4 "\n\n(fn BUF)"]] 2 (#$ . 57367) nil])
#@27 Mark all `dired' buffers.
(defalias 'ibuffer-mark-dired-buffers #[0 "\300\301!\207" [ibuffer-mark-on-buffer #[257 "\300\301\"\302=\207" [buffer-local-value major-mode dired-mode] 4 "\n\n(fn BUF)"]] 2 (#$ . 57589) nil])
#@172 View lines which match REGEXP in all marked buffers.
Optional argument NLINES says how many lines of context to display: it
defaults to one.
(fn REGEXP &optional NLINES)
(defalias 'ibuffer-do-occur #[513 "\211\250\203 \211\301W\203 \301\262\302 \301U\203 \303!\210\304C\305\306\307\310\311!\312\"\313\314%\315\"\210\316\317!\266\320\242#\207" [ibuffer-marked-char 0 ibuffer-count-marked-lines ibuffer-set-mark nil make-byte-code 514 "\300\300\242B\240\207" vconcat vector [] 5 "\n\n(fn BUF MARK)" ibuffer-map-on-mark ibuffer-redisplay t occur-1] 9 (#$ . 57816) (occur-read-primary-args)])
(provide 'ibuf-ext)
Kontol Shell Bypass