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 : complete.elc
;ELC ;;; Compiled by mockbuild@c6b8.bsys.dev.centos.org on Thu Feb 19 13:02:46 2015 ;;; from file /builddir/build/BUILD/emacs-23.1/lisp/complete.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 "`complete.el' was compiled for Emacs 19.29 or later")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (custom-declare-group 'partial-completion nil "Partial Completion of items." :prefix "pc-" :group 'minibuffer :group 'convenience) #@402 Control how the first character of a string is to be interpreted. If nil, the first character of a string is not taken literally if it is a word delimiter, so that ".e" matches "*.e*". If t, the first character of a string is always taken literally even if it is a word delimiter, so that ".e" matches ".e*". If non-nil and non-t, the first character is taken literally only for file name completion. (custom-declare-variable 'PC-first-char ''find-file '(#$ . 739) :type '(choice (const :tag "delimiter" nil) (const :tag "literal" t) (other :tag "find-file" find-file)) :group 'partial-completion) #@147 If non-nil, TAB means PC completion and M-TAB means normal completion. Otherwise, TAB means normal completion and M-TAB means Partial Completion. (custom-declare-variable 'PC-meta-flag 't '(#$ . 1344) :type 'boolean :group 'partial-completion) #@382 A string of characters treated as word delimiters for completion. Some arcane rules: If `]' is in this string, it must come first. If `^' is in this string, it must not come first. If `-' is in this string, it must come first or right after `]'. In other words, if S is this string, then `[S]' must be a valid Emacs regular expression (not containing character ranges like `a-z'). (custom-declare-variable 'PC-word-delimiters '"-_. " '(#$ . 1595) :type 'string :group 'partial-completion) #@136 A list of directories in which to look for include files. If nil, means use the colon-separated path in the variable $INCPATH instead. (custom-declare-variable 'PC-include-file-path ''("/usr/include" "/usr/local/include") '(#$ . 2091) :type '(repeat directory) :group 'partial-completion) #@63 If non-nil, include-file support in \[find-file] is disabled. (custom-declare-variable 'PC-disable-includes 'nil '(#$ . 2386) :type 'boolean :group 'partial-completion) #@69 If non-nil, default partial completion key bindings are suppressed. (defvar PC-default-bindings t (#$ . 2561)) #@54 A list of the environment variable names and values. (defvar PC-env-vars-alist nil (#$ . 2678)) (defalias 'PC-bindings #[(bind) " \f\2045 \306 \307\310#\210\306 \311\312#\210\306 \313\314#\210\306 \315\316#\210\306\n\317\320#\210\306\n\321\320#\210\306 \322\323#\202\216 \205\216 \306 \307\324#\210\306 \311\325#\210\306 \313\326#\210\306 \315\327#\210\306 \307\325#\210\306 \330\326#\210\306 \331\332#\210\306 \333\332#\210\306 \334\327#\210\306\n\317\335#\210\306\n\321\335#\210\306\n\331\335#\210\306\n\333\335#\210\306 \336\324#*\207" [minibuffer-local-completion-map minibuffer-local-must-match-map must-match-map completion-map bind read-expression-map define-key " " lisp-complete-symbol " " minibuffer-complete " " minibuffer-complete-word "?" minibuffer-completion-help " " minibuffer-complete-and-exit "\n" [remap lisp-complete-symbol] nil PC-lisp-complete-symbol PC-complete PC-complete-word PC-completion-help " " " " PC-force-complete-and-exit "\n" "?" PC-complete-and-exit [remap lisp-complete-symbol] global-map PC-default-bindings] 4]) #@47 Internal variable used by `PC-do-completion'. (defvar PC-do-completion-end nil (#$ . 3748)) (make-variable-buffer-local 'PC-do-completion-end) #@92 Internal variable set in `PC-do-completion', used in `choose-completion-string-functions'. (defvar PC-goto-end nil (#$ . 3897)) (make-variable-buffer-local 'PC-goto-end) #@290 Non-nil if Partial-Completion mode is enabled. See the command `partial-completion-mode' for a description of this minor mode. Setting this variable directly does not take effect; either customize it (see the info node `Easy Customization') or call the function `partial-completion-mode'. (custom-declare-variable 'partial-completion-mode 'nil '(#$ . 4074) :set 'custom-set-minor-mode :initialize 'custom-initialize-default :group 'partial-completion :type 'boolean) #@1275 Toggle Partial Completion mode. With prefix ARG, turn Partial Completion mode on if ARG is positive. When Partial Completion mode is enabled, TAB (or M-TAB if `PC-meta-flag' is nil) is enhanced so that if some string is divided into words and each word is delimited by a character in `PC-word-delimiters', partial words are completed as much as possible and `*' characters are treated likewise in file names. For example, M-x p-c-m expands to M-x partial-completion-mode since no other command begins with that sequence of characters, and \[find-file] f_b.c TAB might complete to foo_bar.c if that file existed and no other file in that directory begins with that sequence of characters. Unless `PC-disable-includes' is non-nil, the `<...>' sequence is interpreted specially in \[find-file]. For example, \[find-file] <sys/time.h> RET finds the file `/usr/include/sys/time.h'. See also the variable `PC-include-file-path'. Partial Completion mode extends the meaning of `completion-auto-help' (which see), so that if it is neither nil nor t, Emacs shows the `*Completions*' buffer only on the second attempt to complete. That is, if TAB finds nothing to complete, the first TAB just says "Next char not unique" and the second TAB brings up the `*Completions*' buffer. (defalias 'partial-completion-mode #[(&optional arg) "\306 \307=\203 \n?\202( \203 \310 !\311V\202( \n\204\" \312\202( \313\314\302\"\210\315\316\n!\210\n\2049 \317\320\321\"\210\202B \204B \322\320\321\"\210\n\203J \322\202K \317\323\324\"\210\n\203\\ \f\204\\ \325\326 \"\327\330\n\203f \331\202g \332\"\210\333 \203\213 \334\302!\210\306 \203~ \306 \232\203\213 \313\335\n\203\210 \336\202\211 \337\"\210)\340 \210\n\207" [#1=#:last-message arg partial-completion-mode PC-disable-includes PC-env-vars-alist process-environment current-message toggle prefix-numeric-value 0 t message "Toggling %s off; better pass an explicit argument." nil PC-bindings remove-hook find-file-not-found-functions PC-look-for-include-file add-hook choose-completion-string-functions #[(choice buffer mini-p base-size) "\204 \203 db\210\202 \n\203 \nb\210\303\303\211\207" [PC-goto-end mini-p PC-do-completion-end nil] 2] mapcar #[(string) "\302\303\"\304\305 OP \205 T\306O)B\207" [string d string-match "=" "$" 0 nil] 4] run-hooks partial-completion-mode-hook partial-completion-mode-on-hook partial-completion-mode-off-hook called-interactively-p customize-mark-as-set "Partial-Completion mode %sabled" "en" "dis" force-mode-line-update] 3 (#$ . 4549) (list (or current-prefix-arg 'toggle))]) (byte-code "\300\301\302\303\304!\205 \304J#\207" [add-minor-mode partial-completion-mode nil boundp partial-completion-mode-map] 5) #@520 Like minibuffer-complete, but allows "b--di"-style abbreviations. For example, "M-x b--di" would match `byte-recompile-directory', or any name which consists of three or more words, the first beginning with "b" and the third beginning with "di". The pattern "b--d" is ambiguous for `byte-recompile-directory' and `beginning-of-defun', so this would produce a list of completions just like when normal Emacs completions are ambiguous. Word-delimiters for the purposes of Partial Completion are "-", "_", ".", and SPC. (defalias 'PC-complete #[nil "\304 \203 \305 \207 =\204 \306\n\211\203? \307 !\203? \310\307 !!\203? r\307 !q\210\311d \"\2039 \312 e\306#\202; \313 )\202B \314\306!)\207" [last-command this-command minibuffer-scroll-window window PC-was-meta-key minibuffer-complete nil window-buffer buffer-name pos-visible-in-window-p set-window-start scroll-other-window PC-do-completion] 5 (#$ . 7265) nil]) #@169 Like `minibuffer-complete-word', but allows "b--di"-style abbreviations. See `PC-complete' for details. This can be bound to other keys, like `-' and `.', if you wish. (defalias 'PC-complete-word #[nil "\302 =\203 \303=\203 \304 \207\305\306!\207\305\306!\210m\205 \307\310!\207" [PC-meta-flag last-command-event PC-was-meta-key 32 minibuffer-complete-word self-insert-command 1 PC-do-completion word] 2 (#$ . 8192) nil]) #@180 Like `minibuffer-complete-word', but allows "b--di"-style abbreviations. See `PC-complete' for details. This is suitable for binding to other keys which should act just like SPC. (defalias 'PC-complete-space #[nil "\301 =\203\n \302 \207\303c\210m\205 \304\305!\207" [PC-meta-flag PC-was-meta-key minibuffer-complete-word " " PC-do-completion word] 2 (#$ . 8626) nil]) #@109 Like `minibuffer-complete-and-exit', but allows "b--di"-style abbreviations. See `PC-complete' for details. (defalias 'PC-complete-and-exit #[nil "\301 =\203\n \302 \207\303 \207" [PC-meta-flag PC-was-meta-key minibuffer-complete-and-exit PC-do-complete-and-exit] 2 (#$ . 9004) nil]) #@109 Like `minibuffer-complete-and-exit', but allows "b--di"-style abbreviations. See `PC-complete' for details. (defalias 'PC-force-complete-and-exit #[nil "\301\302 )\207" [minibuffer-completion-confirm nil PC-do-complete-and-exit] 1 (#$ . 9296) nil]) (defalias 'PC-do-complete-and-exit #[nil "d\306 U\203\n \307 \207\310=\203& \n=\204 \311\312 \f#\203\" \307 \207\313\314!\207\315=\203B >\203? \311\312 \f#\204? \313\314!\207\307 \207\316\317!\211 \205^ \320=\204V \204[ \307 \202^ \313\314!)\207" [minibuffer-completion-confirm last-command this-command minibuffer-completion-table minibuffer-completion-predicate minibuffer-confirm-exit-commands minibuffer-prompt-end exit-minibuffer confirm test-completion field-string PC-temp-minibuffer-message " [Confirm]" confirm-after-completion PC-do-completion exit complete flag] 5]) #@107 Like `minibuffer-completion-help', but allows "b--di"-style abbreviations. See `PC-complete' for details. (defalias 'PC-completion-help #[nil "\301 =\203\n \302 \207\303\304!\207" [PC-meta-flag PC-was-meta-key minibuffer-completion-help PC-do-completion help] 2 (#$ . 10143) nil]) (defalias 'PC-was-meta-key #[nil "\301 G\302U?\206! \301 \303H\211\250\203 \304Y\202 \305\306!>??)\207" [key this-command-keys 1 0 128 meta event-modifiers] 4]) (byte-code "\301B\302\301!\204 \303\301\304\"\210\305B\302\305!\204 \303\305\304\"\210\306B\302\306!\204- \303\306\307\"\210\310B\302\310!\204< \303\310\307\"\210\311B\302\311!\204K \303\311\307\"\210\312B\302\312!\204Z \303\312\307\"\210\313B\302\313!\204i \303\313\307\"\210\307\207" [current-load-list PC-ignored-extensions default-boundp set-default empty-cache PC-delims PC-ignored-regexp nil PC-word-failed-flag PC-delim-regex PC-ndelims-regex PC-delims-list] 3) #@210 A function testing whether a minibuffer completion now will work filename-style. The function takes no arguments, and typically looks at the value of `minibuffer-completion-table' and the minibuffer contents. (defvar PC-completion-as-file-name-predicate #[nil "\207" [minibuffer-completing-file-name] 1] (#$ . 11083)) (defalias 'PC-chunk-after #[(string regexp) "\305 \"\204 \306\302\n #\210\307\n #\210) \310\225\311O\305\f \"\203) \310\211\224O )\207" [regexp string message result PC-delim-regex string-match "String %s didn't match regexp %s" error 0 nil] 4]) #@57 Like `test-completion', but ignores case when possible. (defalias 'test-completion-ignore-case #[(str table pred) "\203\n \304 \n#\207\305\304 \n#)\207" [pred str table completion-ignore-case test-completion nil] 4 (#$ . 11662)]) #@55 Like `try-completion' but return STRING instead of t. (defalias 'PC-try-completion #[(string alist &optional predicate) "\304 \n#\211\305=\203 \202 )\207" [string alist predicate result try-completion t] 5 (#$ . 11902)]) #@305 Internal function to do the work of partial completion. Text to be completed lies between BEG and END. Normally when replacing text in the minibuffer, this function replaces up to point-max (as is appropriate for completing a file name). If GOTO-END is non-nil, however, it instead replaces up to END. (defalias 'PC-do-completion #[(&optional mode beg end goto-end) "\204 \306 \204 d\n\307=\203 \310\202 \n\f @ A\311\211 B C { DA\2055 \312\313D\" E\311\211 F G\311\211 H I\311\211 J K\311\211 L M\311\211 N OP QR\314=\203m \315D #\203m \316\202\271A\203\266 \317D!\206z \320\211G\203\266 GG\211C\203\266 \321G!\211K\203\266 GK\230\204\266 K\322D!P\211D\203\266 |\210Dc\210DG\\ST\232\204\327 ST\323T\324QU\325T\326QV\327T\311\"WA\203.\317D!\322D! ;\203\357 \330 !\202\361 X X Y\211 Z;\203\"\331Z!\204\"\332Z!Z\333U\334\322Z!#\335YQY\317Z!\211Z\202\370 DHZYPD+A\203\367\312\336D\"\203\367D ;\203H\330 !\202JX\311 [ X \\\312\337\\\"TK\312U\\K#\211K\203\200\\\340KO\341\\K\311OQ\\K\342\\K\202Y\343\\\341P!\211[\203\335\317[@![ K ZKA\211K\203\253Z\317K@!\232\204\227K\203\303\311\211A ;?\205\274 \344F\202\331 |\210Z\322D!P\211Dc\210DG\\*\202\366H\203\351HD\202\366\311\211A ;?\205\365 +A\203)E\203DE\311OGD\340EOB\202-\322D!G\317D!\211BGPD\202-DG\345G!\211JG\340V\203XG\340H\346=\204X]\344=\204T]\203XA\203X\347\202Y\340\211LK\312UJK#\211K\203\317JKH\350=\203\231J\340KOVUJKT\311ORJ\351KVGUG#K\202^JKH\352>\203\247\353\202\250\340 ^J\340K^\\OVJK^\\\311OQJ\351KVG\347#K)\202^\340KA\203\371\312\354JK#\211K\203\371J\340KO\355JK\342\\\311OQJ\202\327\356JPJGG\340V\203G\340H\357U\203\344I_\311\312UA\203$\360\202%\320PDBGL\\#\211K\204\260\361I\203@G\202BD #\211N\204\260D\320\230\204\260DH\344MA\203\243\312\362D\"\203\202\320G\311K\343\363\364\365\366\347D\"\335#\341Q!NS\202\260\312\367D\"\203\260\356\364\365\366\342D\"\370#PJ\366\347D\"GTK\202\260\356\364\371D\372#PJ\347KK\203]\361I\203\306\322D\340KO!\202\314D\340KO #\211 `K`\2030M\2030A\203\311K`\311 a\211 b\203b@a\312Ja\"\203aKBKbA\211b\204\361*\373\320K\"G\2020\364\365D\374#G |\210GG\\Gc\210)K\203]\312JK@\"\203T\375\340K@G\311K@$\210K@NBNKA\211K\2046\376N!\210A\203\306R\377=\204\306N cde\232\204\216\201w \364\345d\211e\201x #\201y Qf\311Kc\203\274\312fc@\"\204\263\312\201z c@\"\204\263c@KBKcA\211c\204\226K\203\305KN)N\204#R\201{ =\203\355g\204\355\344 g\201| \347!\210\201} \201{ !)\202\271M\203\372 |\210Hc\210\201~ \210\201 F\203 \201\200 \202 R\377=\203\201\201 \202 \201\202 !\210\311\202\271N\211OA\2045R\201\203 >\203pR\377=?\205?N\211K\203WK@G\230\204WKA\211K\204EK\203iR\204i\201 \201\204 !\210K\203R\204{hi=\204\344\202\271\311\211\211\356 j k l mR\377=\204\277\201\205 \201\206 Gj\"N\"\211l\203\277\344\311 n oR\201{ =\203\277\201\207 lG\"lBG\\b\210\340\211nlGW\203:` W\203\nlnH\227g\227=\204\370\201\210 \201\211 !\203\nlnHW>\203\n\201\212 \347!\210ln\211TOc\210\2021A\203\"\201\210 \201\213 !\203\"\201\212 \347!\210 S\344mln\211TOc\210 TnT\211n\202\312k\204B`k\201\210 U!\203\251j\345l!VQj\201\205 \201\206 BG\\ {j\"\201\214 \201\215 N\"\"\211l\203\251n\340V\204\205lG\340V\203\251R\201{ =\203\306o\203\251lG\340V\203\251\311ol\340\347O\211l\204\306R\201{ =\203\266 \202\274k\206\274b\210*R\201{ =\203\347g\204\347m\205l\315\201\216 S{ #\205l S |\202lm\203 R\314=\205l\201\217 \201\220 #\202lp\344=\204p\203ih=\204R\377=\203U\306 q\201\221 \220\201\222 \201\223 O\201\224 \"!\210 rstruq\210B\203GC\202KqZ\211v)\221\210)\202]\201 \201\225 !\210M\203kA\203k` |\210\311,\202\271GN@\232\203\230I\203\203A\204\230M\204\230R\204\270\201 \201\226 !\210\202\270 |\210\201\227 \201\230 A\203\262\321BN@P!\202\265N@\"c\210\344.\207" [beg end minibuffer-completion-table table minibuffer-completion-predicate pred minibuffer-prompt-end read-file-name-internal PC-read-file-name-internal nil string-match "<\\([^\"<>]*\\)>?$" exit test-completion complete file-name-directory "" substitute-in-file-name file-name-nondirectory "[" "]" "[^" "]*" append expand-file-name file-directory-p directory-file-name replace-regexp-in-string "*\\&" "*/" "\\*.*/" "/[^/]*\\'" 0 "*" 2 file-expand-wildcards t regexp-quote 42 1 32 + (36 94 46 42 43 63 91 93 92) -1 "\\\\\\*" "[^/]*" "\\`" 36 "\\|\\*" all-completions "^/?\\([A-Za-z0-9]+\\)$" "/" mapconcat list match-string "^\\(.+/\\)\\([A-Za-z0-9]+\\)$" "[A-Za-z0-9]*[^A-Za-z0-9]" #[(c) "\301\302!!\207" [c regexp-quote string] 3] "[^-]*-" try-completion "-" set-text-properties delete-dups help PC-completion-as-file-name-predicate filename dirname dirlength str incname ambig basestr origstr env-on regex p offset abbreviated poss helpposs completion-ignore-case case-fold-search mode PC-word-delimiters PC-delims PC-delim-regex PC-ndelims-regex PC-delims-list default-directory file dir files pat PC-first-char bump PC-env-vars-alist compl x #1=#:--cl-dolist-temp-- p2 completion-ignored-extensions PC-ignored-extensions PC-ignored-regexp PC-word-failed-flag this-command last-command skip pt prefix improved i first completion-auto-help prompt-end PC-do-completion-end goto-end PC-goto-end standard-output completion-base-size "\\(" "\\|" "\\)\\'" "\\(\\`\\|/\\)[.][.]?/?\\'" word delete-backward-char PC-do-completion beep PC-temp-minibuffer-message " [Ambiguous dir name]" " [No completions]" " [No match]" (help word) " [Complete, but not unique]" PC-try-completion PC-chunk-after PC-chop-word looking-at " " delete-char "\\*" mapcar #[(x) "\302 \"\205\f \303\225\304O\207" [skip x string-match 0 nil] 3] field-beginning test-completion-ignore-case field-string "*Completions*" display-completion-list sort string-lessp " [Next char not unique]" " [Sole completion]" format "%s"] 8 (#$ . 12136)]) (defalias 'PC-chop-word #[(new old) "\306\211\307\n T#\211\203 \307\n\fT#\211\204 \2035 \203- \307\n\fT#\211\2035 \f\310TO\2026 \f*\207" [j i PC-delim-regex old new PC-word-failed-flag -1 string-match 0] 4]) (byte-code "\301B\302\301!\204 \303\301\304\"\210\304\207" [current-load-list PC-not-minibuffer default-boundp set-default nil] 3) #@61 A Lisp version of `temp_minibuffer_message' from minibuf.c. (defalias 'PC-temp-minibuffer-message #[(message) "\203 \301\306 \"\210\307\310!\210\301\311!\207\312\313!\203 \313 !\207d\212\nb\210 c\210)\314\307\310!\210\nd|\210\f\2058 \315\316\211*\207" [PC-not-minibuffer message point-max inhibit-quit quit-flag unread-command-events "%s" sit-for 2 "" fboundp temp-minibuffer-message t nil (7)] 3 (#$ . 18655)]) #@54 Internal variable used by `PC-lisp-complete-symbol'. (defvar PC-lisp-complete-end nil (#$ . 19080)) #@374 Perform completion on Lisp symbol preceding point. That symbol is compared against the symbols that exist and any additional characters determined by what is there are inserted. If the symbol starts just after an open-parenthesis, only symbols with function definitions are considered. Otherwise, all symbols with function definitions, values or properties are considered. (defalias 'PC-lisp-complete-symbol #[nil "\212\306 p\307\216\310\n!\210\311\312!\210`,\212\306 p \313\216\310\n!\210\314\315!\210gz\316U\2030 \315u\210\202# `, Sf\317=\203E \320\202F \321 \322 \323\232\203] \324\325 \322$\202x \203k \325\223\210\202q \326 \322\" \324\325 \322$-\207" [#1=#:buffer #2=#:table lisp-mode-syntax-table end #3=#:buffer #4=#:table syntax-table ((byte-code "rq\210\302 !\210)\302\207" [#1# #2# set-syntax-table] 2)) set-syntax-table skip-syntax-forward "_w" ((byte-code "rq\210\302 !\210)\302\207" [#3# #4# set-syntax-table] 2)) backward-sexp 1 39 40 fboundp #[(sym) "\301!\206 \302!\206 \303!\207" [sym boundp fboundp symbol-plist] 2] t PC-lisp-complete-symbol PC-do-completion nil copy-marker beg obarray minibuffer-completion-table minibuffer-completion-predicate PC-not-minibuffer last-command PC-lisp-complete-end] 5 (#$ . 19187) nil]) #@100 Perform completion on file names preceding point. Environment vars are converted to their values. (defalias 'PC-complete-as-file-name #[nil "`\305\306e\307#\203 `\310\\\202 e\311\312\307 b\210\313\312 #-\207" [end beg minibuffer-completion-table minibuffer-completion-predicate PC-not-minibuffer re-search-backward "[^\\][ \n\"`'][^ \n\"`']" t 2 PC-read-file-name-internal nil PC-do-completion] 4 (#$ . 20467) nil]) (defalias 'PC-look-for-include-file #[nil "\306\307\310 \"\205\310 \311\224\311\225O\310 \312\224H\313\211\314p!\210 \315\232\203\200 r\316 @q\210\212\317 \210\320\321!\203B \311\224\311\225{\311\224Sf\202 \320\322!\204T \320\323!\204T \320\324!\203{ \311\224\311\225{\325\f\306\326 \"\203m \312\327O\202 \306\330 \"\204 \331P\202 \332\333!\210*\306\334 \"\204\213 \335P\n\325=\203\305 \206\227 \336 \211\203\256 \337\340 @! P!\204\256 A\211\204\234 \203\274 \340 @! P\202\301 \332\341 \"\210)\202\346 r\316 @q\210 ) (\337( P!\203\340 ( P\202\345 \332\342 \"\210)\343 !\211\203\364 q\210\202\344 !q\210\345 \210\346 \347\"\210,\347\207" [new-buf path punc name load-path default-directory string-match "[\"<]\\([^\"<>]*\\)[\">]?$" buffer-file-name 1 0 nil kill-buffer "" buffer-list beginning-of-line looking-at "[ ]*#[ ]*include[ ]+[<\"]\\(.+\\)[>\"][ ]*[\n/]" "[ ]*([ ]*load[ ]+\"\\([^\"]+\\)\"" "[ ]*([ ]*load-library[ ]+\"\\([^\"]+\\)\"" "[ ]*([ ]*require[ ]+'\\([^ )]+\\)[ )]" 60 "\\.elc$" -1 "\\.el$" ".el" error "Not on an #include line" "\\.[[:alnum:]]+$" ".h" PC-include-file-path file-exists-p file-name-as-directory "No such include file: <%s>" "No such include file: `%s'" get-file-buffer create-file-buffer erase-buffer insert-file-contents t dir] 5]) (defalias 'PC-include-file-path #[nil "\206/ \304\305!\306\211\211\204 \307\310!\210\311\312 \"\211\203- T\306O\nB \313 O\202 \n+\207" [PC-include-file-path pos path env getenv "INCPATH" nil error "No include file path specified" string-match ":[^:]+$" 0] 4]) #@207 Return all completions for FILE in any directory on SEARCH-PATH. If optional third argument FULL is non-nil, returned pathnames should be absolute rather than relative to some directory on the SEARCH-PATH. (defalias 'PC-include-file-all-completions #[(file search-path &optional full) "\306\307\"\310 !\203 \311 !\312\313 !\314 !\"\207\314 !\313 !\315\211 \203- \306\316\"\315\203W @ \203= \202> \f \317 !\203P \306\320\312 @\"\"\nBA*\202- \321\322\323\n\"\324\"\315 \211 \203\202 @@\232\204y @BA\211\204g -\207" [search-path file file-lists ndfile subdir dir mapcar #[(dir) "\203 \302!\207 \207" [dir default-directory file-name-as-directory] 2] file-name-absolute-p expand-file-name file-name-all-completions file-name-nondirectory file-name-directory nil #[(dir) " P\207" [dir subdir] 2] file-directory-p #[(file) " P\207" [subdir file] 2] sort apply nconc #[(x y) " \231?\207" [x y] 2] full compressed sorted] 6 (#$ . 22486)]) #@81 Extend `read-file-name-internal' to handle include files. This is only used by (defalias 'PC-read-file-name-internal #[(string pred action) "\306\307\"\203L \310\311\"\312\224\313O\314\315\316 \317 \"\"\211\204# \313\202J \f\320=\2031 \321\n \313#\202J \f\313=\203? \322\n \313#\202J \f\323=\205J \324\n \313#+\207\325 \f#\207" [string name str2 completion-table action pred string-match "<\\([^\"<>]*\\)>?\\'" match-string 1 0 nil mapcar #[(x) "\301\302\303\"\203\f \304\202 \305\"\207" [x format string-match "/\\'" "<%s" "<%s>"] 4] PC-include-file-all-completions PC-include-file-path lambda test-completion PC-try-completion t all-completions read-file-name-internal] 6 (#$ . 23465)]) (provide 'complete)
Close
