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 : vc-svn.elc
;ELC ;;; Compiled by mockbuild@c6b8.bsys.dev.centos.org on Thu Feb 19 13:05:28 2015 ;;; from file /builddir/build/BUILD/emacs-23.1/lisp/vc-svn.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 "`vc-svn.el' was compiled for Emacs 19.29 or later")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; #@29 Name of the SVN executable. (custom-declare-variable 'vc-svn-program '"svn" '(#$ . 603) :type 'string :group 'vc) #@45 Global switches to pass to any SVN command. (custom-declare-variable 'vc-svn-global-switches 'nil '(#$ . 723) :type '(choice (const :tag "None" nil) (string :tag "Argument String") (repeat :tag "Argument List" :value ("") string)) :version "22.1" :group 'vc) #@193 Switches for registering a file into SVN. A string or list of strings passed to the checkin program by \[vc-register]. If nil, use the value of `vc-register-switches'. If t, use no switches. (custom-declare-variable 'vc-svn-register-switches 'nil '(#$ . 989) :type '(choice (const :tag "Unspecified" nil) (const :tag "None" t) (string :tag "Argument String") (repeat :tag "Argument List" :value ("") string)) :version "22.1" :group 'vc) #@311 String or list of strings specifying extra switches for svn diff under VC. If nil, use the value of `vc-diff-switches' (or `diff-switches'), together with "-x --diff-cmd=diff" (since svn diff does not support the default "-c" value of `diff-switches'). If you want to force an empty list of arguments, use t. (custom-declare-variable 'vc-svn-diff-switches 't '(#$ . 1434) :type '(choice (const :tag "Unspecified" nil) (const :tag "None" t) (string :tag "Argument String") (repeat :tag "Argument List" :value ("") string)) :version "22.1" :group 'vc) #@56 Header keywords to be inserted by `vc-insert-headers'. (custom-declare-variable 'vc-svn-header '(or (cdr (assoc 'SVN vc-header-alist)) '("$Id$")) '(#$ . 1991) :version "22.1" :type '(repeat string) :group 'vc) #@56 The name of the ".svn" subdirectory or its equivalent. (defconst vc-svn-admin-directory (byte-code "\301>\203 \302\303!\203 \304\207\305\207" [system-type (cygwin windows-nt ms-dos) getenv "SVN_ASP_DOT_NET_HACK" "_svn" ".svn"] 2) (#$ . 2207)) (defalias 'vc-svn-revision-granularity #[nil "\300\207" [repository] 1]) (defalias 'vc-svn-checkout-model #[(files) "\300\207" [implicit] 1]) #@34 Check if FILE is SVN registered. (defalias 'vc-svn-registered #[(file) "\305\306\307P\310 !\"!\2056 \311\312!r\nq\210\313\216\314\310 !!\210\315\316\317\217\211\320=\2055 \321 !\211 \2054 \f\322>?),\207" [vc-svn-admin-directory file #1=#:temp-buffer status parsed file-readable-p expand-file-name "/entries" file-name-directory generate-new-buffer " *temp*" ((byte-code "\301!\203\n \302!\210\301\207" [#1# buffer-name kill-buffer] 2)) cd nil (byte-code "\301\302\211\303\304%\207" [file vc-svn-command t "status" "-v"] 6) ((error)) 0 vc-svn-parse-status (ignored unregistered)] 6 (#$ . 2601)]) #@37 SVN-specific version of `vc-state'. (defalias 'vc-svn-state #[(file &optional localp) "\206 \303 !\304\305!r\nq\210\306\216\307\310 !!\210\311\312\313 \314\203% \315\202& \316%\210\317 !+\207" [localp file #1=#:temp-buffer vc-stay-local-p generate-new-buffer " *temp*" ((byte-code "\301!\203\n \302!\210\301\207" [#1# buffer-name kill-buffer] 2)) cd file-name-directory vc-svn-command t 0 "status" "-v" "-u" vc-svn-parse-status] 6 (#$ . 3208)]) #@31 SVN-specific state heuristic. (defalias 'vc-svn-state-heuristic #[(file) "\301\302\"\207" [file vc-svn-state local] 3 (#$ . 3666)]) (defalias 'vc-svn-after-dir-status #[(callback &optional remote) "\306\203 \307\202\n \310\311eb\210\312\n\311\313#\203W \314\315!\316H \236A\314\317! \203C \314\320!\321\230\203C \322=\203= \323\202C \204C \324 \203S \f\325\230\204S \f D B*\202 !+\207" [remote result re state-map filename state ((65 . added) (67 . conflict) (73 . ignored) (77 . edited) (68 . removed) (82 . removed) (63 . unregistered) (126 . edited)) "^\\(.\\)..... \\([ *]\\) +\\(?:[-0-9]+\\)? \\(.*\\)$" "^\\(.\\)....\\(.\\) \\(.*\\)$" nil re-search-forward t match-string 1 0 3 2 "*" edited needs-merge needs-update "." callback] 4]) #@173 Run 'svn status' for DIR and update BUFFER via CALLBACK. CALLBACK is called as (CALLBACK RESULT BUFFER), where RESULT is a list of conses (FILE . STATE) for directory DIR. (defalias 'vc-svn-dir-status #[(dir callback) "\303\304\305p\306\303\307 \205 \310%\210\311\312\313\nD E!*\207" [local remote callback nil t vc-svn-command async "status" "-u" vc-exec-after vc-svn-after-dir-status quote] 6 (#$ . 4432)]) (defalias 'vc-svn-dir-status-files #[(dir files default-state callback) "\302\303p\304\305\306&\210\307\310\311 DD!\207" [files callback apply vc-svn-command async nil "status" vc-exec-after vc-svn-after-dir-status quote] 7]) #@62 Generate extra status headers for a Subversion working copy. (defalias 'vc-svn-dir-extra-headers #[(dir) "\301\302\303\304\305$\210\212\302q\210eb\210\306\307\304\310#\205 \311\312!)\211\203- \313\314\315\316#\313\315\317#P\202. \320\260)\207" [repo vc-svn-command "*vc*" 0 nil "info" re-search-forward "Repository Root: *\\(.*\\)" t match-string 1 propertize "Repository : " face font-lock-type-face font-lock-variable-name-face ""] 6 (#$ . 5078)]) #@48 SVN-specific version of `vc-working-revision'. (defalias 'vc-svn-working-revision #[(file) "\301!\210\302\303\"\207" [file vc-svn-registered vc-file-getprop vc-working-revision] 3 (#$ . 5538)]) (defalias 'vc-svn-previous-revision #[(file rev) "\302!S\303 W\205 \304 !)\207" [rev newrev string-to-number 0 number-to-string] 2]) (defalias 'vc-svn-next-revision #[(file rev) "\303!T\303\304\n\305\"! W?\205 \306 !)\207" [rev newrev file string-to-number vc-file-getprop vc-working-revision number-to-string] 4]) #@30 Create a new SVN repository. (defalias 'vc-svn-create-repo #[nil "\302\303\304\305\306$\210\302\303\304\307\310\311 \312Q&\207" [vc-svn-program default-directory vc-do-command "*vc*" 0 "svnadmin" ("create" "SVN") (".") "checkout" "file://" "SVN"] 9 (#$ . 6061)]) #@208 Register FILES into the SVN version-control system. The COMMENT argument is ignored This does an add but not a commit. Passes either `vc-svn-register-switches' or `vc-register-switches' to the SVN command. (defalias 'vc-svn-register #[(files &optional rev comment) "\301\302\303\304\305\306\307\310\"&\207" [files apply vc-svn-command nil 0 "add" vc-switches SVN register] 9 (#$ . 6333)]) #@58 Return non-nil if SVN thinks it is responsible for FILE. (defalias 'vc-svn-responsible-p #[(file) "\302\303\302 !\203 \202 \304 !\"!\207" [vc-svn-admin-directory file file-directory-p expand-file-name file-name-directory] 5 (#$ . 6731)]) (defalias 'vc-svn-could-register 'vc-svn-responsible-p "Return non-nil if FILE could be registered in SVN.\nThis is only possible if SVN is responsible for FILE's directory.") #@47 SVN-specific version of `vc-backend-checkin'. (defalias 'vc-svn-checkin #[(files rev comment) "\203 \304\305!\210\306\307\310\311 \312\313\nD\314\315\316\"\244&\317q\210eb\210 \320\232?\205H \321\322\310\323#\203; \324\325 \"\210\304\326\327!!\202H \330p!\210eb\210\331 \210\304\332!)\207" [rev files comment status error "Committing to a specific revision is unsupported in SVN" apply vc-svn-command nil 1 "ci" "-m" vc-switches SVN checkin "*vc*" 0 search-forward "Transaction is out of date" t mapc #[(file) "\301\302\303#\207" [file vc-file-setprop vc-state needs-merge] 4] substitute-command-keys "Up-to-date check failed: type \\[vc-next-action] to merge in changes" pop-to-buffer shrink-window-if-larger-than-buffer "Check-in failed"] 10 (#$ . 7155)]) #@62 SVN-specific retrieval of a specified version into a buffer. (defalias 'vc-svn-find-revision #[(file rev buffer) "\303\304\305 \306\n\205 \n\307\230?\205 \310\nP\311\312\313\"&\207" [buffer file rev apply vc-svn-command 0 "cat" "" "-r" vc-switches SVN checkout] 10 (#$ . 7924)]) (defalias 'vc-svn-checkout #[(file &optional editable rev) "\303\304\"\210r\305!\206 pq\210\306 \n\307\310\311\"$\210)\312!\210\303\313\"\207" [file editable rev message "Checking out %s..." get-file-buffer vc-svn-update vc-switches SVN checkout vc-mode-line "Checking out %s...done"] 7]) (defalias 'vc-svn-update #[(file editable rev switches) "\303!\205 ??\2056 \304\305\306#\210\307\310\306\311\312 \204 \313\2023 \314=\204, \315\232\2030 \306\2023 \316 P\n&\207" [file rev switches file-exists-p vc-file-setprop vc-working-revision nil apply vc-svn-command 0 "update" "-rBASE" t "" "-r"] 8]) (defalias 'vc-svn-delete-file #[(file) "\301\302\303\304$\207" [file vc-svn-command nil 0 "remove"] 5]) (defalias 'vc-svn-rename-file #[(old new) "\302\303\304\305\306 !%\207" [new old vc-svn-command nil 0 "move" file-relative-name] 7]) #@45 Revert FILE to the version it was based on. (defalias 'vc-svn-revert #[(file &optional contents-done) "?\205 \302\303\304 \305$\207" [contents-done file vc-svn-command nil 0 "revert"] 5 (#$ . 9063)]) #@108 Merge changes into current working copy of FILE. The changes are between FIRST-VERSION and SECOND-VERSION. (defalias 'vc-svn-merge #[(file first-version &optional second-version) "\303\304\305\306\307 \203 \n\310 Q\202 \n&\210\311\312\313#\210r\314\315!q\210eb\210\316\317!\203. \320\202/ \305)\207" [file second-version first-version vc-svn-command nil 0 "merge" "-r" ":" vc-file-setprop vc-state edited get-buffer "*vc*" looking-at "C " 1] 9 (#$ . 9272)]) #@40 Merge in any new changes made to FILE. (defalias 'vc-svn-merge-news #[(file) "\301\302\"\210\303\304\305#\210\306\307\305\310$\210r\311\312!q\210eb\210\313\314\307\315#\203. \303\316\317\320!#\210\2024 \303\316\307#\210eb\210\321\322!\203A \305\202\216 \313\323\324\325!!P\307\315#\203\207 \317\320!\326\230\203k \303\327\330#\210\303\304\331\332!8#\210\305\202\216 \317\320!\333\230\203} \303\327\334#\210\305\202\216 \303\327\334#\210\335\202\216 \336\312!\210\337\340!\301\341\"\210)\207" [file message "Merging changes into %s..." vc-file-setprop vc-checkout-time 0 vc-svn-command nil "update" get-buffer "*vc*" re-search-forward "^\\(Updated to\\|At\\) revision \\([0-9]+\\)" t vc-working-revision match-string 2 looking-at "At revision" "^\\(\\([ACGDU]\\)\\(.[B ]\\)? \\)" regexp-quote file-name-nondirectory "U" vc-state up-to-date 5 file-attributes "G" edited 1 pop-to-buffer error "Couldn't analyze svn update result" "Merging changes into %s...done"] 6 (#$ . 9742)]) #@281 Modify the change comments for a specified REV. You must have ssh access to the repository host, and the directory Emacs uses locally for temp files must also be writable by you on that host. This is only supported if the repository access method is either file:// or svn+ssh://. (defalias 'vc-svn-modify-change-comment #[(files rev comment) "\306\211\211\211\211 \307\310! r q\210\311\216\312p\313,\306\314%\210eb\210\315\316\306\317#\204, \320\321!\210\322\323!\203; \317\322\324!\202H \322\325!\322\326! \327\fQ+\330-!\211\331\332\333!! . /\334\216r.q\2100c\210)r.q\210\335\306\211/\306\313%\210,\203\225 \312\336\313\337\306\340\341 \3421\343\344\f\"&\n\204\217 \320\345!\210\346\f!\202\277 \312\336\313\347\306\350\f\n&\204\247 \320\351\n\"\210\312\336\313\352\306\350 \343\353 1\f\211%&?\205\277 \320\345!-\207" [fileurl-p directory remotefile host tempfile #1=#:temp-buffer nil generate-new-buffer " *temp*" ((byte-code "\301!\203\n \302!\210\301\207" [#1# buffer-name kill-buffer] 2)) vc-do-command 0 "info" re-search-forward "Repository Root: \\(file://\\(/.*\\)\\)\\|\\(svn\\+ssh://\\([^/]+\\)\\(/.*\\)\\)" t error "Repository information is unavailable" match-string 1 2 4 5 ":" make-temp-file get-buffer-create generate-new-buffer-name " *temp file*" ((byte-code "\301!\203\n \302!\210\301\207" [#2=#:temp-buffer buffer-name kill-buffer] 2)) write-region "*vc*" "svnadmin" "setlog" "--bypass-hooks" "-r" format "%s" "Log edit failed" delete-file "scp" "-q" "Copy of comment to %s failed" "ssh" "svnadmin setlog --bypass-hooks %s -r %s %s; rm %s" vc-svn-program user-mail-address #2# #3=#:temp-file comment rev] 13 (#$ . 10739)]) (byte-code "\302\303N\204\f \304\302\303\305#\210\306\307!\204 \304\307\310\311#\210\307B\312\307!\204( \313\307\314 \"\210\306\315!\2044 \304\315\310\311#\210\315B\312\315!\204D \313\315\316 \"\210\304\301\310\311#\210\301B\312\301!\204^ \313\301\317\301\320\"\210 \"\210\304\311\321\322#\207" [current-load-list vc-svn-log-view-mode-abbrev-table vc-svn-log-view-mode-hook variable-documentation put "Hook run when entering SVN-Log-View mode.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it. (This is true for all hook variables.)" boundp vc-svn-log-view-mode-map definition-name vc-svn-log-view-mode default-boundp set-default make-sparse-keymap vc-svn-log-view-mode-syntax-table make-syntax-table define-abbrev-table nil derived-mode-parent log-view-mode] 5) #@519 Major mode derived from `log-view-mode' by `define-derived-mode'. It inherits all of the parent's attributes, but has its own keymap, abbrev table and syntax table: `vc-svn-log-view-mode-map', `vc-svn-log-view-mode-abbrev-table' and `vc-svn-log-view-mode-syntax-table' which more-or-less shadow log-view-mode's corresponding tables. In addition to any hooks its parent mode might have run, this mode runs the hook `vc-svn-log-view-mode-hook', as the final step during initialization. \{vc-svn-log-view-mode-map} (defalias 'vc-svn-log-view-mode #[nil "\306\300!\210\307\310 \210\311\312\310\313N\203 \314\311\313\310\313N#\210\315 !\204' \316 \317 \"\210\320\f!\211 \2036 \321 =\203< \322\f\323 \"\210)\324 !\210\325\f!\210 \326\327!\210\306\330!\210\331)\332\333!\207" [delay-mode-hooks major-mode mode-name vc-svn-log-view-mode-map vc-svn-log-view-mode-syntax-table parent make-local-variable t log-view-mode vc-svn-log-view-mode "SVN-Log-View" mode-class put keymap-parent set-keymap-parent current-local-map char-table-parent standard-syntax-table set-char-table-parent syntax-table use-local-map set-syntax-table require add-log log-view-per-file-logs nil run-mode-hooks vc-svn-log-view-mode-hook vc-svn-log-view-mode-abbrev-table local-abbrev-table] 6 (#$ . 13220) nil]) #@42 Get change log(s) associated with FILES. (defalias 'vc-svn-print-log #[(files &optional buffer) "r\305!\210\306eb\210\n\2034 \n\307\211 \203/ \f@\310 \311\261\210\312\313 C\314\315%\210\fA\211\204 *\307\202; \312\316\307\314\315%*\207" [buffer inhibit-read-only files file #1=#:--cl-dolist-temp-- vc-setup-buffer t nil "Working file: " "\n" vc-svn-command async "log" "-rHEAD:0" 0] 7 (#$ . 14518)]) #@75 Get a difference report using SVN between two revisions of fileset FILES. (defalias 'vc-svn-diff #[(files &optional oldvers newvers buffer) "\203 \204 \n\203 \306\307\215\203 \310 \203 \311\312\313\"\202* \314\315\316\317\311\310\313\"\320#E ?\205; \321\n!\205; \206; \322\323 \203J \324\202K \325\n\326\327\f\205a \330 \203_ \331 Q\202` D\"&\210\203n \332\202t \333\334 !!*\207" [oldvers newvers files vc-svn-diff-switches switches vc-disable-async-diff no (byte-code "\304\211\203 \n@ \305 !\232\204 \306\307\304\"\210\nA\211\204 *\310\207" [files f #1=#:--cl-dolist-temp-- oldvers nil vc-working-revision throw no t] 4) nil vc-switches SVN diff "--diff-cmd=diff" "-x" mapconcat identity " " vc-stay-local-p apply vc-svn-command async 0 "diff" append "-r" ":" 1 buffer-size get-buffer buffer] 12 (#$ . 14932)]) #@201 Assign to DIR's current revision a given NAME. If BRANCHP is non-nil, the name is created as a branch (and the current workspace is immediately moved to that new branch). NAME is assumed to be a URL. (defalias 'vc-svn-create-tag #[(dir name branchp) "\303\304\305\306 %\210\n\205 \307 \304#\207" [dir name branchp vc-svn-command nil 0 "copy" vc-svn-retrieve-tag] 6 (#$ . 15783)]) #@193 Retrieve a tag at and below DIR. NAME is the name of the tag; if it is empty, do a `svn update'. If UPDATE is non-nil, then update (resynch) any affected buffers. NAME is assumed to be a URL. (defalias 'vc-svn-retrieve-tag #[(dir name update) "\302\303\304\305 %\207" [dir name vc-svn-command nil 0 "switch"] 6 (#$ . 16173)]) #@50 Check if the current file has any headers in it. (defalias 'vc-svn-check-headers #[nil "\212eb\210\300\301\302\303#)\207" [re-search-forward "\\$[A-Za-z\300-\326\330-\366\370-\377]+\\(: [ -#%-~\240-\377]*\\)?\\$" nil t] 4 (#$ . 16506)]) #@196 A wrapper around `vc-do-command' for use in vc-svn.el. The difference to vc-do-command is that this function always invokes `svn', and that it passes `vc-svn-global-switches' to it before FLAGS. (defalias 'vc-svn-command #[(buffer okstatus file-or-list &rest flags) "\306\307\206 \310 \n \f;\203 \f B\202 \311\f \"&\207" [buffer okstatus vc-svn-program file-or-list vc-svn-global-switches flags apply vc-do-command "*vc*" append] 9 (#$ . 16751)]) (defalias 'vc-svn-repository-hostname #[(dirname) "\306\307!rq\210\310\216 \206 \n\311\312\f\313P \"!\210)eb\210\314\315\316\317#\205( \320\321!+\207" [#1=#:temp-buffer file-name-coding-system default-file-name-coding-system coding-system-for-read vc-svn-admin-directory dirname generate-new-buffer " *temp*" ((byte-code "\301!\203\n \302!\210\301\207" [#1# buffer-name kill-buffer] 2)) vc-insert-file expand-file-name "/entries" re-search-forward "name=\"\\(?:svn:this_dir\\)?\"[\n ]*\\(?:[-a-z]+=\"[^\"]*\"[\n ]*\\)*?url=\"\\(?1:[^\"]+\\)\"\\|^\ndir\n[0-9]+\n\\(?1:.*\\)" nil t match-string 1] 4]) #@64 Call "svn resolved" if the conflict markers have been removed. (defalias 'vc-svn-resolve-when-done #[nil "\212eb\210\301\302\303\304#?\205 \305\303\306\307$\210\310\311\312\304#)\207" [buffer-file-name re-search-forward "^<<<<<<< " nil t vc-svn-command 0 "resolved" remove-hook after-save-hook vc-svn-resolve-when-done] 5 (#$ . 17817)]) (defalias 'vc-svn-find-file-hook #[nil "\301\302\"\303=\205# \212eb\210\304\305\306\307#)\203 \310 \210\311\312\313\306\307$\210\314\315!\207" [buffer-file-name vc-file-getprop vc-svn-status 67 re-search-forward "^<<<<<<< " nil t smerge-start-session add-hook after-save-hook vc-svn-resolve-when-done message "There are unresolved conflicts in this file"] 5]) #@184 Parse output of "svn status" command in the current buffer. Set file properties accordingly. Unless FILENAME is non-nil, parse only information about FILENAME and return its status. (defalias 'vc-svn-parse-status #[(&optional filename) "\303\211eb\210\304\305\303\306#\203\272 \n\206 \307`\310 {!\311 f\211\312=\203- \313 \314\315#\210\202 \313 \316\317\320!#\210\313 \321#\210\313 \314\322=\203^ \323\224f\324=\203P \325\202\265 \313 \326\327\330 !8#\210\331\202\265 \332=\203t \313 \316\333#\210\313 \326\334#\210\335\202\265 \336=\203\202 \313 \314\337#\202\265 \340=\203\230 \323\224f\324=\203\224 \341\202\265 \342\202\265 \343=\203\246 \313 \314\344#\202\265 \345>\203\264 \313 \314\346#\202\265 \342#\210\202 \n\205\302 \347\n\314\"*\207" [status file filename nil re-search-forward "^\\(?:\\?\\|[ ACDGIMR!~][ MC][ L][ +][ S]..\\([ *]\\) +\\([-0-9]+\\) +\\([0-9?]+\\) +\\([^ ]+\\)\\) +" t expand-file-name line-end-position line-beginning-position 63 vc-file-setprop vc-state unregistered vc-working-revision match-string 3 vc-svn-status 32 1 42 needs-update vc-checkout-time 5 file-attributes up-to-date 65 "0" 0 added 67 conflict 77 needs-merge edited 73 ignored (68 82) removed vc-file-getprop] 10 (#$ . 18525)]) #@53 Return non-nil if TAG is a valid symbolic tag name. (defalias 'vc-svn-valid-symbolic-tag-name-p #[(tag) "\301\302\"\205\f \301\303\"?\207" [tag string-match "^[a-zA-Z]" "[^a-z0-9A-Z-_]"] 3 (#$ . 19769)]) #@51 Return non-nil if TAG is a valid revision number. (defalias 'vc-svn-valid-revision-number-p #[(tag) "\301\302\"\205\f \301\303\"?\207" [tag string-match "^[0-9]" "[^0-9]"] 3 (#$ . 19981)]) (defalias 'vc-svn-annotate-command #[(file buf &optional rev) "\303\304 \305\n\205\f \306\nP%\207" [buf file rev vc-svn-command 0 "annotate" "-r"] 7]) (defalias 'vc-svn-annotate-time-of-rev #[(rev) "\301!\302\245\207" [rev string-to-number 10.0] 2]) (defalias 'vc-svn-annotate-current-time #[nil "\301!\207" [vc-annotate-parent-rev vc-svn-annotate-time-of-rev] 2]) (byte-code "\301B\302\303!\207" [current-load-list vc-svn-annotate-re (lambda (#1=#:defconst-tmp-var) (defconst vc-svn-annotate-re #1#)) "[ ]*\\([0-9]+\\)[ ]+[^ ]+ "] 2) (defalias 'vc-svn-annotate-time #[nil "\301!\205 \302\225b\210\303\304\305!!\207" [vc-svn-annotate-re looking-at 0 vc-svn-annotate-time-of-rev match-string 1] 3]) (defalias 'vc-svn-annotate-extract-revision-at-line #[nil "\212\301 \210\302!\205 \303\304!)\207" [vc-svn-annotate-re beginning-of-line looking-at match-string 1] 2]) (provide 'vc-svn)
Close
