Linux ns8.secondary29.go.th 2.6.32-754.28.1.el6.x86_64 #1 SMP Wed Mar 11 18:38:45 UTC 2020 x86_64
Apache/2.2.15 (CentOS)
: 122.154.134.11 | : 122.154.134.9
Cant Read [ /etc/named.conf ]
5.6.40
apache
www.github.com/MadExploits
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
CPANEL RESET
CREATE WP USER
README
+ Create Folder
+ Create File
/
usr /
share /
emacs /
23.1 /
lisp /
[ HOME SHELL ]
Name
Size
Permission
Action
calc
[ DIR ]
drwxr-xr-x
calendar
[ DIR ]
drwxr-xr-x
emacs-lisp
[ DIR ]
drwxr-xr-x
emulation
[ DIR ]
drwxr-xr-x
erc
[ DIR ]
drwxr-xr-x
eshell
[ DIR ]
drwxr-xr-x
gnus
[ DIR ]
drwxr-xr-x
international
[ DIR ]
drwxr-xr-x
language
[ DIR ]
drwxr-xr-x
mail
[ DIR ]
drwxr-xr-x
mh-e
[ DIR ]
drwxr-xr-x
net
[ DIR ]
drwxr-xr-x
nxml
[ DIR ]
drwxr-xr-x
obsolete
[ DIR ]
drwxr-xr-x
org
[ DIR ]
drwxr-xr-x
play
[ DIR ]
drwxr-xr-x
progmodes
[ DIR ]
drwxr-xr-x
term
[ DIR ]
drwxr-xr-x
textmodes
[ DIR ]
drwxr-xr-x
url
[ DIR ]
drwxr-xr-x
COPYING
34.32
KB
-rw-r--r--
README
538
B
-rw-r--r--
abbrev.elc
29.69
KB
-rw-r--r--
abbrevlist.elc
1.12
KB
-rw-r--r--
add-log.elc
35.21
KB
-rw-r--r--
align.elc
38.38
KB
-rw-r--r--
allout.elc
208.3
KB
-rw-r--r--
ansi-color.elc
16.3
KB
-rw-r--r--
apropos.elc
31.93
KB
-rw-r--r--
arc-mode.elc
54.72
KB
-rw-r--r--
array.elc
25.83
KB
-rw-r--r--
autoarg.elc
5.98
KB
-rw-r--r--
autoinsert.elc
12.01
KB
-rw-r--r--
autorevert.elc
18.25
KB
-rw-r--r--
avoid.elc
10.17
KB
-rw-r--r--
battery.elc
17.98
KB
-rw-r--r--
bindings.elc
39.04
KB
-rw-r--r--
bookmark.elc
55.9
KB
-rw-r--r--
bs.elc
48.34
KB
-rw-r--r--
buff-menu.elc
28
KB
-rw-r--r--
button.elc
13.92
KB
-rw-r--r--
calculator.elc
49.18
KB
-rw-r--r--
case-table.elc
4.42
KB
-rw-r--r--
cdl.elc
1.26
KB
-rw-r--r--
chistory.elc
5.75
KB
-rw-r--r--
cmuscheme.elc
17.43
KB
-rw-r--r--
comint.elc
100.97
KB
-rw-r--r--
compare-w.elc
10.98
KB
-rw-r--r--
complete.elc
23.62
KB
-rw-r--r--
completion.elc
45.06
KB
-rw-r--r--
composite.elc
29.39
KB
-rw-r--r--
cus-dep.elc
5.04
KB
-rw-r--r--
cus-edit.elc
129.67
KB
-rw-r--r--
cus-face.elc
10.46
KB
-rw-r--r--
cus-load.el
63.45
KB
-rw-r--r--
cus-start.elc
10.67
KB
-rw-r--r--
cus-theme.elc
13.7
KB
-rw-r--r--
custom.elc
36.46
KB
-rw-r--r--
cvs-status.elc
23
KB
-rw-r--r--
dabbrev.elc
23.08
KB
-rw-r--r--
delim-col.elc
8.41
KB
-rw-r--r--
delsel.elc
5.24
KB
-rw-r--r--
descr-text.elc
20.69
KB
-rw-r--r--
desktop.elc
34.52
KB
-rw-r--r--
dframe.elc
22.51
KB
-rw-r--r--
diff-mode.elc
55.58
KB
-rw-r--r--
diff.elc
5.51
KB
-rw-r--r--
dired-aux.elc
67.5
KB
-rw-r--r--
dired-x.elc
44.96
KB
-rw-r--r--
dired.elc
96.48
KB
-rw-r--r--
dirtrack.elc
7.39
KB
-rw-r--r--
disp-table.elc
8.33
KB
-rw-r--r--
dnd.elc
7.04
KB
-rw-r--r--
doc-view.elc
36.01
KB
-rw-r--r--
dos-fns.elc
5.53
KB
-rw-r--r--
dos-vars.elc
1.24
KB
-rw-r--r--
dos-w32.elc
11.12
KB
-rw-r--r--
double.elc
4.13
KB
-rw-r--r--
ebuff-menu.elc
9.11
KB
-rw-r--r--
echistory.elc
4.93
KB
-rw-r--r--
ediff-diff.elc
35.54
KB
-rw-r--r--
ediff-help.elc
11.47
KB
-rw-r--r--
ediff-hook.elc
5.89
KB
-rw-r--r--
ediff-init.elc
60.88
KB
-rw-r--r--
ediff-merg.elc
10.04
KB
-rw-r--r--
ediff-mult.elc
58.31
KB
-rw-r--r--
ediff-ptch.elc
18.63
KB
-rw-r--r--
ediff-util.elc
118.44
KB
-rw-r--r--
ediff-vers.elc
4.74
KB
-rw-r--r--
ediff-wind.elc
30.56
KB
-rw-r--r--
ediff.elc
36.28
KB
-rw-r--r--
edmacro.elc
21.45
KB
-rw-r--r--
ehelp.elc
11.03
KB
-rw-r--r--
electric.elc
2.81
KB
-rw-r--r--
elide-head.elc
2.8
KB
-rw-r--r--
emacs-lock.elc
2.77
KB
-rw-r--r--
emerge.elc
80.16
KB
-rw-r--r--
env.elc
5.69
KB
-rw-r--r--
epa-dired.elc
1.87
KB
-rw-r--r--
epa-file.elc
6.77
KB
-rw-r--r--
epa-hook.elc
4.28
KB
-rw-r--r--
epa-mail.elc
7.04
KB
-rw-r--r--
epa.elc
34.03
KB
-rw-r--r--
epg-config.elc
4.01
KB
-rw-r--r--
epg.elc
85.05
KB
-rw-r--r--
expand.elc
9.42
KB
-rw-r--r--
ezimage.elc
9.2
KB
-rw-r--r--
face-remap.elc
13.15
KB
-rw-r--r--
facemenu.elc
23.61
KB
-rw-r--r--
faces.elc
81.51
KB
-rw-r--r--
ffap.elc
46.14
KB
-rw-r--r--
filecache.elc
16.1
KB
-rw-r--r--
files.elc
175.25
KB
-rw-r--r--
filesets.elc
73.03
KB
-rw-r--r--
find-cmd.elc
4.94
KB
-rw-r--r--
find-dired.elc
7.4
KB
-rw-r--r--
find-file.elc
18.68
KB
-rw-r--r--
find-lisp.elc
7.42
KB
-rw-r--r--
finder-inf.el
93.47
KB
-rw-r--r--
finder.elc
12.11
KB
-rw-r--r--
flow-ctrl.elc
2.44
KB
-rw-r--r--
foldout.elc
7.6
KB
-rw-r--r--
follow.elc
37.11
KB
-rw-r--r--
font-core.elc
12.92
KB
-rw-r--r--
font-lock.elc
61.1
KB
-rw-r--r--
format-spec.elc
1.98
KB
-rw-r--r--
format.elc
27.73
KB
-rw-r--r--
forms-d2.el
3.13
KB
-rw-r--r--
forms-pass.el
742
B
-rw-r--r--
forms.elc
35.13
KB
-rw-r--r--
frame.elc
48.66
KB
-rw-r--r--
fringe.elc
8.01
KB
-rw-r--r--
generic-x.elc
44.25
KB
-rw-r--r--
gs.elc
3.93
KB
-rw-r--r--
help-at-pt.elc
11.27
KB
-rw-r--r--
help-fns.elc
21.77
KB
-rw-r--r--
help-macro.elc
4.37
KB
-rw-r--r--
help-mode.elc
19.38
KB
-rw-r--r--
help.elc
40.91
KB
-rw-r--r--
hex-util.elc
1.48
KB
-rw-r--r--
hexl.elc
32.06
KB
-rw-r--r--
hi-lock.elc
23.27
KB
-rw-r--r--
hilit-chg.elc
28.02
KB
-rw-r--r--
hippie-exp.elc
23.39
KB
-rw-r--r--
hl-line.elc
7.71
KB
-rw-r--r--
ibuf-ext.elc
54.62
KB
-rw-r--r--
ibuf-macs.elc
11.65
KB
-rw-r--r--
ibuffer.elc
91.96
KB
-rw-r--r--
icomplete.elc
10.36
KB
-rw-r--r--
ido.elc
110.93
KB
-rw-r--r--
ielm.elc
17.67
KB
-rw-r--r--
iimage.elc
4.06
KB
-rw-r--r--
image-dired.elc
82.24
KB
-rw-r--r--
image-file.elc
6.11
KB
-rw-r--r--
image-mode.elc
14.54
KB
-rw-r--r--
image.elc
17.09
KB
-rw-r--r--
imenu.elc
24.8
KB
-rw-r--r--
indent.elc
17
KB
-rw-r--r--
info-look.elc
26.13
KB
-rw-r--r--
info-xref.elc
7.04
KB
-rw-r--r--
info.elc
119.11
KB
-rw-r--r--
informat.elc
9.69
KB
-rw-r--r--
isearch.elc
76.23
KB
-rw-r--r--
isearchb.elc
4.92
KB
-rw-r--r--
iswitchb.elc
32.11
KB
-rw-r--r--
jit-lock.elc
17.93
KB
-rw-r--r--
jka-cmpr-hook.elc
11.67
KB
-rw-r--r--
jka-compr.elc
12.64
KB
-rw-r--r--
json.elc
13.04
KB
-rw-r--r--
kermit.elc
2.96
KB
-rw-r--r--
kmacro.elc
31.07
KB
-rw-r--r--
ldefs-boot.el
1.17
MB
-rw-r--r--
ledit.elc
4.74
KB
-rw-r--r--
linum.elc
9.56
KB
-rw-r--r--
loaddefs.el
1.17
MB
-rw-r--r--
loadhist.elc
8.65
KB
-rw-r--r--
loadup.el
12.67
KB
-rw-r--r--
locate.elc
17.81
KB
-rw-r--r--
log-edit.elc
24.93
KB
-rw-r--r--
log-view.elc
14.06
KB
-rw-r--r--
longlines.elc
14.94
KB
-rw-r--r--
lpr.elc
8.61
KB
-rw-r--r--
ls-lisp.elc
17.35
KB
-rw-r--r--
macros.elc
6.99
KB
-rw-r--r--
makesum.elc
2.16
KB
-rw-r--r--
man.elc
40.03
KB
-rw-r--r--
master.elc
4.52
KB
-rw-r--r--
mb-depth.elc
3.12
KB
-rw-r--r--
md4.elc
8.14
KB
-rw-r--r--
menu-bar.elc
67.01
KB
-rw-r--r--
midnight.elc
8.92
KB
-rw-r--r--
minibuf-eldef.elc
5.15
KB
-rw-r--r--
minibuffer.elc
42.75
KB
-rw-r--r--
misc.elc
3.67
KB
-rw-r--r--
misearch.elc
8.96
KB
-rw-r--r--
mouse-copy.elc
4.07
KB
-rw-r--r--
mouse-drag.elc
7.33
KB
-rw-r--r--
mouse-sel.elc
20.93
KB
-rw-r--r--
mouse.elc
60.03
KB
-rw-r--r--
msb.elc
27.27
KB
-rw-r--r--
mwheel.elc
9.41
KB
-rw-r--r--
newcomment.elc
32.76
KB
-rw-r--r--
novice.elc
4.75
KB
-rw-r--r--
outline.elc
34.54
KB
-rw-r--r--
paren.elc
6.43
KB
-rw-r--r--
password-cache.elc
3.58
KB
-rw-r--r--
patcomp.el
775
B
-rw-r--r--
paths.el
7.28
KB
-rw-r--r--
pcmpl-cvs.elc
6
KB
-rw-r--r--
pcmpl-gnu.elc
8.21
KB
-rw-r--r--
pcmpl-linux.elc
3.17
KB
-rw-r--r--
pcmpl-rpm.elc
7.5
KB
-rw-r--r--
pcmpl-unix.elc
5.44
KB
-rw-r--r--
pcomplete.elc
34.1
KB
-rw-r--r--
pcvs-defs.elc
16.27
KB
-rw-r--r--
pcvs-info.elc
25.83
KB
-rw-r--r--
pcvs-parse.elc
15.34
KB
-rw-r--r--
pcvs-util.elc
26.8
KB
-rw-r--r--
pcvs.elc
85.52
KB
-rw-r--r--
pgg-def.elc
2.78
KB
-rw-r--r--
pgg-gpg.elc
13.09
KB
-rw-r--r--
pgg-parse.elc
13.45
KB
-rw-r--r--
pgg-pgp.elc
7.64
KB
-rw-r--r--
pgg-pgp5.elc
7.68
KB
-rw-r--r--
pgg.elc
18.01
KB
-rw-r--r--
printing.elc
157.56
KB
-rw-r--r--
proced.elc
57.95
KB
-rw-r--r--
ps-bdf.elc
13.34
KB
-rw-r--r--
ps-def.elc
3.09
KB
-rw-r--r--
ps-mule.elc
36.17
KB
-rw-r--r--
ps-print.elc
145.59
KB
-rw-r--r--
ps-samp.elc
5.5
KB
-rw-r--r--
recentf.elc
49.04
KB
-rw-r--r--
rect.elc
10.79
KB
-rw-r--r--
register.elc
10.69
KB
-rw-r--r--
repeat.elc
6.05
KB
-rw-r--r--
replace.elc
55.02
KB
-rw-r--r--
reposition.elc
2.88
KB
-rw-r--r--
reveal.elc
6.61
KB
-rw-r--r--
rfn-eshadow.elc
7.12
KB
-rw-r--r--
rot13.elc
2.6
KB
-rw-r--r--
ruler-mode.elc
22.48
KB
-rw-r--r--
s-region.elc
3.3
KB
-rw-r--r--
savehist.elc
10.57
KB
-rw-r--r--
saveplace.elc
7.51
KB
-rw-r--r--
sb-image.elc
2.51
KB
-rw-r--r--
scroll-all.elc
4.05
KB
-rw-r--r--
scroll-bar.elc
11.47
KB
-rw-r--r--
scroll-lock.elc
4.64
KB
-rw-r--r--
select.elc
11.8
KB
-rw-r--r--
server.elc
39.79
KB
-rw-r--r--
ses.elc
87.39
KB
-rw-r--r--
sha1.elc
8
KB
-rw-r--r--
shadowfile.elc
22.61
KB
-rw-r--r--
shell.elc
34.08
KB
-rw-r--r--
simple.elc
196.35
KB
-rw-r--r--
skeleton.elc
15.78
KB
-rw-r--r--
smerge-mode.elc
33.61
KB
-rw-r--r--
sort.elc
12.94
KB
-rw-r--r--
soundex.elc
1.34
KB
-rw-r--r--
speedbar.elc
115.06
KB
-rw-r--r--
startup.elc
60.78
KB
-rw-r--r--
strokes.elc
44.11
KB
-rw-r--r--
subdirs.el
426
B
-rw-r--r--
subr.elc
113.48
KB
-rw-r--r--
t-mouse.elc
3.38
KB
-rw-r--r--
tabify.elc
2
KB
-rw-r--r--
talk.elc
3.19
KB
-rw-r--r--
tar-mode.elc
52.24
KB
-rw-r--r--
tempo.elc
18.63
KB
-rw-r--r--
term.elc
99.67
KB
-rw-r--r--
terminal.elc
31.36
KB
-rw-r--r--
thingatpt.elc
10.84
KB
-rw-r--r--
thumbs.elc
26.23
KB
-rw-r--r--
time-stamp.elc
21.03
KB
-rw-r--r--
time.elc
18.2
KB
-rw-r--r--
timezone.elc
10.99
KB
-rw-r--r--
tmm.elc
13.9
KB
-rw-r--r--
tool-bar.elc
9.69
KB
-rw-r--r--
tooltip.elc
12.35
KB
-rw-r--r--
tree-widget.elc
20.87
KB
-rw-r--r--
tutorial.elc
21.41
KB
-rw-r--r--
type-break.elc
35.61
KB
-rw-r--r--
uniquify.elc
19.91
KB
-rw-r--r--
userlock.elc
4.69
KB
-rw-r--r--
vc-annotate.elc
22.68
KB
-rw-r--r--
vc-arch.elc
17.58
KB
-rw-r--r--
vc-bzr.elc
26.84
KB
-rw-r--r--
vc-cvs.elc
32.19
KB
-rw-r--r--
vc-dav.elc
5.3
KB
-rw-r--r--
vc-dir.elc
39.5
KB
-rw-r--r--
vc-dispatcher.elc
14.61
KB
-rw-r--r--
vc-git.elc
32.75
KB
-rw-r--r--
vc-hg.elc
25.95
KB
-rw-r--r--
vc-hooks.elc
32.75
KB
-rw-r--r--
vc-mtn.elc
10.95
KB
-rw-r--r--
vc-rcs.elc
34.99
KB
-rw-r--r--
vc-sccs.elc
13.24
KB
-rw-r--r--
vc-svn.elc
20.57
KB
-rw-r--r--
vc.elc
59.4
KB
-rw-r--r--
vcursor.elc
23.44
KB
-rw-r--r--
version.el
3.37
KB
-rw-r--r--
view.elc
35.96
KB
-rw-r--r--
vt-control.elc
2.06
KB
-rw-r--r--
vt100-led.elc
1.53
KB
-rw-r--r--
w32-fns.elc
15.82
KB
-rw-r--r--
w32-vars.elc
5.53
KB
-rw-r--r--
wdired.elc
21.69
KB
-rw-r--r--
whitespace.elc
59.83
KB
-rw-r--r--
wid-browse.elc
7.89
KB
-rw-r--r--
wid-edit.elc
104.76
KB
-rw-r--r--
widget.elc
1.37
KB
-rw-r--r--
windmove.elc
9.57
KB
-rw-r--r--
window.elc
57.4
KB
-rw-r--r--
winner.elc
11.61
KB
-rw-r--r--
woman.elc
107.73
KB
-rw-r--r--
x-dnd.elc
19.35
KB
-rw-r--r--
xml.elc
18.38
KB
-rw-r--r--
xt-mouse.elc
7.43
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : ibuf-ext.elc
;ELC ;;; Compiled by mockbuild@c6b8.bsys.dev.centos.org on Thu Feb 19 13:04:12 2015 ;;; from file /builddir/build/BUILD/emacs-23.1/lisp/ibuf-ext.el ;;; in Emacs version 23.1.1 ;;; with all optimizations. ;;; This file uses dynamic docstrings, first added in Emacs 19.29. (if (and (boundp 'emacs-version) (< (aref emacs-version (1- (length emacs-version))) ?A) (or (and (boundp 'epoch::version) epoch::version) (string-lessp emacs-version "19.29"))) (error "`ibuf-ext.el' was compiled for Emacs 19.29 or later")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (require 'ibuffer) #@59 Delete all entries in ALIST that have a key equal to KEY. (defalias 'ibuffer-delete-alist #[(key alist) "\303\304 \n\"\211\203 \305\n\"\202 \n)\207" [entry key alist nil assoc delete] 3 (#$ . 626)]) #@56 Return a copy of LIST with duplicate elements removed. (defalias 'ibuffer-remove-duplicates #[(list) "\303 \203 @\n\235\204 @\nB A\211\204 \n\237*\207" [list tail new nil] 3 (#$ . 837)]) (defalias 'ibuffer-split-list #[(ibuffer-split-list-fn ibuffer-split-list-elts) "\306\211\n\306\211 \203' \f@ !\203 B\202 B\fA\211\204\f * \237\237*D\207" [lamers hip-crowd ibuffer-split-list-elts ibuffer-split-list-elt #1=#:--cl-dolist-temp-- ibuffer-split-list-fn nil] 3]) #@264 A list of predicates (a regexp or function) for buffers not to display. If a regexp, then it will be matched against the buffer's name. If a function, it will be called with the buffer as an argument, and should return non-nil if this buffer should not be shown. (custom-declare-variable 'ibuffer-never-show-predicates 'nil '(#$ . 1331) :type '(repeat (choice regexp function)) :require 'ibuf-ext :group 'ibuffer) #@377 A list of predicates (a regexp or function) for buffers to always display. If a regexp, then it will be matched against the buffer's name. If a function, it will be called with the buffer as an argument, and should return non-nil if this buffer should be shown. Note that buffers matching one of these predicates will be shown regardless of any active filters in this buffer. (custom-declare-variable 'ibuffer-always-show-predicates 'nil '(#$ . 1752) :type '(repeat (choice regexp function)) :group 'ibuffer) #@64 A list of regexps which should match buffer names to not show. (defvar ibuffer-tmp-hide-regexps nil (#$ . 2267)) #@67 A list of regexps which should match buffer names to always show. (defvar ibuffer-tmp-show-regexps nil (#$ . 2386)) #@148 If non-nil, Ibuffer auto-mode should be enabled for this buffer. Do not set this variable directly! Use the function `ibuffer-auto-mode' instead. (defvar ibuffer-auto-mode nil (#$ . 2509)) (byte-code "\301B\302\301!\204 \303\301\304\"\210\304\207" [current-load-list ibuffer-auto-buffers-changed default-boundp set-default nil] 3) #@403 An alist of filter qualifiers to switch between. This variable should look like (("STRING" QUALIFIERS) ("STRING" QUALIFIERS) ...), where QUALIFIERS is a list of the same form as `ibuffer-filtering-qualifiers'. See also the variables `ibuffer-filtering-qualifiers', `ibuffer-filtering-alist', and the functions `ibuffer-switch-to-saved-filters', `ibuffer-save-filters'. (custom-declare-variable 'ibuffer-saved-filters ''(("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))))) '(#$ . 2851) :type '(repeat sexp) :group 'ibuffer) #@109 A list like (SYMBOL . QUALIFIER) which filters the current buffer list. See also `ibuffer-filtering-alist'. (defvar ibuffer-filtering-qualifiers nil (#$ . 3639)) #@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 (#$ . 3808)) #@419 An alist which has special formats used when a filter is active. The contents of this variable should look like: ((FILTER (FORMAT FORMAT ...)) (FILTER (FORMAT FORMAT ...)) ...) For example, suppose that when you add a filter for buffers whose major mode is `emacs-lisp-mode', you only want to see the mark and the name of the buffer. You could accomplish that by adding: (mode ((mark " " name))) to this variable. (custom-declare-variable 'ibuffer-filter-format-alist 'nil '(#$ . 4257) :type '(repeat (list :tag "Association" (symbol :tag "Filter") (list :tag "Formats" (repeat (sexp :tag "Format"))))) :group 'ibuffer) (byte-code "\301B\302\301!\204 \303\301\304\"\210\305B\302\305!\204 \303\305\304\"\210\304\207" [current-load-list ibuffer-cached-filter-formats default-boundp set-default nil ibuffer-compiled-filter-formats] 3) #@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 (#$ . 5106)) #@67 If non-nil, then show the names of filter groups which are empty. (custom-declare-variable 'ibuffer-show-empty-filter-groups 't '(#$ . 5372) :type 'boolean :group 'ibuffer) #@440 An alist of filtering groups to switch between. This variable should look like (("STRING" QUALIFIERS) ("STRING" QUALIFIERS) ...), where QUALIFIERS is a list of the same form as `ibuffer-filtering-qualifiers'. See also the variables `ibuffer-filter-groups', `ibuffer-filtering-qualifiers', `ibuffer-filtering-alist', and the functions `ibuffer-switch-to-saved-filter-groups', `ibuffer-save-filter-groups'. (custom-declare-variable 'ibuffer-saved-filter-groups 'nil '(#$ . 5552) :type '(repeat sexp) :group 'ibuffer) #@56 A list of filtering groups which are currently hidden. (defvar ibuffer-hidden-filter-groups nil (#$ . 6107)) (byte-code "\301B\302\301!\204 \303\301\304\"\210\304\207" [current-load-list ibuffer-filter-group-kill-ring default-boundp set-default nil] 3) #@58 The number of hours before a buffer is considered "old". (custom-declare-variable 'ibuffer-old-time '72 '(#$ . 6369) :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) #@161 If non-nil, then use Custom to save interactively changed variables. Currently, this only applies to `ibuffer-saved-filters' and `ibuffer-saved-filter-groups'. (custom-declare-variable 'ibuffer-save-with-custom 't '(#$ . 6656) :type 'boolean :group 'ibuffer) (defalias 'ibuffer-ext-visible-p #[(buf all &optional ibuffer-buf) "\306 \"\206A \306\n\"\206 \306 \"?\205A \f\204\" \306 \"?\205A \2044 \205A =?\205A \307\n\"\206A \306 \"\207" [buf ibuffer-tmp-show-regexps ibuffer-tmp-hide-regexps ibuffer-never-show-predicates all ibuffer-maybe-show-predicates ibuffer-buf-matches-predicates ibuffer-included-in-filters-p ibuffer-view-ibuffer ibuffer-buf ibuffer-filtering-qualifiers ibuffer-always-show-predicates] 3]) (defalias 'ibuffer-auto-update-changed #[nil "\302\303!\205 \304 \305\211\203 @\305\306\307\217\210 A\211\204 *\305\207" [buf #1=#:--cl-dolist-temp-- frame-or-buffer-changed-p ibuffer-auto-buffers-changed buffer-list nil (byte-code "rq\210 \203 \302\303!\203 \304\305\306\"\210)\305\207" [buf ibuffer-auto-mode derived-mode-p ibuffer-mode ibuffer-update nil t] 3) ((error))] 4]) #@116 Toggle use of Ibuffer's auto-update facility. With numeric ARG, enable auto-update if and only if ARG is positive. (defalias 'ibuffer-auto-mode #[(&optional arg) "\302\303!\204\n \304\305!\210\306\301!\210\203 \307V\202 ?\310\311!\210\312\313\314\"\207" [arg ibuffer-auto-mode derived-mode-p ibuffer-mode error "This buffer is not in Ibuffer mode" make-local-variable 0 frame-or-buffer-changed-p ibuffer-auto-buffers-changed add-hook post-command-hook ibuffer-auto-update-changed] 3 (#$ . 7784) nil]) #@65 Enable or disable filtering by the major mode chosen via mouse. (defalias 'ibuffer-mouse-filter-by-mode #[(event) "\301!\207" [event ibuffer-interactive-filter-by-mode] 2 (#$ . 8297) "e"]) #@57 Enable or disable filtering by the major mode at point. (defalias 'ibuffer-interactive-filter-by-mode #[(event-or-point) "\211\250\203 \305\306 \307\310\311\312\"S!\"!\203 \313\314 !!\2068 9\203) \315N\2068 :\2058 @9\2058 @\315N)\203a \316\211:\203U \317\n8:\203O \317\202P \312\n8\202[ \320 `\321\322F)!\210\202d b\210\323 \324\f\236\203u \325\324\f\"\202~ \326\324\327\330 \"B!\210)\331\332\333\"\207" [event-or-point obj event buf ibuffer-filtering-qualifiers zerop logand lognot lsh 134217728 1 characterp event-basic-type event-symbol-elements posn-set-point 2 selected-window (0 . 0) 0 ibuffer-current-buffer mode ibuffer-delete-alist ibuffer-push-filter buffer-local-value major-mode ibuffer-update nil t] 8 (#$ . 8493) "d"]) #@70 Toggle the display status of the filter group chosen with the mouse. (defalias 'ibuffer-mouse-toggle-filter-group #[(event) "\301\212\302!\210`)!\207" [event ibuffer-toggle-filter-group-1 mouse-set-point] 3 (#$ . 9246) "e"]) #@61 Toggle the display status of the filter group on this line. (defalias 'ibuffer-toggle-filter-group #[nil "\300`!\207" [ibuffer-toggle-filter-group-1] 2 (#$ . 9478) nil]) (defalias 'ibuffer-toggle-filter-group-1 #[(posn) "\303\304\"\211;\204 \305\306!\210 \n\235\203 \307 \n\"\202 \nB\310\311\312\")\207" [posn name ibuffer-hidden-filter-groups get-text-property ibuffer-filter-group-name error "No filtering group name present" delete ibuffer-update nil t] 4]) #@48 Move point forwards by COUNT filtering groups. (defalias 'ibuffer-forward-filter-group #[(&optional count) "\204 \301\302V\203( \303`\304\"\203 \305`\304\306d$b\210\305`\304\306d$b\210\307S!\210\310\302!\207" [count 1 0 get-text-property ibuffer-filter-group-name next-single-property-change nil ibuffer-forward-filter-group ibuffer-forward-line] 5 (#$ . 9953) "P"]) #@49 Move point backwards by COUNT filtering groups. (defalias 'ibuffer-backward-filter-group #[(&optional count) "\204 \301\302V\203( \303`\304\"\203 \305`\304\306e$b\210\305`\304\306e$b\210\307S!\210`eU\2035 db\210\307\301!\210\310\302!\207" [count 1 0 get-text-property ibuffer-filter-group-name previous-single-property-change nil ibuffer-backward-filter-group ibuffer-forward-line] 5 (#$ . 10332) "P"]) #@67 Pipe the contents of each marked buffer to shell command COMMAND. (defalias 'ibuffer-do-shell-command-pipe #[(command) "\305\306!\204\f \307\310\311C\"\210\312\313 !\211\204 \314\315 !C\316 !\210\317\320 \"\321\322!\210) \321\322!\210\323\324\f\"*\207" [ibuffer-did-modification ibuffer-marked-char marked-names func count derived-mode-p ibuffer-mode signal cl-assertion-failed (derived-mode-p 'ibuffer-mode) nil ibuffer-buffer-names-with-mark buffer-name ibuffer-current-buffer ibuffer-set-mark #[(buf mark) "rq\210\212\302ed \303\304!$\210*\305\207" [buf command shell-command-on-region get-buffer-create "* ibuffer-shell-output*" t] 6] ibuffer-map-on-mark ibuffer-redisplay t message "Operation finished; Shell command executed on %s buffers"] 4 (#$ . 10747) "sPipe to shell command: "]) #@72 Replace the contents of marked buffers with output of pipe to COMMAND. (defalias 'ibuffer-do-shell-command-pipe-replace #[(command) "\305\306!\204\f \307\310\311C\"\210\312\313 !\211\204 \314\315 !C\316 !\210\317\320\n\"\205> \321\322 \"\323\324!\210) \324\323\324!\210\325\326\f\"))\207" [ibuffer-did-modification ibuffer-marked-char marked-names func count derived-mode-p ibuffer-mode signal 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" #[(buf mark) "rq\210\212rq\210\302ed \303\304%\210+\304\207" [buf command shell-command-on-region nil t] 6] ibuffer-map-on-mark ibuffer-redisplay t message "Operation finished; Buffer contents replaced in %s buffers"] 4 (#$ . 11551) "sPipe to shell command (replace): "]) #@66 Run shell command COMMAND separately on files of marked buffers. (defalias 'ibuffer-do-shell-command-file #[(command) "\305\306!\204\f \307\310\311C\"\210\312\313 !\211\204 \314\315 !C\316 !\210\317\320 \"\321\322!\210) \321\322!\210\323\324\f\"*\207" [ibuffer-did-modification ibuffer-marked-char marked-names func count derived-mode-p ibuffer-mode signal cl-assertion-failed (derived-mode-p 'ibuffer-mode) nil ibuffer-buffer-names-with-mark buffer-name ibuffer-current-buffer ibuffer-set-mark #[(buf mark) "rq\210\212\303 \304\305\n\203 \n\202 \306\307 \310\311\307 G^O!!Q!\210*\312\207" [buf command buffer-file-name shell-command " " shell-quote-argument make-temp-file buffer-name 0 10 t] 9] ibuffer-map-on-mark ibuffer-redisplay t message "Operation finished; Shell command executed on %s buffers"] 4 (#$ . 12428) "sShell command on buffer's file: "]) #@127 Evaluate FORM in each of the buffers. Does not display the buffer during evaluation. See `ibuffer-do-view-and-eval' for that. (defalias 'ibuffer-do-eval #[(form) "\305\306!\204\f \307\310\311C\"\210\312\313 !\211\204 \314\315 !C\316 !\210\317\320 \"\321\322!\210) \321\322!\210\323\324\f\"*\207" [ibuffer-did-modification ibuffer-marked-char marked-names func count derived-mode-p ibuffer-mode signal cl-assertion-failed (derived-mode-p 'ibuffer-mode) nil ibuffer-buffer-names-with-mark buffer-name ibuffer-current-buffer ibuffer-set-mark #[(buf mark) "\304!rq\210\212\305\n!\210*\306 \304!=\204 \306)\207" [buf ibuffer-tmp-previous-buffer-modification form ibuffer-did-modification buffer-modified-p eval t] 4] ibuffer-map-on-mark ibuffer-redisplay t message "Operation finished; evaluated in %s buffers"] 4 (#$ . 13302) (list (read-from-minibuffer "Eval in buffers (form): " nil read-expression-map t 'read-expression-history))]) #@130 Evaluate FORM while displaying each of the marked buffers. To evaluate a form without viewing the buffer, see `ibuffer-do-eval'. (defalias 'ibuffer-do-view-and-eval #[(form) "\305\306!\204\f \307\310\311C\"\210\312\313 !\211\204 \314\315 !C\316 !\210\317\320 \"\321\322!\210) \321\322!\210\323\324\f\"*\207" [ibuffer-did-modification ibuffer-marked-char marked-names func count derived-mode-p ibuffer-mode signal cl-assertion-failed (derived-mode-p 'ibuffer-mode) nil ibuffer-buffer-names-with-mark buffer-name ibuffer-current-buffer ibuffer-set-mark #[(buf mark) "\305!p\306\216\307!\210\310 !* \305!=\204 \311)\207" [buf ibuffer-tmp-previous-buffer-modification ibuffer-buf form ibuffer-did-modification buffer-modified-p ((switch-to-buffer ibuffer-buf)) switch-to-buffer eval t] 4] ibuffer-map-on-mark ibuffer-redisplay t message "Operation finished; evaluated in %s buffers"] 4 (#$ . 14253) (list (read-from-minibuffer "Eval viewing in buffers (form): " nil read-expression-map t 'read-expression-history))]) #@50 Rename marked buffers as with `rename-uniquely'. (defalias 'ibuffer-do-rename-uniquely #[nil "\305\306!\204\f \307\310\311C\"\210\312\313 !\211\204 \314\315 !C\316 !\210\317\320 \"\321\322!\210) \322\321\322!\210\323\324\f\"*\207" [ibuffer-did-modification ibuffer-marked-char marked-names func count derived-mode-p ibuffer-mode signal cl-assertion-failed (derived-mode-p 'ibuffer-mode) nil ibuffer-buffer-names-with-mark buffer-name ibuffer-current-buffer ibuffer-set-mark #[(buf mark) "rq\210\212\301 \210*\302\207" [buf rename-uniquely t] 1] ibuffer-map-on-mark ibuffer-redisplay t message "Operation finished; renamed %s buffers"] 4 (#$ . 15285) nil]) #@48 Revert marked buffers as with `revert-buffer'. (defalias 'ibuffer-do-revert #[nil "\305\306!\204\f \307\310\311C\"\210\312\313 !\211\204 \314\315 !C\316 !\210\317\320\n\"\205< \321\322 \"\323\324!\210) \323\324!\210\325\326\f\"))\207" [ibuffer-did-modification ibuffer-marked-char marked-names func count derived-mode-p ibuffer-mode signal 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" #[(buf mark) "\303!rq\210\212\304\305\211\"\210*\305 \303!=\204 \305)\207" [buf ibuffer-tmp-previous-buffer-modification ibuffer-did-modification buffer-modified-p revert-buffer t] 4] ibuffer-map-on-mark ibuffer-redisplay t message "Operation finished; reverted %s buffers"] 4 (#$ . 15955) nil]) #@48 Perform a `isearch-forward' in marked buffers. (defalias 'ibuffer-do-isearch #[nil "\305\306!\204\f \307\310\311C\"\210\312\313 !\211\204 \314\315 !C\316 !\210\317\320 \"\321\322!\210) \321\322!\210\323\324\f\"*\207" [ibuffer-did-modification ibuffer-marked-char marked-names func count derived-mode-p ibuffer-mode signal cl-assertion-failed (derived-mode-p 'ibuffer-mode) nil ibuffer-buffer-names-with-mark buffer-name ibuffer-current-buffer ibuffer-set-mark #[(buf mark) "\303!\304\305 ! \303!=\204 \306)\207" [buf ibuffer-tmp-previous-buffer-modification ibuffer-did-modification buffer-modified-p multi-isearch-buffers ibuffer-get-marked-buffers t] 4] ibuffer-map-on-mark ibuffer-redisplay t message "Operation finished; searched in %s buffers"] 4 (#$ . 16785) nil]) #@55 Perform a `isearch-forward-regexp' in marked buffers. (defalias 'ibuffer-do-isearch-regexp #[nil "\305\306!\204\f \307\310\311C\"\210\312\313 !\211\204 \314\315 !C\316 !\210\317\320 \"\321\322!\210) \321\322!\210\323\324\f\"*\207" [ibuffer-did-modification ibuffer-marked-char marked-names func count derived-mode-p ibuffer-mode signal cl-assertion-failed (derived-mode-p 'ibuffer-mode) nil ibuffer-buffer-names-with-mark buffer-name ibuffer-current-buffer ibuffer-set-mark #[(buf mark) "\303!\304\305 ! \303!=\204 \306)\207" [buf ibuffer-tmp-previous-buffer-modification ibuffer-did-modification buffer-modified-p multi-isearch-buffers-regexp ibuffer-get-marked-buffers t] 4] ibuffer-map-on-mark ibuffer-redisplay t message "Operation finished; searched regexp in %s buffers"] 4 (#$ . 17573) nil]) #@47 Perform a `replace-regexp' in marked buffers. (defalias 'ibuffer-do-replace-regexp #[(from-str to-str) "\305\306!\204\f \307\310\311C\"\210\312\313 !\211\204 \314\315 !C\316 !\210\317\320 \"\321\322!\210) \321\322!\210\323\324\f\"*\207" [ibuffer-did-modification ibuffer-marked-char marked-names func count derived-mode-p ibuffer-mode signal cl-assertion-failed (derived-mode-p 'ibuffer-mode) nil ibuffer-buffer-names-with-mark buffer-name ibuffer-current-buffer ibuffer-set-mark #[(buf mark) "\303!\304\213 \303!=\204 \305)\207" [buf ibuffer-tmp-previous-buffer-modification ibuffer-did-modification buffer-modified-p ((byte-code "\305!\210\212eb\210 \306 \307\310#\203 \311\f!\210\202\n *\310\207" [buf ibuffer-case-fold-search case-fold-search from-str to-str switch-to-buffer re-search-forward nil t replace-match] 4)) t] 4] ibuffer-map-on-mark ibuffer-redisplay t message "Operation finished; replaced in %s buffers"] 4 (#$ . 18389) (let* ((from-str (read-from-minibuffer "Replace regexp: ")) (to-str (read-from-minibuffer (concat "Replace " from-str " with: ")))) (list from-str to-str))]) #@46 Perform a `query-replace' in marked buffers. (defalias 'ibuffer-do-query-replace #[(&rest args) "\305\306!\204\f \307\310\311C\"\210\312\313 !\211\204 \314\315 !C\316 !\210\317\320 \"\321\322!\210) \321\322!\210\323\324\f\"*\207" [ibuffer-did-modification ibuffer-marked-char marked-names func count derived-mode-p ibuffer-mode signal cl-assertion-failed (derived-mode-p 'ibuffer-mode) nil ibuffer-buffer-names-with-mark buffer-name ibuffer-current-buffer ibuffer-set-mark #[(buf mark) "\303!\304\213 \303!=\204 \305)\207" [buf ibuffer-tmp-previous-buffer-modification ibuffer-did-modification buffer-modified-p ((byte-code "\304!\210\212 eb\210\305\306 \"\210*\307\207" [buf ibuffer-case-fold-search case-fold-search args switch-to-buffer apply query-replace t] 3)) t] 4] ibuffer-map-on-mark ibuffer-redisplay t message "Operation finished; replaced in %s buffers"] 4 (#$ . 19505) (byte-code "\300\301\302\211#\207" [query-replace-read-args "Query replace" t] 4)]) #@53 Perform a `query-replace-regexp' in marked buffers. (defalias 'ibuffer-do-query-replace-regexp #[(&rest args) "\305\306!\204\f \307\310\311C\"\210\312\313 !\211\204 \314\315 !C\316 !\210\317\320 \"\321\322!\210) \321\322!\210\323\324\f\"*\207" [ibuffer-did-modification ibuffer-marked-char marked-names func count derived-mode-p ibuffer-mode signal cl-assertion-failed (derived-mode-p 'ibuffer-mode) nil ibuffer-buffer-names-with-mark buffer-name ibuffer-current-buffer ibuffer-set-mark #[(buf mark) "\303!\304\213 \303!=\204 \305)\207" [buf ibuffer-tmp-previous-buffer-modification ibuffer-did-modification buffer-modified-p ((byte-code "\304!\210\212 eb\210\305\306 \"\210*\307\207" [buf ibuffer-case-fold-search case-fold-search args switch-to-buffer apply query-replace-regexp t] 3)) t] 4] ibuffer-map-on-mark ibuffer-redisplay t message "Operation finished; replaced in %s buffers"] 4 (#$ . 20490) (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 #[nil "\305\306!\204\f \307\310\311C\"\210\312\313 !\211\204 \314\315 !C\316 !\210\317\320 \"\321\322!\210) \321\322!\210\323\324\f\"*\207" [ibuffer-did-modification ibuffer-marked-char marked-names func count derived-mode-p ibuffer-mode signal cl-assertion-failed (derived-mode-p 'ibuffer-mode) nil ibuffer-buffer-names-with-mark buffer-name ibuffer-current-buffer ibuffer-set-mark #[(buf mark) "rq\210\212\301 \210*\302\207" [buf print-buffer t] 1] ibuffer-map-on-mark ibuffer-redisplay t message "Operation finished; printed %s buffers"] 4 (#$ . 21503) nil]) (defalias 'ibuffer-included-in-filters-p #[(buf filters) "\301\302\303\">?\207" [filters nil mapcar #[(qual) "\302 \"\207" [buf qual ibuffer-included-in-filter-p] 3]] 4]) (defalias 'ibuffer-included-in-filter-p #[(buf filter) "@\302=\203 \303 A\"?\207\303 \"\207" [filter buf not ibuffer-included-in-filter-p-1] 3]) (defalias 'ibuffer-included-in-filter-p-1 #[(buf filter) "@\306=\203 \307\310\311A\">\202Z @\312=\2038 \313A \"\211\204+ \314 \210\315\316A\"\210\317 \n\211 A@)\")\202Z @ \236\211 \204K \314 \210\315\320@\"\210\211 AA)@ A\")????\207" [filter ibuffer-saved-filters data buf x ibuffer-filtering-alist or t mapcar #[(x) "\302 \"\207" [buf x ibuffer-included-in-filter-p] 3] saved assoc ibuffer-filter-disable error "Unknown saved filter %s" ibuffer-included-in-filters-p "Undefined filter %s" filterdat] 5]) (defalias 'ibuffer-generate-filter-groups #[(bmarklist &optional noempty nodefault) "\203 \202 \306 \307\310BC\"\311\nG\310\"\312 \n\310 \211 \203Q @\211A \313\314\"\211 @ A@ \f I\210 T, A\211 \204! *\310 \312 W\203\212 \fH \203s \203\200 \n8@BB)T\211\202] .\207" [nodefault ibuffer-filter-groups filter-group-alist i vec filtergroup append "Default" nil make-vector 0 ibuffer-split-list #[(bufmark) "\302@ \"\207" [bufmark filterset ibuffer-included-in-filters-p] 3] #1=#:--cl-dolist-temp-- filterset bmarklist #2=#:--cl-var-- hip-crowd lamers ret j #3=#:--cl-dotimes-temp-- bufs noempty] 4]) #@50 Make the current filters into a filtering group. (defalias 'ibuffer-filters-to-filter-group #[(name) "\204 \303\304!\210 B\nB\305 \207" [ibuffer-filtering-qualifiers name ibuffer-filter-groups error "No filters in effect" ibuffer-filter-disable] 2 (#$ . 23645) "sName for filtering group: "]) #@50 Set the current filter groups to filter by mode. (defalias 'ibuffer-set-filter-groups-by-mode #[nil "\303\304\305\303\306\307 \"! \203 \202 \310\311\")\"\312\313\314\"\207" [modes ibuffer-view-ibuffer ibuffer-filter-groups mapcar #[(mode) "\301\302\"\300BCB\207" [mode format "%s"] 3] ibuffer-remove-duplicates #[(buf) "\301\302\"\207" [buf buffer-local-value major-mode] 3] buffer-list delq ibuffer-mode ibuffer-update nil t] 6 (#$ . 23948) nil]) #@32 Remove the first filter group. (defalias 'ibuffer-pop-filter-group #[nil "\204 \302\303!\210\304\211A@ \"\305\306\307\"\207" [ibuffer-filter-groups ibuffer-hidden-filter-groups error "No filter groups active" delete ibuffer-update nil t] 3 (#$ . 24411) nil]) (defalias 'ibuffer-read-filter-group-name #[(msg &optional nodefault noerror) "\204\f \204\f \306\307!\210\310\n\311\312 ?\f#\f\203 \313\314 \"\202! \244\315\316$\207" [noerror ibuffer-filter-groups msg ibuffer-show-empty-filter-groups nodefault ibuffer-hidden-filter-groups error "No filter groups active" completing-read ibuffer-generate-filter-groups ibuffer-current-state-list remove "Default" nil t] 6]) #@55 Decompose the filter group GROUP into active filters. (defalias 'ibuffer-decompose-filter-group #[(group) "\304 \"A\305 \"\n)\306\307\310\"\207" [group ibuffer-filter-groups data ibuffer-filtering-qualifiers assoc ibuffer-delete-alist ibuffer-update nil t] 3 (#$ . 25095) (list (ibuffer-read-filter-group-name "Decompose filter group: " t))]) #@27 Remove all filter groups. (defalias 'ibuffer-clear-filter-groups #[nil "\302\211\303\302\304\"\207" [ibuffer-filter-groups ibuffer-hidden-filter-groups nil ibuffer-update t] 4 (#$ . 25449) nil]) (defalias 'ibuffer-current-filter-groups-with-position #[nil "\212eb\210\302\211m\204* \303`\304\"\211\203* b\210\305`\304\" BB\303 \304\"b\210\202 \237+\207" [result pos nil next-single-property-change ibuffer-filter-group-name get-text-property] 3]) #@52 Move point to the filter group whose name is NAME. (defalias 'ibuffer-jump-to-filter-group #[(name) "\303\304 \"\211\203 \211Ab)\202 \305\306\")\207" [name #1=#:ibuffer-aif-sym it assoc ibuffer-current-filter-groups-with-position error "No filter group with name %s"] 4 (#$ . 25912) (list (ibuffer-read-filter-group-name "Jump to filter group: "))]) #@96 Kill the filter group named NAME. The group will be added to `ibuffer-filter-group-kill-ring'. (defalias 'ibuffer-kill-filter-group #[(name) "\306\232\203\n \307\310!\210\311 \"\211\203) \n\312 !\fB\313 \"\314 \")\202. \307\315\"\210)\316\317\320\"\207" [name ibuffer-filter-groups #1=#:ibuffer-aif-sym it 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] 4 (#$ . 26275) (list (ibuffer-read-filter-group-name "Kill filter group: " t))]) #@71 Kill the filter group at point. See also `ibuffer-kill-filter-group'. (defalias 'ibuffer-kill-line #[(&optional arg interactive-p) "\212\304\305!\210\306`\307\")\211\203 \310 !)\202$ \n\203 \311\202! \312\313 \")\207" [#1=#:ibuffer-aif-sym it interactive-p arg ibuffer-forward-line 0 get-text-property ibuffer-filter-group-name ibuffer-kill-filter-group call-interactively funcall kill-line] 4 (#$ . 26889) "P\np"]) (defalias 'ibuffer-insert-filter-group-before #[(newgroup group) "\306\307\310 \"\311\211\203& @\f\232\203 \312\306\211\202\n \nT A\211\204 \n* \2047 \fC\244\211\202Z \313 !\203F \f B\211\202Z \233\211 \211@ AB\241\210 \f\240)*\207" [found ibuffer-filter-groups res groups group pos nil mapcar car 0 t zerop newgroup cell] 4]) #@58 Yank the last killed filter group before group at point. (defalias 'ibuffer-yank #[nil "\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 (#$ . 27665) nil]) #@60 Yank the last killed filter group before group named NAME. (defalias 'ibuffer-yank-filter-group #[(name) "\204 \302\303!\210\212\304\305!\210\306\211A@ \"\210)\307\310\311\"\207" [ibuffer-filter-group-kill-ring name error "The Ibuffer filter group kill-ring is empty" ibuffer-forward-line 0 ibuffer-insert-filter-group-before ibuffer-update nil t] 3 (#$ . 27960) (list (ibuffer-read-filter-group-name "Yank filter group before group: "))]) #@158 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. (defalias 'ibuffer-save-filter-groups #[(name groups) "\305 \"\211\203 \n\211\f\241\210)\202 \fB B)\306 \207" [name ibuffer-saved-filter-groups #1=#:ibuffer-aif-sym it groups assoc ibuffer-maybe-save-stuff] 4 (#$ . 28411) (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)]) #@92 Delete saved filter groups with NAME. They are removed from `ibuffer-saved-filter-groups'. (defalias 'ibuffer-delete-saved-filter-groups #[(name) "\302 \"\303 \210\304\305\306\"\207" [name ibuffer-saved-filter-groups ibuffer-delete-alist ibuffer-maybe-save-stuff ibuffer-update nil t] 3 (#$ . 28968) (list (if (null ibuffer-saved-filter-groups) (error "No saved filter groups") (completing-read "Delete saved filter group: " ibuffer-saved-filter-groups nil t)))]) #@115 Set this buffer's filter groups to saved version with NAME. The value from `ibuffer-saved-filter-groups' is used. (defalias 'ibuffer-switch-to-saved-filter-groups #[(name) "\304 \"A\305\306\305\307\"\207" [name ibuffer-saved-filter-groups ibuffer-filter-groups ibuffer-hidden-filter-groups assoc nil ibuffer-update t] 3 (#$ . 29441) (list (if (null ibuffer-saved-filter-groups) (error "No saved filters") (completing-read "Switch to saved filter group: " ibuffer-saved-filter-groups nil t)))]) #@57 Disable all filters currently in effect in this buffer. (defalias 'ibuffer-filter-disable #[nil "\302\303 \304\302\305\"\210 \205 \306\307 !!)\207" [ibuffer-filtering-qualifiers buf nil ibuffer-current-buffer ibuffer-update t ibuffer-jump-to-buffer buffer-name] 3 (#$ . 29944) nil]) #@39 Remove the top filter in this buffer. (defalias 'ibuffer-pop-filter #[nil "\204 \302\303!\210\210A\304 \305\306\307\"\210 \205 \310\311 !!)\207" [ibuffer-filtering-qualifiers buf error "No filters in effect" ibuffer-current-buffer ibuffer-update nil t ibuffer-jump-to-buffer buffer-name] 3 (#$ . 30236) nil]) #@50 Add QUALIFIER to `ibuffer-filtering-qualifiers'. (defalias 'ibuffer-push-filter #[(qualifier) " B\211\207" [qualifier ibuffer-filtering-qualifiers] 2 (#$ . 30558)]) #@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 #[nil "\204 \305\306!\210\211A@\211@\307=\203 \310 A\"\202[ @\311=\203F \312 A\n\"\211\2048 \313 \210\305\314 A\"\210\310 \211 A@)\")\202[ @\315=\203U AB\202[ \305\316 @\"\210)\317\320\321\"\207" [ibuffer-filtering-qualifiers lim ibuffer-saved-filters data x 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] 4 (#$ . 30732) nil]) #@59 Exchange the top two filters on the stack in this buffer. (defalias 'ibuffer-exchange-filters #[nil "G\303W\203 \304\305!\210\211A@\211A@\211B B*\306\307\310\"\207" [ibuffer-filtering-qualifiers second first 2 error "Need two filters to exchange" ibuffer-update nil t] 4 (#$ . 31504) nil]) #@59 Negate the sense of the top filter in the current buffer. (defalias 'ibuffer-negate-filter #[nil "\204 \302\303!\210\211A@\211@\304=\203 A\202 \304 BB)\305\306\307\"\207" [ibuffer-filtering-qualifiers lim error "No filters in effect" not ibuffer-update nil t] 4 (#$ . 31812) nil]) #@152 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. (defalias 'ibuffer-or-filter #[(&optional reverse) "\203& \203 \211@@)\306=\204 \307\310!\210 \211A@\211A \244)\202X G\311W\2031 \307\312!\210 \211A@ \211A@ \f@\306=\203P \306 D\fA\244 B\202W \306 \fE B*\313\314\315\"\207" [reverse ibuffer-filtering-qualifiers x lim second first or error "Top filter is not an OR" 2 "Need two filters to OR" ibuffer-update nil t] 4 (#$ . 32110) "P"]) (defalias 'ibuffer-maybe-save-stuff #[nil "\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]) #@133 Save FILTERS in this buffer with name NAME in `ibuffer-saved-filters'. Interactively, prompt for NAME, and use the current filters. (defalias 'ibuffer-save-filters #[(name filters) "\305 \"\211\203 \n\211\f\241\210)\202 \fD B)\306 \207" [name ibuffer-saved-filters #1=#:ibuffer-aif-sym it filters assoc ibuffer-maybe-save-stuff] 4 (#$ . 32949) (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)]) #@62 Delete saved filters with NAME from `ibuffer-saved-filters'. (defalias 'ibuffer-delete-saved-filters #[(name) "\302 \"\303 \210\304\305\306\"\207" [name ibuffer-saved-filters ibuffer-delete-alist ibuffer-maybe-save-stuff ibuffer-update nil t] 3 (#$ . 33479) (list (if (null ibuffer-saved-filters) (error "No saved filters") (completing-read "Delete saved filters: " ibuffer-saved-filters nil t)))]) #@74 Add saved filters from `ibuffer-saved-filters' to this buffer's filters. (defalias 'ibuffer-add-saved-filters #[(name) "\302B B\303\304\305\"\207" [name ibuffer-filtering-qualifiers saved ibuffer-update nil t] 3 (#$ . 33886) (list (if (null ibuffer-saved-filters) (error "No saved filters") (completing-read "Add saved filters: " ibuffer-saved-filters nil t)))]) #@78 Set this buffer's filters to filters with NAME from `ibuffer-saved-filters'. (defalias 'ibuffer-switch-to-saved-filters #[(name) "\302BC\303\304\305\"\207" [name ibuffer-filtering-qualifiers saved ibuffer-update nil t] 3 (#$ . 34257) (list (if (null ibuffer-saved-filters) (error "No saved filters") (completing-read "Switch to saved filters: " ibuffer-saved-filters nil t)))]) (defalias 'ibuffer-format-filter-group-data #[(filter) "\302\232\203 \303\207\304\305\306 \236A\307#P\207" [filter ibuffer-filter-groups "Default" "" "Filter:" mapconcat ibuffer-format-qualifier " "] 5]) (defalias 'ibuffer-format-qualifier #[(qualifier) "\242\301=\203 \302\303A!\304Q\207\303!\207" [qualifier not " [NOT" ibuffer-format-qualifier-1 "]"] 3]) (defalias 'ibuffer-format-qualifier-1 #[(qualifier) "@\304=\203 \305A\306Q\207@\307=\203 \310\311\312A\313#\306Q\207@ \236\204, \314\315\"\210\316\n\211A@)\317\320\321A\"R)\207" [qualifier ibuffer-filtering-alist type x saved " [filter: " "]" or " [OR" mapconcat ibuffer-format-qualifier "" error "Ibuffer: bad qualifier %s" " [" ": " format "%s]"] 7]) #@118 Create an alist of buffer modes currently in use. The list returned will be of the form ("MODE-NAME" . MODE-SYMBOL). (defalias 'ibuffer-list-buffer-modes #[nil "\303 \304\211\n\203 \305\306\n@\"\nA\307\301\310!B\"\210\202 +\207" [this-mode modes bufs buffer-list nil buffer-local-value major-mode add-to-list symbol-name] 4 (#$ . 35374)]) #@59 Toggle current view to buffers with major mode QUALIFIER. (defalias 'ibuffer-filter-by-mode #[(qualifier) "\301\302B!\210\303\304\305\306\"\"\210\307\310\311\"\207" [qualifier ibuffer-push-filter mode message "%s" format "Filter by major mode added: %s" ibuffer-update nil t] 5 (#$ . 35729) (list (intern (completing-read "Filter by major mode: " obarray #'(lambda (e) (string-match "-mode$" (symbol-name e))) t (let ((buf (ibuffer-current-buffer))) (if (and buf (buffer-live-p buf)) (symbol-name (buffer-local-value 'major-mode buf)) "")))))]) (byte-code "\301\302\303EB\301\207" [ibuffer-filtering-alist mode "major mode" #[(buf qualifier) "\302\303 \"=\207" [qualifier buf buffer-local-value major-mode] 4]] 3) #@148 Toggle current view to buffers with major mode QUALIFIER. Called interactively, this function allows selection of modes currently used by buffers. (defalias 'ibuffer-filter-by-used-mode #[(qualifier) "\301\302B!\210\303\304\305\306\"\"\210\307\310\311\"\207" [qualifier ibuffer-push-filter used-mode message "%s" format "Filter by major mode in use added: %s" ibuffer-update nil t] 5 (#$ . 36456) (list (intern (completing-read "Filter by major mode: " (ibuffer-list-buffer-modes) nil t (let ((buf (ibuffer-current-buffer))) (if (and buf (buffer-live-p buf)) (symbol-name (buffer-local-value 'major-mode buf)) "")))))]) (byte-code "\301\302\303EB\301\207" [ibuffer-filtering-alist used-mode "major mode in use" #[(buf qualifier) "\302\303 \"=\207" [qualifier buf buffer-local-value major-mode] 4]] 3) #@62 Toggle current view to buffers with name matching QUALIFIER. (defalias 'ibuffer-filter-by-name #[(qualifier) "\301\302B!\210\303\304\305\306\"\"\210\307\310\311\"\207" [qualifier ibuffer-push-filter name message "%s" format "Filter by buffer name added: %s" ibuffer-update nil t] 5 (#$ . 37269) (list (read-from-minibuffer "Filter by name (regexp): "))]) (byte-code "\301\302\303EB\301\207" [ibuffer-filtering-alist name "buffer name" #[(buf qualifier) "\302\303 !\"\207" [qualifier buf string-match buffer-name] 4]] 3) #@66 Toggle current view to buffers with filename matching QUALIFIER. (defalias 'ibuffer-filter-by-filename #[(qualifier) "\301\302B!\210\303\304\305\306\"\"\210\307\310\311\"\207" [qualifier ibuffer-push-filter filename message "%s" format "Filter by filename added: %s" ibuffer-update nil t] 5 (#$ . 37801) (list (read-from-minibuffer "Filter by filename (regexp): "))]) (byte-code "\301\302\303EB\301\207" [ibuffer-filtering-alist filename "filename" #[(buf qualifier) "\304\305\"\211\205 \306 \n\"))\207" [buf #:ibuffer-aif-sym it qualifier buffer-local-value buffer-file-name string-match] 4]] 3) #@66 Toggle current view to buffers with size greater than QUALIFIER. (defalias 'ibuffer-filter-by-size-gt #[(qualifier) "\301\302B!\210\303\304\305\306\"\"\210\307\310\311\"\207" [qualifier ibuffer-push-filter size-gt message "%s" format "Filter by size greater than added: %s" ibuffer-update nil t] 5 (#$ . 38414) (list (string-to-number (read-from-minibuffer "Filter by size greater than: ")))]) (byte-code "\301\302\303EB\301\207" [ibuffer-filtering-alist size-gt "size greater than" #[(buf qualifier) "rq\210\302 ) V\207" [buf qualifier buffer-size] 2]] 3) #@63 Toggle current view to buffers with size less than QUALIFIER. (defalias 'ibuffer-filter-by-size-lt #[(qualifier) "\301\302B!\210\303\304\305\306\"\"\210\307\310\311\"\207" [qualifier ibuffer-push-filter size-lt message "%s" format "Filter by size less than added: %s" ibuffer-update nil t] 5 (#$ . 38983) (list (string-to-number (read-from-minibuffer "Filter by size less than: ")))]) (byte-code "\301\302\303EB\301\207" [ibuffer-filtering-alist size-lt "size less than" #[(buf qualifier) "rq\210\302 ) W\207" [buf qualifier buffer-size] 2]] 3) #@64 Toggle current view to buffers whose contents match QUALIFIER. (defalias 'ibuffer-filter-by-content #[(qualifier) "\301\302B!\210\303\304\305\306\"\"\210\307\310\311\"\207" [qualifier ibuffer-push-filter content message "%s" format "Filter by content added: %s" ibuffer-update nil t] 5 (#$ . 39540) (list (read-from-minibuffer "Filter by content (regexp): "))]) (byte-code "\301\302\303EB\301\207" [ibuffer-filtering-alist content "content" #[(buf qualifier) "rq\210\212eb\210\302 \303\304#*\207" [buf qualifier re-search-forward nil t] 4]] 3) #@69 Toggle current view to buffers for which QUALIFIER returns non-nil. (defalias 'ibuffer-filter-by-predicate #[(qualifier) "\301\302B!\210\303\304\305\306\"\"\210\307\310\311\"\207" [qualifier ibuffer-push-filter predicate message "%s" format "Filter by predicate added: %s" ibuffer-update nil t] 5 (#$ . 40096) (list (read-minibuffer "Filter by predicate (form): "))]) (byte-code "\301\302\303EB\301\207" [ibuffer-filtering-alist predicate "predicate" #[(buf qualifier) "rq\210\302 !)\207" [buf qualifier eval] 2]] 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 #[nil "\304\305\"\306\301\307\"\210\310 \311\"\n >\243\242\206 @\211\312\313 \"\210*\314\315!\207" [ibuffer-sorting-functions-alist modes ibuffer-sorting-mode next mapcar car add-to-list recency sort string-lessp message "Sorting by %s" ibuffer-redisplay t] 4 (#$ . 40626) nil]) #@52 Toggle whether or not sorting is in reverse order. (defalias 'ibuffer-invert-sorting #[nil "?\301\302\203 \303\202 \304\"\210\305\306!\207" [ibuffer-sorting-reversep message "Sorting order %s" "reversed" "normal" ibuffer-redisplay t] 3 (#$ . 41181) nil]) #@61 Sort the buffers by major modes. Ordering is lexicographic. (defalias 'ibuffer-do-sort-by-major-mode #[nil "\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 (#$ . 41447) nil]) (byte-code "\301\302\303EB\301\207" [ibuffer-sorting-functions-alist major-mode "major mode" #[(a b) "\302\303\304@\"!\227\302\303\304 @\"!\227\231\207" [a b symbol-name buffer-local-value major-mode] 5]] 3) #@65 Sort the buffers by their mode name. Ordering is lexicographic. (defalias 'ibuffer-do-sort-by-mode-name #[nil "\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 (#$ . 41947) nil]) (byte-code "\301\302\303EB\301\207" [ibuffer-sorting-functions-alist mode-name "major mode name" #[(a b) "r@q\210\303 !)\227r\n@q\210\303 !)\227\231\207" [a mode-name b format-mode-line] 3]] 3) #@61 Sort the buffers by their names. Ordering is lexicographic. (defalias 'ibuffer-do-sort-by-alphabetic #[nil "\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 (#$ . 42435) nil]) (byte-code "\301\302\303EB\301\207" [ibuffer-sorting-functions-alist alphabetic "buffer name" #[(a b) "\302@!\302 @!\231\207" [a b buffer-name] 3]] 3) #@33 Sort the buffers by their size. (defalias 'ibuffer-do-sort-by-size #[nil "\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 (#$ . 42878) nil]) (byte-code "\301\302\303EB\301\207" [ibuffer-sorting-functions-alist size "size" #[(a b) "r@q\210\302 )r @q\210\302 )W\207" [a b buffer-size] 2]] 3) #@51 Sort the buffers by their file name/process name. (defalias 'ibuffer-do-sort-by-filename/process #[nil "\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 (#$ . 43279) nil]) (byte-code "\301\302\303EB\301\207" [ibuffer-sorting-functions-alist filename/process "file name" #[(a b) "\304@!\206 \305@!\306 !\205 \307 !)\304\n@!\206, \305\n@!\306 !\205+ \307 !)\231\207" [a pr-a b pr-b buffer-file-name get-buffer-process processp process-name] 3]] 3) #@43 Emulate `bs-show' from the bs.el package. (defalias 'ibuffer-bs-show #[nil "\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 (#$ . 43852) nil]) #@54 Emulate `bs-toggle-show-all' from the bs.el package. (defalias 'ibuffer-bs-toggle-all #[nil "\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 (#$ . 44114) nil]) #@137 Add REGEXP to `ibuffer-tmp-hide-regexps'. This means that buffers whose name matches REGEXP will not be shown for this Ibuffer session. (defalias 'ibuffer-add-to-tmp-hide #[(regexp) " B\211\207" [regexp ibuffer-tmp-hide-regexps] 2 (#$ . 44393) (list (read-from-minibuffer "Never show buffers matching: " (regexp-quote (buffer-name (ibuffer-current-buffer t)))))]) #@140 Add REGEXP to `ibuffer-tmp-show-regexps'. This means that buffers whose name matches REGEXP will always be shown for this Ibuffer session. (defalias 'ibuffer-add-to-tmp-show #[(regexp) " B\211\207" [regexp ibuffer-tmp-show-regexps] 2 (#$ . 44766) (list (read-from-minibuffer "Always show buffers matching: " (regexp-quote (buffer-name (ibuffer-current-buffer t)))))]) #@306 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. (defalias 'ibuffer-forward-next-marked #[(&optional count mark direction) "\204 \306 \204\f \n \204 \306\307\310!\210`\311 \307 !\210` U\204= \312\313 \314\"\211 A@)\211 =\204= \307 !\210\202 ` U\205X \312\313 \314\"\211 A@) =?\205X \315\316 \"*\207" [count mark ibuffer-marked-char direction curmark opos 1 ibuffer-forward-line 0 nil get-text-property line-beginning-position ibuffer-properties error "No buffers with mark %c" x] 4 (#$ . 45143) "P"]) #@176 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'. (defalias 'ibuffer-backwards-next-marked #[(&optional count mark) "\302 \303#\207" [count mark ibuffer-forward-next-marked -1] 4 (#$ . 45918) "P"]) #@41 Hide all of the currently marked lines. (defalias 'ibuffer-do-kill-lines #[nil "\303 \304U\203 \305\306!\207\307\310 \"\311\312!\210)\305\313\n\")\207" [func ibuffer-marked-char count ibuffer-count-marked-lines 0 message "No buffers marked; use 'm' to mark a buffer" #[(buf mark) "\300\207" [kill] 1] ibuffer-map-on-mark ibuffer-redisplay t "Killed %s lines"] 3 (#$ . 46248) nil]) #@399 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. (defalias 'ibuffer-jump-to-buffer #[(name) "\303\230?\205) \304\305\306\307\304#\210 \204 \n\203 \310\311\215\210 \204& \312\313\"\202( b)\207" [name buf-point ibuffer-hidden-filter-groups "" nil ibuffer-map-lines #[(buf marks) "\303! \230\205 `\304\207" [buf name buf-point buffer-name nil] 2] t found (byte-code "\304\211\203. \n@\305 !\210\306 \210\307\310\311 #\210 \203$ \312\313\304\"\210\202' \306 \210\nA\211\204 *\304\207" [ibuffer-hidden-filter-groups group #1=#:--cl-dolist-temp-- buf-point nil ibuffer-jump-to-filter-group ibuffer-toggle-filter-group ibuffer-map-lines #[(buf marks) "\303! \230\205 `\304\207" [buf name buf-point buffer-name nil] 2] t throw found] 5) error "No buffer with name %s"] 4 (#$ . 46640) (list (let ((only-visible ibuffer-jump-offer-only-visible-buffers)) (when current-prefix-arg (setq only-visible (not only-visible))) (if only-visible (let ((table (mapcar #'(lambda (x) (buffer-name (car x))) (ibuffer-current-state-list)))) (when (null table) (error "No buffers!")) (completing-read "Jump to buffer: " table nil t)) (read-buffer "Jump to buffer: " nil t))))]) (defalias 'ibuffer-diff-buffer-with-file-1 #[(buffer) "\306\307\"\310\311!\211\205\236 \312\216rq\210\313\312\211 \312\314%\210)\315\n!\315 ! \316 ! \316\f! ! \"\317\320#\321\"<\203A \"\202D \"C \204L \f\205Z \322\323 !\322\323\324\325\326!\"!F\323 \206` !\323 \206h \f!D#B\327# $\312 %\330 &$\331\261\210\332\333'\312p\312($&!\210)\331c\210.\334\335!\210\336 !\205\236 \337 !*\207" [buffer tempfile bufferfile old new oldtmp buffer-local-value buffer-file-name make-temp-file "buffer-content-" nil write-region 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 newtmp diff-switches switches diff-command command proc inhibit-read-only shell-file-name shell-command-switch] 14]) #@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 #[nil "\304\305!\210\306 \211\204 \307\310!Cr\311\312!q\210\313\314p!\210\315 \210\316p!\210\317 \210\313\211\203G @\320\n!\204< \321\322\n\"\210\323\n!\210 A\211\204. *\310*\324\312!\207" [marked-bufs buffer-read-only buf #1=#:--cl-dolist-temp-- 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] 5 (#$ . 49016) nil]) #@500 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]. (defalias 'ibuffer-copy-filename-as-kill #[(&optional arg) "\305\306 !\203 \307\310!\207\311\305!\203 \312\202! \313U\203 \314\202! \315\316\317\f \"\210\320\321!\210)\322\n!*\207" [arg type ibuffer-copy-filename-as-kill-result func ibuffer-marked-char zerop ibuffer-count-marked-lines message "No buffers marked; use 'm' to mark a buffer" #1="" full 4 relative name #[(buf mark) "\306 !\211\203* \307=\203 \n\202+ \310=\203$ \311\n\f\206 \"\202+ \312\n!\202+ \313)\314Q\211\207" [ibuffer-copy-filename-as-kill-result buf name type ibuffer-default-directory default-directory buffer-file-name full relative file-relative-name file-name-nondirectory #1# " "] 5] ibuffer-map-on-mark ibuffer-redisplay t kill-new] 3 (#$ . 49788) "p"]) (defalias 'ibuffer-mark-on-buffer #[(func &optional ibuffer-mark-on-buffer-mark group) "\303\304\305#\306\307!\210\n\310=?\205 \311\312 \")\207" [group count ibuffer-mark-on-buffer-mark ibuffer-map-lines #[(buf mark) " !\205 \304\n\206\f !\210\305\207" [func buf ibuffer-mark-on-buffer-mark ibuffer-marked-char ibuffer-set-mark-1 t] 2] nil ibuffer-redisplay t 32 message "Marked %s buffers"] 4]) #@45 Mark all buffers whose name matches REGEXP. (defalias 'ibuffer-mark-by-name-regexp #[(regexp) "\300\301!\207" [ibuffer-mark-on-buffer #[(buf) "\302\303 !\"\207" [regexp buf string-match buffer-name] 4]] 2 (#$ . 51443) "sMark by name (regexp): "]) #@51 Mark all buffers whose major mode matches REGEXP. (defalias 'ibuffer-mark-by-mode-regexp #[(regexp) "\300\301!\207" [ibuffer-mark-on-buffer #[(buf) "rq\210\303 \304\n\305\211$\")\207" [buf regexp mode-name string-match format-mode-line nil] 7]] 2 (#$ . 51697) "sMark by major mode (regexp): "]) #@50 Mark all buffers whose file name matches REGEXP. (defalias 'ibuffer-mark-by-file-name-regexp #[(regexp) "\300\301!\207" [ibuffer-mark-on-buffer #[(buf) "\304!\206 rq\210\305\301!\205 ;\205 )\211\205 \306 \n\")\207" [buf dired-directory name regexp buffer-file-name boundp string-match] 4]] 2 (#$ . 52000) "sMark by file name (regexp): "]) #@48 Mark all buffers whose major mode equals MODE. (defalias 'ibuffer-mark-by-mode #[(mode) "\300\301!\207" [ibuffer-mark-on-buffer #[(buf) "\302\303\" =\207" [buf mode buffer-local-value major-mode] 3]] 2 (#$ . 52354) (list (intern (completing-read "Mark by major mode: " obarray #'(lambda (e) (and (fboundp e) (string-match "-mode$" (symbol-name e)))) t (let ((buf (ibuffer-current-buffer))) (if (and buf (buffer-live-p buf)) (with-current-buffer buf (cons (symbol-name major-mode) 0)) "")))))]) #@28 Mark all modified buffers. (defalias 'ibuffer-mark-modified-buffers #[nil "\300\301!\207" [ibuffer-mark-on-buffer #[(buf) "\301!\207" [buf buffer-modified-p] 2]] 2 (#$ . 52855) nil]) #@57 Mark all modified buffers that have an associated file. (defalias 'ibuffer-mark-unsaved-buffers #[nil "\300\301!\207" [ibuffer-mark-on-buffer #[(buf) "\301\302\"\205\n \303!\207" [buf buffer-local-value buffer-file-name buffer-modified-p] 3]] 2 (#$ . 53045) nil]) #@56 Mark all buffers whose associated file does not exist. (defalias 'ibuffer-mark-dissociated-buffers #[nil "\300\301!\207" [ibuffer-mark-on-buffer #[(buf) "rq\210 \203 \304 !?\206& \n\305=\205& \306\303!\205& ;\205& \304\307 !!?)\207" [buf buffer-file-name major-mode dired-directory file-exists-p dired-mode boundp file-name-directory] 3]] 2 (#$ . 53317) nil]) #@46 Mark buffers like *Help*, *Apropos*, *Info*. (defalias 'ibuffer-mark-help-buffers #[nil "\300\301!\207" [ibuffer-mark-on-buffer #[(buf) "rq\210 \n>)\207" [buf major-mode ibuffer-help-buffer-modes] 2]] 2 (#$ . 53686) nil]) #@51 Mark buffers whose associated file is compressed. (defalias 'ibuffer-mark-compressed-file-buffers #[nil "\300\301!\207" [ibuffer-mark-on-buffer #[(buf) "rq\210 \205\f \303\n \")\207" [buf buffer-file-name ibuffer-compressed-file-name-regexp string-match] 3]] 2 (#$ . 53915) nil]) #@70 Mark buffers which have not been viewed in `ibuffer-old-time' hours. (defalias 'ibuffer-mark-old-buffers #[nil "\300\301!\207" [ibuffer-mark-on-buffer #[(buf) "rq\210 \205N \306 \307\310\311\312\313\"!\n@_\310\n\211A@)!\314\n\211AA)@_# \307\310\311\312\313\"! @_\310 \211A@)!\315 \211AA)@_# \f Z\316_V+)\207" [buf buffer-display-time tm x now then current-time + float ash 1 16 1e-07 1e-07 3600 ibuffer-old-time] 6]] 2 (#$ . 54202) nil]) #@55 Mark all buffers whose name begins and ends with '*'. (defalias 'ibuffer-mark-special-buffers #[nil "\300\301!\207" [ibuffer-mark-on-buffer #[(buf) "\301\302\303!\"\207" [buf string-match "^\\*.+\\*$" buffer-name] 4]] 2 (#$ . 54654) nil]) #@29 Mark all read-only buffers. (defalias 'ibuffer-mark-read-only-buffers #[nil "\300\301!\207" [ibuffer-mark-on-buffer #[(buf) "\301\302\"\207" [buf buffer-local-value buffer-read-only] 3]] 2 (#$ . 54900) nil]) #@27 Mark all `dired' buffers. (defalias 'ibuffer-mark-dired-buffers #[nil "\300\301!\207" [ibuffer-mark-on-buffer #[(buf) "\301\302\"\303=\207" [buf buffer-local-value major-mode dired-mode] 3]] 2 (#$ . 55115) nil]) #@142 View lines which match REGEXP in all marked buffers. Optional argument NLINES says how many lines of context to display: it defaults to one. (defalias 'ibuffer-do-occur #[(regexp &optional nlines) "\250\203 \305W\203 \305\306\307 !\203 \310 !\210\311\312\313 \"\210\314\315!\210)\316\f\n#)\207" [nlines ibuffer-marked-char ibuffer-do-occur-bufs func regexp 0 zerop ibuffer-count-marked-lines ibuffer-set-mark nil #[(buf mark) " B\211\207" [buf ibuffer-do-occur-bufs] 2] ibuffer-map-on-mark ibuffer-redisplay t occur-1] 4 (#$ . 55335) (occur-read-primary-args)]) (provide 'ibuf-ext)
Close
