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 : ediff-init.elc
;ELC ;;; Compiled by mockbuild@c6b8.bsys.dev.centos.org on Thu Feb 19 13:02:50 2015 ;;; from file /builddir/build/BUILD/emacs-23.1/lisp/ediff-init.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 "`ediff-init.el' was compiled for Emacs 19.29 or later")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; #@182 If t, Ediff will think that it is running on a display that supports faces. This is provided as a temporary relief for users of face-capable displays that Ediff doesn't know about. (defvar ediff-force-faces nil (#$ . 612)) (defalias 'ediff-device-type #[nil "\207" [window-system] 1]) (put 'ediff-device-type 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-window-display-p #[nil "\205 \301>?\207" [window-system (tty pc stream)] 2]) (defalias 'ediff-has-face-support-p #[nil "\302 \206 \206 \303 \206 \304>\207" [ediff-force-faces window-system ediff-window-display-p ediff-color-display-p (pc)] 2]) (defalias 'ediff-has-toolbar-support-p #[nil "\300\207" [nil] 1]) (defalias 'ediff-has-gutter-support-p #[nil "\300\207" [nil] 1]) (defalias 'ediff-use-toolbar-p #[nil "\301 \205\f \302\300!\205\f \207" [ediff-use-toolbar-p ediff-has-toolbar-support-p boundp] 2])(if macro-declaration-function (funcall macro-declaration-function (quote ediff-defvar-local) (quote (declare (indent defun))))) #@34 Defines VAR as a local variable. (defalias 'ediff-defvar-local '(macro . #[(var value doc) "\303\304 \nF\305\306DD\307\306D\310BBF\207" [var value doc progn defvar make-variable-buffer-local quote put ('permanent-local t)] 6 (#$ . 1635)])) #@2 (defvar ediff-buffer-A nil (#$ . 1883)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-buffer-A put permanent-local t] 4) #@2 (defvar ediff-buffer-B nil (#$ . 2046)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-buffer-B put permanent-local t] 4) #@2 (defvar ediff-buffer-C nil (#$ . 2209)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-buffer-C put permanent-local t] 4) #@2 (defvar ediff-ancestor-buffer nil (#$ . 2372)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-ancestor-buffer put permanent-local t] 4) #@2 (defvar ediff-control-buffer nil (#$ . 2549)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-control-buffer put permanent-local t] 4) #@98 If t, the buffer is a temporary indirect buffer. It needs to be killed when we quit the session. (defvar ediff-temp-indirect-buffer nil (#$ . 2725)) (byte-code "\301\302!\210\303\302\304\305#\210\306B\307\310!\207" [current-load-list make-variable-buffer-local ediff-temp-indirect-buffer put permanent-local t ediff-buffer-alist (lambda (#1=#:defconst-tmp-var) (defconst ediff-buffer-alist #1#)) ((65 . ediff-buffer-A) (66 . ediff-buffer-B) (67 . ediff-buffer-C))] 4) (defalias 'ediff-odd-p '(macro . #[(arg) "\301\302\303BB\304BB\207" [arg eq logand (1) (1)] 4])) (defalias 'ediff-buffer-live-p '(macro . #[(buf) "\301\302D\303\302DDF\207" [buf and get-buffer buffer-name] 6])) (defalias 'ediff-get-buffer '(macro . #[(arg) "\301\302\303BB\304B\302\305BB\306B\302\307BB\310B\302\311BB\312B\257\207" [arg cond eq ('A) (ediff-buffer-A) ('B) (ediff-buffer-B) ('C) (ediff-buffer-C) ('Ancestor) (ediff-ancestor-buffer)] 7])) (defalias 'ediff-get-value-according-to-buffer-type '(macro . #[(buf-type list) "\302\303\304BB\305\306 ED\303\307BB\305\310 ED\303\311BB\305\312 EDF\207" [buf-type list cond eq ('A) nth 0 ('B) 1 ('C) 2] 7])) (defalias 'ediff-char-to-buftype '(macro . #[(arg) "\301\302\303BB\304B\302\305BB\306B\302\307BB\310BF\207" [arg cond memq ('(97 65)) ('A) ('(98 66)) ('B) ('(99 67)) ('C)] 6])) (defalias 'ediff-get-symbol-from-alist #[(buf-type alist) "\302 \"A\207" [buf-type alist assoc] 3]) (byte-code "\301\302\303\304#\210\305B\306\307!\207" [current-load-list put ediff-get-symbol-from-alist byte-optimizer byte-compile-inline-expand ediff-difference-vector-alist (lambda (#1=#:defconst-tmp-var) (defconst ediff-difference-vector-alist #1#)) ((A . ediff-difference-vector-A) (B . ediff-difference-vector-B) (C . ediff-difference-vector-C) (Ancestor . ediff-difference-vector-Ancestor))] 4) (defalias 'ediff-get-difference '(macro . #[(n buf-type) "\302\303\304\305BBD E\207" [buf-type n aref symbol-value ediff-get-symbol-from-alist (ediff-difference-vector-alist)] 5])) (defalias 'ediff-no-fine-diffs-p '(macro . #[(n) "\301\302\303BB\304BB\207" [n aref ediff-get-difference ('A) (2)] 4])) (defalias 'ediff-get-diff-overlay-from-diff-record '(macro . #[(diff-rec) "\301\302BB\207" [diff-rec aref (0)] 3])) (defalias 'ediff-get-diff-overlay '(macro . #[(n buf-type) "\302\303 ED\207" [n buf-type ediff-get-diff-overlay-from-diff-record ediff-get-difference] 4])) (defalias 'ediff-get-fine-diff-vector-from-diff-record '(macro . #[(diff-rec) "\301\302BB\207" [diff-rec aref (1)] 3])) (defalias 'ediff-set-fine-diff-vector '(macro . #[(n buf-type fine-vec) "\303\304 E\305\nF\207" [n buf-type fine-vec aset ediff-get-difference 1] 4])) (defalias 'ediff-get-state-of-diff '(macro . #[(n buf-type) "\302\303\304\305 E\306BBE\207" [n buf-type if (ediff-buffer-live-p ediff-buffer-C) aref ediff-get-difference (3)] 6])) (defalias 'ediff-set-state-of-diff '(macro . #[(n buf-type val) "\303\304 E\305\nF\207" [n buf-type val aset ediff-get-difference 3] 4])) (defalias 'ediff-get-state-of-merge '(macro . #[(n) "\301\302\303\211\302E\304BBE\207" [n if ediff-state-of-merge aref (0)] 6])) (defalias 'ediff-set-state-of-merge '(macro . #[(n val) "\302\303\304\305\303E\306 FE\207" [n val if ediff-state-of-merge aset aref 0] 6])) (defalias 'ediff-get-state-of-ancestor '(macro . #[(n) "\301\302\303\211\302E\304BBE\207" [n if ediff-state-of-merge aref (1)] 6])) (defalias 'ediff-mark-diff-as-space-only '(macro . #[(n flag) "\302\303\304BB\305 F\207" [n flag aset ediff-get-difference ('A) 2] 4])) (defalias 'ediff-get-fine-diff-vector '(macro . #[(n buf-type) "\302\303 ED\207" [n buf-type ediff-get-fine-diff-vector-from-diff-record ediff-get-difference] 4]))(if macro-declaration-function (funcall macro-declaration-function (quote ediff-with-current-buffer) (quote (declare (indent 1) (debug (form body)))))) #@27 Evaluates BODY in BUFFER. (defalias 'ediff-with-current-buffer '(macro . #[(buffer &rest body) "\302\303D\304\305D BB\306BBB\207" [buffer body if ediff-buffer-live-p save-current-buffer set-buffer ((or (eq this-command 'ediff-quit) (error ediff-KILLED-VITAL-BUFFER)))] 5 (#$ . 6587)])) (defalias 'ediff-multiframe-setup-p #[nil "\301 \205 \207" [ediff-multiframe ediff-window-display-p] 1]) (put 'ediff-multiframe-setup-p 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-narrow-control-frame-p '(macro . #[nil "\300\207" [(and (ediff-multiframe-setup-p) (equal ediff-help-message ediff-brief-message-string))] 1])) (defalias 'ediff-3way-comparison-job '(macro . #[nil "\300\207" [(memq ediff-job-name '(ediff-files3 ediff-buffers3))] 1])) #@2 (defvar ediff-3way-comparison-job nil (#$ . 7348)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-3way-comparison-job put permanent-local t] 4) (defalias 'ediff-merge-job '(macro . #[nil "\300\207" [(memq ediff-job-name '(ediff-merge-files ediff-merge-buffers ediff-merge-files-with-ancestor ediff-merge-buffers-with-ancestor ediff-merge-revisions ediff-merge-revisions-with-ancestor))] 1])) #@2 (defvar ediff-merge-job nil (#$ . 7781)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-merge-job put permanent-local t] 4) (defalias 'ediff-patch-job '(macro . #[nil "\300\207" [(eq ediff-job-name 'epatch)] 1])) (defalias 'ediff-merge-with-ancestor-job '(macro . #[nil "\300\207" [(memq ediff-job-name '(ediff-merge-files-with-ancestor ediff-merge-buffers-with-ancestor ediff-merge-revisions-with-ancestor))] 1])) #@2 (defvar ediff-merge-with-ancestor-job nil (#$ . 8237)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-merge-with-ancestor-job put permanent-local t] 4) (defalias 'ediff-3way-job '(macro . #[nil "\300\207" [(or ediff-3way-comparison-job ediff-merge-job)] 1])) #@2 (defvar ediff-3way-job nil (#$ . 8537)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-3way-job put permanent-local t] 4) (defalias 'ediff-diff3-job '(macro . #[nil "\300\207" [(or ediff-3way-comparison-job ediff-merge-with-ancestor-job)] 1])) #@2 (defvar ediff-diff3-job nil (#$ . 8822)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-diff3-job put permanent-local t] 4) (defalias 'ediff-windows-job '(macro . #[nil "\300\207" [(memq ediff-job-name '(ediff-windows-wordwise ediff-windows-linewise))] 1])) #@2 (defvar ediff-windows-job nil (#$ . 9121)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-windows-job put permanent-local t] 4) (defalias 'ediff-word-mode-job '(macro . #[nil "\300\207" [(memq ediff-job-name '(ediff-windows-wordwise ediff-regions-wordwise))] 1])) #@2 (defvar ediff-word-mode-job nil (#$ . 9426)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-word-mode-job put permanent-local t] 4) (defalias 'ediff-narrow-job '(macro . #[nil "\300\207" [(memq ediff-job-name '(ediff-windows-wordwise ediff-regions-wordwise ediff-windows-linewise ediff-regions-linewise))] 1])) #@2 (defvar ediff-narrow-job nil (#$ . 9778)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-narrow-job put permanent-local t] 4) (defalias 'ediff-ancestor-metajob #[(&optional metajob) "\206 \302>\207" [metajob ediff-metajob-name (ediff-merge-directories-with-ancestor ediff-merge-filegroups-with-ancestor)] 2]) (put 'ediff-ancestor-metajob 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-revision-metajob #[(&optional metajob) "\206 \302>\207" [metajob ediff-metajob-name (ediff-directory-revisions ediff-merge-directory-revisions ediff-merge-directory-revisions-with-ancestor)] 2]) (put 'ediff-revision-metajob 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-patch-metajob #[(&optional metajob) "\206 \302>\207" [metajob ediff-metajob-name (ediff-multifile-patch)] 2]) (put 'ediff-patch-metajob 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-one-filegroup-metajob #[(&optional metajob) "\211\206 \302>)\206 \211\206 \303>)\207" [metajob ediff-metajob-name (ediff-directory-revisions ediff-merge-directory-revisions ediff-merge-directory-revisions-with-ancestor) (ediff-multifile-patch)] 3]) (put 'ediff-one-filegroup-metajob 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-collect-diffs-metajob #[(&optional metajob) "\206 \302>\207" [metajob ediff-metajob-name (ediff-directories ediff-merge-directories ediff-merge-directories-with-ancestor ediff-directory-revisions ediff-merge-directory-revisions ediff-merge-directory-revisions-with-ancestor)] 2]) (put 'ediff-collect-diffs-metajob 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-merge-metajob #[(&optional metajob) "\206 \302>\207" [metajob ediff-metajob-name (ediff-merge-directories ediff-merge-directories-with-ancestor ediff-merge-directory-revisions ediff-merge-directory-revisions-with-ancestor ediff-merge-filegroups-with-ancestor)] 2]) (put 'ediff-merge-metajob 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-metajob3 #[(&optional metajob) "\206 \302>\207" [metajob ediff-metajob-name (ediff-merge-directories-with-ancestor ediff-merge-filegroups-with-ancestor ediff-directories3 ediff-filegroups3)] 2]) (put 'ediff-metajob3 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-comparison-metajob3 #[(&optional metajob) "\206 \302>\207" [metajob ediff-metajob-name (ediff-directories3 ediff-filegroups3)] 2]) (put 'ediff-comparison-metajob3 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-in-control-buffer-p #[(&optional meta-buf-p) "\303\302!\205 \203 \202 \np=\207" [meta-buf-p ediff-meta-buffer ediff-control-buffer boundp] 2]) (defalias 'ediff-barf-if-not-control-buffer #[(&optional meta-buf-p) "\302!\206\n \303\304 \"\207" [meta-buf-p this-command ediff-in-control-buffer-p error "%S: This command runs in Ediff Control Buffer only!"] 3]) (byte-code "\300\301\302\303#\210\304\305\306\307\310\311\312\313&\210\304\314\306\315\310\311\312\313&\210\304\316\306\317\310\311\312\313&\207" [put ediff-barf-if-not-control-buffer byte-optimizer byte-compile-inline-expand custom-declare-group ediff-highlighting nil "Hilighting of difference regions in Ediff." :prefix "ediff-" :group ediff ediff-merge "Merging utilities." ediff-hook "Hooks run by Ediff."] 8) #@177 Hooks to run before Ediff begins to set up windows and buffers. This hook can be used to save the previous window config, which can be restored on ediff-quit or ediff-suspend. (custom-declare-variable 'ediff-before-setup-hook 'nil '(#$ . 13094) :type 'hook :group 'ediff-hook) #@201 Hooks to run before Ediff sets its window configuration. This hook is run every time when Ediff arranges its windows. This happens each time Ediff detects that the windows were messed up by the user. (custom-declare-variable 'ediff-before-setup-windows-hook 'nil '(#$ . 13378) :type 'hook :group 'ediff-hook) #@127 Hooks to run after Ediff sets its window configuration. This can be used to set up control window or icon in a desired place. (custom-declare-variable 'ediff-after-setup-windows-hook 'nil '(#$ . 13694) :type 'hook :group 'ediff-hook) #@156 Hooks run before setting up the frame to display Ediff Control Panel. Can be used to change control frame parameters to position it where it is desirable. (custom-declare-variable 'ediff-before-setup-control-frame-hook 'nil '(#$ . 13935) :type 'hook :group 'ediff-hook) #@121 Hooks run after setting up the frame to display Ediff Control Panel. Can be used to move the frame where it is desired. (custom-declare-variable 'ediff-after-setup-control-frame-hook 'nil '(#$ . 14212) :type 'hook :group 'ediff-hook) #@90 Hooks to run in the control buffer after Ediff has been set up and is ready for the job. (custom-declare-variable 'ediff-startup-hook 'nil '(#$ . 14452) :type 'hook :group 'ediff-hook) #@52 Hooks to run after a difference has been selected. (custom-declare-variable 'ediff-select-hook 'nil '(#$ . 14643) :type 'hook :group 'ediff-hook) #@54 Hooks to run after a difference has been unselected. (custom-declare-variable 'ediff-unselect-hook 'nil '(#$ . 14795) :type 'hook :group 'ediff-hook) #@115 Hooks run after buffers A, B, and C are set up. For each buffer, the hooks are run with that buffer made current. (custom-declare-variable 'ediff-prepare-buffer-hook 'nil '(#$ . 14952) :type 'hook :group 'ediff-hook) #@66 Hook run after Ediff is loaded. Can be used to change defaults. (custom-declare-variable 'ediff-load-hook 'nil '(#$ . 15175) :type 'hook :group 'ediff-hook) #@202 Hook run just after ediff-mode is set up in the control buffer. This is done before any windows or frames are created. One can use it to set local variables that determine how the display looks like. (custom-declare-variable 'ediff-mode-hook 'nil '(#$ . 15340) :type 'hook :group 'ediff-hook) #@70 Hook run just after the default bindings in Ediff keymap are set up. (custom-declare-variable 'ediff-keymap-setup-hook 'nil '(#$ . 15640) :type 'hook :group 'ediff-hook) #@45 Hooks run after preparing the help message. (custom-declare-variable 'ediff-display-help-hook 'nil '(#$ . 15816) :type 'hook :group 'ediff-hook) #@67 Hooks to run in the Ediff control buffer when Ediff is suspended. (custom-declare-variable 'ediff-suspend-hook 'nil '(#$ . 15967) :type 'hook :group 'ediff-hook) #@65 Hooks to run in the Ediff control buffer after finishing Ediff. (custom-declare-variable 'ediff-quit-hook 'nil '(#$ . 16135) :type 'hook :group 'ediff-hook) #@83 Hooks to run on exiting Ediff but before killing the control and variant buffers. (custom-declare-variable 'ediff-cleanup-hook 'nil '(#$ . 16298) :type 'hook :group 'ediff-hook) (byte-code "\301B\302\303!\210\304B\305\306!\210\307B\310\311!\210\312B\313\314\315\316\"!\207" [current-load-list ediff-KILLED-VITAL-BUFFER (lambda (#1=#:defconst-tmp-var) (defconst ediff-KILLED-VITAL-BUFFER #1#)) "You have killed a vital Ediff buffer---you must leave Ediff now!" ediff-NO-DIFFERENCES (lambda (#2=#:defconst-tmp-var) (defconst ediff-NO-DIFFERENCES #2#)) "Sorry, comparison of identical variants is not what I am made for..." ediff-BAD-DIFF-NUMBER (lambda (#3=#:defconst-tmp-var) (defconst ediff-BAD-DIFF-NUMBER #3#)) "%S: Bad diff region number, %d. Valid numbers are 1 to %d" ediff-BAD-INFO (lambda (#4=#:defconst-tmp-var) (defconst ediff-BAD-INFO #4#)) format "\n*** The Info file for Ediff, a part of the standard distribution\n*** of %sEmacs, does not seem to be properly installed.\n***\n*** Please contact your system administrator. " ""] 4) #@281 Function that determines the next/previous diff region to show. Should return t for regions to be ignored and nil otherwise. This function gets a region number as an argument. The region number is the one used internally by Ediff. It is 1 less than the number seen by the user. (defvar ediff-skip-diff-region-function 'ediff-show-all-diffs (#$ . 17358)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-skip-diff-region-function put permanent-local t] 4) #@128 Function to use in determining which regions to hide. See the documentation string of `ediff-hide-regexp-matches' for details. (defvar ediff-hide-regexp-matches-function 'ediff-hide-regexp-matches (#$ . 17855)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-hide-regexp-matches-function put permanent-local t] 4) #@136 Function to use in determining which regions to focus on. See the documentation string of `ediff-focus-on-regexp-matches' for details. (defvar ediff-focus-on-regexp-matches-function 'ediff-focus-on-regexp-matches (#$ . 18210)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-focus-on-regexp-matches-function put permanent-local t] 4) #@2 (defvar ediff-regexp-focus-A "" (#$ . 18583)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-regexp-focus-A put permanent-local t] 4) #@2 (defvar ediff-regexp-focus-B "" (#$ . 18758)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-regexp-focus-B put permanent-local t] 4) #@2 (defvar ediff-regexp-focus-C "" (#$ . 18933)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-regexp-focus-C put permanent-local t] 4) #@2 (defvar ediff-focus-regexp-connective 'and (#$ . 19108)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-focus-regexp-connective put permanent-local t] 4) #@2 (defvar ediff-regexp-hide-A "" (#$ . 19303)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-regexp-hide-A put permanent-local t] 4) #@2 (defvar ediff-regexp-hide-B "" (#$ . 19476)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-regexp-hide-B put permanent-local t] 4) #@2 (defvar ediff-regexp-hide-C "" (#$ . 19649)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-regexp-hide-C put permanent-local t] 4) #@2 (defvar ediff-hide-regexp-connective 'and (#$ . 19822)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-hide-regexp-connective put permanent-local t] 4) #@2 (defvar ediff-killed-diffs-alist nil (#$ . 20015)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-killed-diffs-alist put permanent-local t] 4) #@2 (defvar ediff-syntax-table nil (#$ . 20199)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-syntax-table put permanent-local t] 4) #@96 Flag placed before a highlighted block of differences, if block starts at beginning of a line. (custom-declare-variable 'ediff-before-flag-bol '(if (featurep 'xemacs) (make-glyph "->>") "->>") '(#$ . 20372) :type 'string :tag "Region before-flag at beginning of line" :group 'ediff) #@87 Flag placed after a highlighted block of differences, if block ends at end of a line. (custom-declare-variable 'ediff-after-flag-eol '(if (featurep 'xemacs) (make-glyph "<<-") "<<-") '(#$ . 20661) :type 'string :tag "Region after-flag at end of line" :group 'ediff) #@85 Flag placed before a highlighted block of differences, if block starts in mid-line. (custom-declare-variable 'ediff-before-flag-mol '(if (featurep 'xemacs) (make-glyph "->>") "->>") '(#$ . 20933) :type 'string :tag "Region before-flag in the middle of line" :group 'ediff) #@82 Flag placed after a highlighted block of differences, if block ends in mid-line. (custom-declare-variable 'ediff-after-flag-mol '(if (featurep 'xemacs) (make-glyph "<<-") "<<-") '(#$ . 21212) :type 'string :tag "Region after-flag in the middle of line" :group 'ediff) #@2 (defvar ediff-use-faces t (#$ . 21485)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-use-faces put permanent-local t] 4) #@248 If t, differences are highlighted using faces, if device supports faces. If nil, differences are highlighted using ASCII flags, ediff-before-flag and ediff-after-flag. On a non-window system, differences are always highlighted using ASCII flags. (custom-declare-variable 'ediff-use-faces 't '(#$ . 21651) :type 'boolean :group 'ediff-highlighting) #@2 (defvar ediff-word-mode nil (#$ . 22005)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-word-mode put permanent-local t] 4) #@2 (defvar ediff-job-name nil (#$ . 22171)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-job-name put permanent-local t] 4) #@2 (defvar ediff-narrow-bounds nil (#$ . 22335)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-narrow-bounds put permanent-local t] 4) #@2 (defvar ediff-wide-bounds nil (#$ . 22509)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-wide-bounds put permanent-local t] 4) #@2 (defvar ediff-visible-bounds nil (#$ . 22679)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-visible-bounds put permanent-local t] 4) #@75 Non-nil means start narrowed, if doing ediff-windows-* or ediff-regions-* (defvar ediff-start-narrowed t (#$ . 22856)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-start-narrowed put permanent-local t] 4) #@132 *Non-nil means: when finished, Ediff widens buffers A/B. Actually, Ediff restores the scope of visibility that existed at startup. (defvar ediff-quit-widened t (#$ . -23105)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-quit-widened put permanent-local t] 4) #@172 nil means prompt to remove unmodified buffers A/B/C at session end. Supplying a prefix argument to the quit command `q' temporarily reverses the meaning of this variable. (custom-declare-variable 'ediff-keep-variants 't '(#$ . 23408) :type 'boolean :group 'ediff) #@2 (defvar ediff-highlight-all-diffs t (#$ . 23677)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-highlight-all-diffs put permanent-local t] 4) #@160 If nil, only the selected differences are highlighted. Otherwise, all difference regions are highlighted, but the selected region is shown in brighter colors. (custom-declare-variable 'ediff-highlight-all-diffs 't '(#$ . 23863) :type 'boolean :group 'ediff-highlighting) #@2 (defvar ediff-control-buffer-suffix nil (#$ . 24139)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-control-buffer-suffix put permanent-local t] 4) #@2 (defvar ediff-control-buffer-number nil (#$ . 24329)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-control-buffer-number put permanent-local t] 4) #@2 (defvar ediff-buffer-values-orig-A nil (#$ . 24519)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-buffer-values-orig-A put permanent-local t] 4) #@2 (defvar ediff-buffer-values-orig-B nil (#$ . 24707)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-buffer-values-orig-B put permanent-local t] 4) #@2 (defvar ediff-buffer-values-orig-C nil (#$ . 24895)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-buffer-values-orig-C put permanent-local t] 4) #@2 (defvar ediff-buffer-values-orig-Ancestor nil (#$ . 25083)) (byte-code "\301\302!\210\303\302\304\305#\210\306B\307\310!\210\311B\312\313!\207" [current-load-list make-variable-buffer-local ediff-buffer-values-orig-Ancestor put permanent-local t ediff-buffer-values-orig-alist (lambda (#1=#:defconst-tmp-var) (defconst ediff-buffer-values-orig-alist #1#)) ((A . ediff-buffer-values-orig-A) (B . ediff-buffer-values-orig-B) (C . ediff-buffer-values-orig-C) (Ancestor . ediff-buffer-values-orig-Ancestor)) ediff-protected-variables (lambda (#2=#:defconst-tmp-var) (defconst ediff-protected-variables #2#)) (mode-line-format)] 4) #@2 (defvar ediff-difference-vector-A nil (#$ . 25720)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-difference-vector-A put permanent-local t] 4) #@2 (defvar ediff-difference-vector-B nil (#$ . 25906)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-difference-vector-B put permanent-local t] 4) #@2 (defvar ediff-difference-vector-C nil (#$ . 26092)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-difference-vector-C put permanent-local t] 4) #@2 (defvar ediff-difference-vector-Ancestor nil (#$ . 26278)) (byte-code "\301\302!\210\303\302\304\305#\210\306B\307\310!\207" [current-load-list make-variable-buffer-local ediff-difference-vector-Ancestor put permanent-local t ediff-difference-vector-alist (lambda (#1=#:defconst-tmp-var) (defconst ediff-difference-vector-alist #1#)) ((A . ediff-difference-vector-A) (B . ediff-difference-vector-B) (C . ediff-difference-vector-C) (Ancestor . ediff-difference-vector-Ancestor))] 4) #@2 (defvar ediff-state-of-merge nil (#$ . 26768)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-state-of-merge put permanent-local t] 4) #@2 (defvar ediff-current-difference -1 (#$ . 26944)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-current-difference put permanent-local t] 4) #@2 (defvar ediff-number-of-differences nil (#$ . 27127)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-number-of-differences put permanent-local t] 4) #@2 (defvar ediff-diff-buffer nil (#$ . 27317)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-diff-buffer put permanent-local t] 4) #@2 (defvar ediff-custom-diff-buffer nil (#$ . 27487)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-custom-diff-buffer put permanent-local t] 4) #@2 (defvar ediff-fine-diff-buffer nil (#$ . 27671)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-fine-diff-buffer put permanent-local t] 4) #@2 (defconst ediff-tmp-buffer " *ediff-tmp*" (#$ . 27851)) #@2 (defconst ediff-msg-buffer " *ediff-message*" (#$ . 27913)) #@2 (defvar ediff-error-buffer nil (#$ . 27979)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-error-buffer put permanent-local t] 4) #@2 (defvar ediff-debug-buffer "*ediff-debug*" (#$ . 28151)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-debug-buffer put permanent-local t] 4) #@2 (defvar ediff-this-buffer-ediff-sessions nil (#$ . 28335)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-this-buffer-ediff-sessions put permanent-local t] 4) #@2 (defvar ediff-disturbed-overlays nil (#$ . 28535)) #@2 (defvar ediff-shadow-overlay-priority 100 (#$ . 28592)) #@333 Version control package used. Currently, Ediff supports vc.el, rcs.el, pcl-cvs.el, and generic-sc.el. The standard Emacs interface to RCS, CVS, SCCS, etc., is vc.el. However, some people find the other two packages more convenient. Set this variable to the appropriate symbol: `rcs', `pcl-cvs', or `generic-sc' if you so desire. (custom-declare-variable 'ediff-version-control-package ''vc '(#$ . 28656) :type 'symbol :group 'ediff) #@385 The coding system for read to use when running the diff program as a subprocess. In most cases, the default will do. However, under certain circumstances in MS-Windows you might need to use something like 'raw-text-dos here. So, if the output that your diff program sends to Emacs contains extra ^M's, you might need to experiment here, if the default or 'raw-text-dos doesn't work. (custom-declare-variable 'ediff-coding-system-for-read ''raw-text '(#$ . 29099) :type 'symbol :group 'ediff) #@148 The coding system for write to use when writing out difference regions to temp files in buffer jobs and when Ediff needs to find fine differences. (custom-declare-variable 'ediff-coding-system-for-write ''emacs-internal '(#$ . 29599) :type 'symbol :group 'ediff) (byte-code "\300\301\302\"\210\300\303\304\"\210\300\305\306\"\210\300\307\310\"\207" [defalias ediff-read-event read-event ediff-overlayp overlayp ediff-make-overlay make-overlay ediff-delete-overlay delete-overlay] 3) #@182 Check the current version against MAJOR and MINOR version numbers. The comparison uses operator OP, which may be any of: =, >, >=, <, <=. TYPE-OF-EMACS is either 'xemacs or 'emacs. (defalias 'ediff-check-version #[(op major minor &optional type-of-emacs) "\306=\203 \307\207\210 \310=\203 \n U\205> \f U\207 \311>\203: \f \"\204- \f U\205> \f U\2038 \n \"\207\312\207\313\314 \"\207" [type-of-emacs op emacs-minor-version minor emacs-major-version major xemacs nil = (> >= < <=) t error "%S: Invalid op in ediff-check-version"] 3 (#$ . 30089)]) (make-obsolete 'ediff-check-version 'version< "23.1") (defalias 'ediff-color-display-p #[nil "\300\301\302\217\207" [nil (display-color-p) ((error))] 3]) #@2 (defvar ediff-highlighting-style (byte-code "\301 \203 \203 \302\207\303\207" [ediff-use-faces ediff-has-face-support-p face ascii] 1) (#$ . 30799)) (byte-code "\301\302!\210\303\302\304\305#\210\306 \203# \307\310\311\312!\203 \312\202 \313\"\210\307\314\315\"\210\316 \203F \307\317\311\320!\2034 \320\2025 \321\"\210\307\322\311\323!\203C \323\202D \324\"\210\325B\326\327!\210\330B\331\332!\207" [current-load-list make-variable-buffer-local ediff-highlighting-style put permanent-local t ediff-has-face-support-p defalias ediff-valid-color-p fboundp color-defined-p x-color-defined-p ediff-get-face internal-get-face ediff-window-display-p ediff-display-pixel-width display-pixel-width x-display-pixel-width ediff-display-pixel-height display-pixel-height x-display-pixel-height ediff-current-diff-overlay-alist (lambda (#1=#:defconst-tmp-var) (defconst ediff-current-diff-overlay-alist #1#)) ((A . ediff-current-diff-overlay-A) (B . ediff-current-diff-overlay-B) (C . ediff-current-diff-overlay-C) (Ancestor . ediff-current-diff-overlay-Ancestor)) ediff-current-diff-face-alist (lambda (#2=#:defconst-tmp-var) (defconst ediff-current-diff-face-alist #2#)) ((A . ediff-current-diff-A) (B . ediff-current-diff-B) (C . ediff-current-diff-C) (Ancestor . ediff-current-diff-Ancestor))] 4) (defalias 'ediff-set-overlay-face #[(extent face) "\302\301 #\210\302\303\304#\207" [extent face ediff-overlay-put help-echo ediff-region-help-echo] 4]) (defalias 'ediff-region-help-echo #[(extent-or-window &optional overlay point) "\204 \306\307\"\306\304\"\306\310\"\311 \f;\203 \312\f!\f\205' \f\313N \2038 \2038 \314\315 T\"\202I \n\206I \203H \314\316 T\"\202I \317,\207" [overlay extent-or-window face-help diff-num face is-current ediff-overlay-get ediff ediff-diff-num nil intern ediff-help-echo format "Difference region %S -- current" "Difference region %S -- non-current" ""] 5]) #@42 Set face pixmap on a monochrome display. (defalias 'ediff-set-face-pixmap #[(face pixmap) "\300 \205 \301 ?\205 \302\303\304\217\207" [ediff-window-display-p ediff-color-display-p nil (set-face-background-pixmap face pixmap) ((error (byte-code "\302\303\304! #\210\305\306!\207" [face pixmap message "Pixmap not found for %S: %s" face-name sit-for 1] 4)))] 3 (#$ . 32713)]) (defalias 'ediff-hide-face #[(face) "\301 \205 \302\303!\205 \302\304!\205 \303\304\"\207" [face ediff-has-face-support-p boundp add-to-list facemenu-unlisted-faces] 3]) (custom-declare-face 'ediff-current-diff-A '((((class color) (min-colors 16)) (:foreground "firebrick" :background "pale green")) (((class color)) (:foreground "blue3" :background "yellow3")) (t (:inverse-video t))) "Face for highlighting the selected difference in buffer A." :group 'ediff-highlighting) #@213 Face for highlighting the selected difference in buffer A. DO NOT CHANGE this variable. Instead, use the customization widget to customize the actual face object `ediff-current-diff-A' this variable represents. (defvar ediff-current-diff-face-A 'ediff-current-diff-A (#$ . 33576)) (byte-code "\301!\210\302\303\304\305\306\307%\207" [ediff-current-diff-face-A ediff-hide-face custom-declare-face ediff-current-diff-B ((((class color) (min-colors 16)) (:foreground "DarkOrchid" :background "Yellow")) (((class color)) (:foreground "magenta3" :background "yellow3" :weight bold)) (t (:inverse-video t))) "Face for highlighting the selected difference in buffer B." :group ediff-highlighting] 6) #@193 Face for highlighting the selected difference in buffer B. this variable. Instead, use the customization widget to customize the actual face `ediff-current-diff-B' this variable represents. (defvar ediff-current-diff-face-B 'ediff-current-diff-B (#$ . 34278)) (byte-code "\301!\210\302\303\304\305\306\307%\207" [ediff-current-diff-face-B ediff-hide-face custom-declare-face ediff-current-diff-C ((((class color) (min-colors 16)) (:foreground "Navy" :background "Pink")) (((class color)) (:foreground "cyan3" :background "yellow3" :weight bold)) (t (:inverse-video t))) "Face for highlighting the selected difference in buffer C." :group ediff-highlighting] 6) #@213 Face for highlighting the selected difference in buffer C. DO NOT CHANGE this variable. Instead, use the customization widget to customize the actual face object `ediff-current-diff-C' this variable represents. (defvar ediff-current-diff-face-C 'ediff-current-diff-C (#$ . 34949)) (byte-code "\301!\210\302\303\304\305\306\307%\207" [ediff-current-diff-face-C ediff-hide-face custom-declare-face ediff-current-diff-Ancestor ((((class color) (min-colors 16)) (:foreground "Black" :background "VioletRed")) (((class color)) (:foreground "black" :background "magenta3")) (t (:inverse-video t))) "Face for highlighting the selected difference in buffer Ancestor." :group ediff-highlighting] 6) #@227 Face for highlighting the selected difference in buffer Ancestor. DO NOT CHANGE this variable. Instead, use the customization widget to customize the actual face object `ediff-current-diff-Ancestor' this variable represents. (defvar ediff-current-diff-face-Ancestor 'ediff-current-diff-Ancestor (#$ . 35648)) (byte-code "\301!\210\302\303\304\305\306\307%\207" [ediff-current-diff-face-Ancestor ediff-hide-face custom-declare-face ediff-fine-diff-A ((((class color) (min-colors 16)) (:foreground "Navy" :background "sky blue")) (((class color)) (:foreground "white" :background "sky blue" :weight bold)) (t (:underline t :stipple "gray3"))) "Face for highlighting the refinement of the selected diff in buffer A." :group ediff-highlighting] 6) #@207 Face for highlighting the fine differences in buffer A. DO NOT CHANGE this variable. Instead, use the customization widget to customize the actual face object `ediff-fine-diff-A' this variable represents. (defvar ediff-fine-diff-face-A 'ediff-fine-diff-A (#$ . 36401)) (byte-code "\301!\210\302\303\304\305\306\307%\207" [ediff-fine-diff-face-A ediff-hide-face custom-declare-face ediff-fine-diff-B ((((class color) (min-colors 16)) (:foreground "Black" :background "cyan")) (((class color)) (:foreground "magenta3" :background "cyan3")) (t (:underline t :stipple "gray3"))) "Face for highlighting the refinement of the selected diff in buffer B." :group ediff-highlighting] 6) #@207 Face for highlighting the fine differences in buffer B. DO NOT CHANGE this variable. Instead, use the customization widget to customize the actual face object `ediff-fine-diff-B' this variable represents. (defvar ediff-fine-diff-face-B 'ediff-fine-diff-B (#$ . 37088)) (byte-code "\301!\210\302\303\304\305\306\307%\207" [ediff-fine-diff-face-B ediff-hide-face custom-declare-face ediff-fine-diff-C ((((type pc)) (:foreground "white" :background "Turquoise")) (((class color) (min-colors 16)) (:foreground "Black" :background "Turquoise")) (((class color)) (:foreground "yellow3" :background "Turquoise" :weight bold)) (t (:underline t :stipple "gray3"))) "Face for highlighting the refinement of the selected diff in buffer C." :group ediff-highlighting] 6) #@207 Face for highlighting the fine differences in buffer C. DO NOT CHANGE this variable. Instead, use the customization widget to customize the actual face object `ediff-fine-diff-C' this variable represents. (defvar ediff-fine-diff-face-C 'ediff-fine-diff-C (#$ . 37856)) (byte-code "\301!\210\302\303\304\305\306\307%\207" [ediff-fine-diff-face-C ediff-hide-face custom-declare-face ediff-fine-diff-Ancestor ((((class color) (min-colors 16)) (:foreground "Black" :background "Green")) (((class color)) (:foreground "red3" :background "green")) (t (:underline t :stipple "gray3"))) "Face for highlighting the refinement of the selected diff in the ancestor buffer.\nAt present, this face is not used and no fine differences are computed for the\nancestor buffer." :group ediff-highlighting] 6) #@221 Face for highlighting the fine differences in buffer Ancestor. DO NOT CHANGE this variable. Instead, use the customization widget to customize the actual face object `ediff-fine-diff-Ancestor' this variable represents. (defvar ediff-fine-diff-face-Ancestor 'ediff-fine-diff-Ancestor (#$ . 38656)) (byte-code "\305!\210\304 B\306\304!\204@ \307\304\310 \204 \311\202> \312\302!\203+ \313\314\315\n#\203+ \314\202> \312\303!\203= \313\314\315 #\203= \314\202> \316\"\210\317\320\321\322\323\315\324\315\325\fFDF\326\327\330%\207" [ediff-fine-diff-face-Ancestor current-load-list x-bitmap-file-path mswindowsx-bitmap-file-path stipple-pixmap ediff-hide-face default-boundp set-default ediff-has-face-support-p nil boundp locate-library "stipple" t "Stipple" custom-declare-face ediff-even-diff-A (((type pc)) (:foreground "green3" :background "light grey")) (((class color) (min-colors 16)) (:foreground "Black" :background "light grey")) (((class color)) (:foreground "red3" :background "light grey" :weight bold)) :italic :stipple "Face for highlighting even-numbered non-current differences in buffer A." :group ediff-highlighting] 10) #@224 Face for highlighting even-numbered non-current differences in buffer A. DO NOT CHANGE this variable. Instead, use the customization widget to customize the actual face object `ediff-even-diff-A' this variable represents. (defvar ediff-even-diff-face-A 'ediff-even-diff-A (#$ . 39803)) (byte-code "\302!\210\303\304\305\306\307\310\307\311 FDE\312\313\314%\207" [ediff-even-diff-face-A stipple-pixmap ediff-hide-face custom-declare-face ediff-even-diff-B (((class color) (min-colors 16)) (:foreground "White" :background "Grey")) (((class color)) (:foreground "blue3" :background "Grey" :weight bold)) t :italic :stipple "Face for highlighting even-numbered non-current differences in buffer B." :group ediff-highlighting] 9) #@224 Face for highlighting even-numbered non-current differences in buffer B. DO NOT CHANGE this variable. Instead, use the customization widget to customize the actual face object `ediff-even-diff-B' this variable represents. (defvar ediff-even-diff-face-B 'ediff-even-diff-B (#$ . 40538)) (byte-code "\302!\210\303\304\305\306\307\310\311\310\312 FDF\313\314\315%\207" [ediff-even-diff-face-B stipple-pixmap ediff-hide-face custom-declare-face ediff-even-diff-C (((type pc)) (:foreground "yellow3" :background "light grey")) (((class color) (min-colors 16)) (:foreground "Black" :background "light grey")) (((class color)) (:foreground "yellow3" :background "light grey" :weight bold)) t :italic :stipple "Face for highlighting even-numbered non-current differences in buffer C." :group ediff-highlighting] 10) #@224 Face for highlighting even-numbered non-current differences in buffer C. DO NOT CHANGE this variable. Instead, use the customization widget to customize the actual face object `ediff-even-diff-C' this variable represents. (defvar ediff-even-diff-face-C 'ediff-even-diff-C (#$ . 41355)) (byte-code "\302!\210\303\304\305\306\307\310\311\310\312 FDF\313\314\315%\207" [ediff-even-diff-face-C stipple-pixmap ediff-hide-face custom-declare-face ediff-even-diff-Ancestor (((type pc)) (:foreground "cyan3" :background "light grey")) (((class color) (min-colors 16)) (:foreground "White" :background "Grey")) (((class color)) (:foreground "cyan3" :background "light grey" :weight bold)) t :italic :stipple "Face for highlighting even-numbered non-current differences in the ancestor buffer." :group ediff-highlighting] 10) #@238 Face for highlighting even-numbered non-current differences in buffer Ancestor. DO NOT CHANGE this variable. Instead, use the customization widget to customize the actual face object `ediff-even-diff-Ancestor' this variable represents. (defvar ediff-even-diff-face-Ancestor 'ediff-even-diff-Ancestor (#$ . 42180)) (byte-code "\302!\210\303 B\304\305!\210\306\307\310\311\312\313%\207" [ediff-even-diff-face-Ancestor current-load-list ediff-hide-face ediff-even-diff-face-alist (lambda (#1=#:defconst-tmp-var) (defconst ediff-even-diff-face-alist #1#)) ((A . ediff-even-diff-A) (B . ediff-even-diff-B) (C . ediff-even-diff-C) (Ancestor . ediff-even-diff-Ancestor)) custom-declare-face ediff-odd-diff-A ((((type pc)) (:foreground "green3" :background "gray40")) (((class color) (min-colors 16)) (:foreground "White" :background "Grey")) (((class color)) (:foreground "red3" :background "black" :weight bold)) (t (:italic t :stipple "gray1"))) "Face for highlighting odd-numbered non-current differences in buffer A." :group ediff-highlighting] 6) #@222 Face for highlighting odd-numbered non-current differences in buffer A. DO NOT CHANGE this variable. Instead, use the customization widget to customize the actual face object `ediff-odd-diff-A' this variable represents. (defvar ediff-odd-diff-face-A 'ediff-odd-diff-A (#$ . 43235)) (byte-code "\301!\210\302\303\304\305\306\307%\207" [ediff-odd-diff-face-A ediff-hide-face custom-declare-face ediff-odd-diff-B ((((type pc)) (:foreground "White" :background "gray40")) (((class color) (min-colors 16)) (:foreground "Black" :background "light grey")) (((class color)) (:foreground "cyan3" :background "black" :weight bold)) (t (:italic t :stipple "gray1"))) "Face for highlighting odd-numbered non-current differences in buffer B." :group ediff-highlighting] 6) #@222 Face for highlighting odd-numbered non-current differences in buffer B. DO NOT CHANGE this variable. Instead, use the customization widget to customize the actual face object `ediff-odd-diff-B' this variable represents. (defvar ediff-odd-diff-face-B 'ediff-odd-diff-B (#$ . 44004)) (byte-code "\301!\210\302\303\304\305\306\307%\207" [ediff-odd-diff-face-B ediff-hide-face custom-declare-face ediff-odd-diff-C ((((type pc)) (:foreground "yellow3" :background "gray40")) (((class color) (min-colors 16)) (:foreground "White" :background "Grey")) (((class color)) (:foreground "yellow3" :background "black" :weight bold)) (t (:italic t :stipple "gray1"))) "Face for highlighting odd-numbered non-current differences in buffer C." :group ediff-highlighting] 6) #@222 Face for highlighting odd-numbered non-current differences in buffer C. DO NOT CHANGE this variable. Instead, use the customization widget to customize the actual face object `ediff-odd-diff-C' this variable represents. (defvar ediff-odd-diff-face-C 'ediff-odd-diff-C (#$ . 44771)) (byte-code "\301!\210\302\303\304\305\306\307%\207" [ediff-odd-diff-face-C ediff-hide-face custom-declare-face ediff-odd-diff-Ancestor ((((class color) (min-colors 16)) (:foreground "cyan3" :background "gray40")) (((class color)) (:foreground "green3" :background "black" :weight bold)) (t (:italic t :stipple "gray1"))) "Face for highlighting odd-numbered non-current differences in the ancestor buffer." :group ediff-highlighting] 6) #@236 Face for highlighting odd-numbered non-current differences in buffer Ancestor. DO NOT CHANGE this variable. Instead, use the customization widget to customize the actual face object `ediff-odd-diff-Ancestor' this variable represents. (defvar ediff-odd-diff-face-Ancestor 'ediff-odd-diff-Ancestor (#$ . 45498)) (byte-code "\306!\210\307 B\310\311!\210\312 B\313\314!\210\315\n\316\317#\210\315 \316\317#\210\315\f\316\317#\210\315 \316\317#\210\320\321\322\"\210\320\323\324\"\207" [ediff-odd-diff-face-Ancestor current-load-list ediff-fine-diff-face-A ediff-fine-diff-face-B ediff-fine-diff-face-C ediff-fine-diff-face-Ancestor ediff-hide-face ediff-odd-diff-face-alist (lambda (#1=#:defconst-tmp-var) (defconst ediff-odd-diff-face-alist #1#)) ((A . ediff-odd-diff-A) (B . ediff-odd-diff-B) (C . ediff-odd-diff-C) (Ancestor . ediff-odd-diff-Ancestor)) ediff-fine-diff-face-alist (lambda (#2=#:defconst-tmp-var) (defconst ediff-fine-diff-face-alist #2#)) ((A . ediff-fine-diff-A) (B . ediff-fine-diff-B) (C . ediff-fine-diff-C) (Ancestor . ediff-fine-diff-Ancestor)) put ediff-help-echo "A `refinement' of the current difference region" add-hook ediff-quit-hook ediff-cleanup-mess ediff-suspend-hook ediff-default-suspend-function] 4) #@56 Overlay for the current difference region in buffer A. (defvar ediff-current-diff-overlay-A nil (#$ . 46742)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-current-diff-overlay-A put permanent-local t] 4) #@56 Overlay for the current difference region in buffer B. (defvar ediff-current-diff-overlay-B nil (#$ . 46989)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-current-diff-overlay-B put permanent-local t] 4) #@56 Overlay for the current difference region in buffer C. (defvar ediff-current-diff-overlay-C nil (#$ . 47236)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-current-diff-overlay-C put permanent-local t] 4) #@67 Overlay for the current difference region in the ancestor buffer. (defvar ediff-current-diff-overlay-Ancestor nil (#$ . 47483)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-current-diff-overlay-Ancestor put permanent-local t] 4) (defalias 'ediff-highest-priority #[(start end buffer) "\306S]\307 \203F \310 !\203F \311\310 !!\203F r q\210\nd\fT^W\2035 \312\313\n! \"\314\n!\211\202 \315\306 \316\317\306\320\321 \"B\"#)\202Q \322=\206Q \323!*\207" [start ovr-list pos buffer end ediff-shadow-overlay-priority 1 nil get-buffer buffer-name append overlays-at next-overlay-change + apply max mapcar #[(ovr) "\203 \301\302\"\204 \301\303\"\204 \301\304\"\206 \305\207\305\207" [ovr ediff-overlay-get ediff ediff-diff-num priority 0] 3] ediff-quit error this-command ediff-KILLED-VITAL-BUFFER] 10]) #@274 *Specifies the function to be used to toggle read-only. If nil, Ediff tries to deduce the function from the binding of C-x C-q. Normally, this is the `toggle-read-only' function, but, if version control is used, it could be `vc-toggle-read-only' or `rcs-toggle-read-only'. (defvar ediff-toggle-read-only-function nil (#$ . -48339)) #@102 Make all variant buffers read-only when Ediff starts up. This property can be toggled interactively. (custom-declare-variable 'ediff-make-buffers-readonly-at-startup 'nil '(#$ . 48678) :type 'boolean :group 'ediff) (byte-code "\301B\302\301!\204 \303\301\304\"\210\301\207" [current-load-list ediff-verbose-p default-boundp set-default t] 3) #@277 Save the results of merge jobs automatically. With value nil, don't save automatically. With value t, always save. Anything else means save automatically only if the merge job is part of a group of jobs, such as `ediff-merge-directory' or `ediff-merge-directory-revisions'. (custom-declare-variable 'ediff-autostore-merges ''group-jobs-only '(#$ . 49030) :type '(choice (const nil) (const t) (const group-jobs-only)) :group 'ediff-merge) (make-variable-buffer-local 'ediff-autostore-merges) #@2 (defvar ediff-merge-store-file nil (#$ . 49528)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-merge-store-file put permanent-local t] 4) #@47 Prefix to be attached to saved merge buffers. (custom-declare-variable 'ediff-merge-filename-prefix '"merge_" '(#$ . 49709) :type 'string :group 'ediff-merge) #@115 Non-nil means C-h should not invoke Emacs help in control buffer. Instead, C-h would jump to previous difference. (custom-declare-variable 'ediff-no-emacs-help-in-control-buffer 'nil '(#$ . 49875) :type 'boolean :group 'ediff) #@86 Prefix to put on Ediff temporary file names. Do not start with `~/' or `~USERNAME/'. (custom-declare-variable 'ediff-temp-file-prefix '(file-name-as-directory (cond ((boundp 'temporary-file-directory) temporary-file-directory) ((fboundp 'temp-directory) (temp-directory)) (t "/tmp/"))) '(#$ . 50108) :type 'string :group 'ediff) #@33 Mode for Ediff temporary files. (custom-declare-variable 'ediff-temp-file-mode '384 '(#$ . 50443) :type 'integer :group 'ediff) #@126 Regexp that matches characters that must be quoted with `\' in shell command line. This default should work without changes. (custom-declare-variable 'ediff-metachars '"[ \n!\"#$&'()*;<=>?[\\^`{|~]" '(#$ . 50578) :type 'string :group 'ediff) (byte-code "\301B\302\301!\204 \303\301\304\"\210\304\207" [current-load-list ediff-H-glyph default-boundp set-default nil] 3) #@2 (defvar ediff-temp-file-A nil (#$ . 50956)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-temp-file-A put permanent-local t] 4) #@2 (defvar ediff-temp-file-B nil (#$ . 51126)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-temp-file-B put permanent-local t] 4) #@2 (defvar ediff-temp-file-C nil (#$ . 51296)) (byte-code "\300\301!\210\302\301\303\304#\207" [make-variable-buffer-local ediff-temp-file-C put permanent-local t] 4) (defalias 'ediff-file-remote-p #[(file-name) "\301!\207" [file-name file-remote-p] 2]) (defalias 'ediff-listable-file #[(file-name) "\302\303\"\211?\206 \304=)\207" [file-name handler find-file-name-handler file-local-copy dired-handler-fn] 4]) (defalias 'ediff-frame-unsplittable-p #[(frame) "\301\302!\236A\207" [frame unsplittable frame-parameters] 3]) (put 'ediff-frame-unsplittable-p 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-get-next-window #[(wind prev-wind) "\302!\203 \207 \203 \303!\207\304 \207" [wind prev-wind window-live-p next-window selected-window] 2]) (put 'ediff-get-next-window 'byte-optimizer 'byte-compile-inline-expand) #@31 Kill buffer BUF if it exists. (defalias 'ediff-kill-buffer-carefully #[(buf) "\205 \301!\205 \302\301!!\205 \303\301!!\207" [buf get-buffer buffer-name kill-buffer] 3 (#$ . 52141)]) (put 'ediff-kill-buffer-carefully 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-background-face #[(buf-type dif-num) "\305 \306\"\306=\203 \n\202 \307\f\"A*\207" [buf-type dif-num ediff-even-diff-face-alist ediff-odd-diff-face-alist alist logand 1 assoc] 4]) (put 'ediff-background-face 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-paint-background-regions-in-one-buffer #[(buf-type unhighlight) "\306 \307\n\"A*!\310\211 \311\312 \"+\207" [buf-type ediff-difference-vector-alist alist diff-num overl diff-vector eval assoc nil mapcar #[(rec) "\306H\307 \310\"\311 !\2056 \312 ?\2055 \f\n \211 \313 \314\"\314=\203) \202+ \315\f\"A,\"\207" [rec overl diff-num unhighlight buf-type dif-num 0 ediff-overlay-get ediff-diff-num ediff-overlay-buffer ediff-set-overlay-face logand 1 assoc ediff-even-diff-face-alist ediff-odd-diff-face-alist alist] 7]] 4]) (defalias 'ediff-paint-background-regions #[(&optional unhighlight) "\301\302\"\210\301\303\"\210\301\304\"\210\301\305\"\207" [unhighlight ediff-paint-background-regions-in-one-buffer A B C Ancestor] 3]) (defalias 'ediff-clear-fine-diff-vector #[(diff-record) "\205\n \301\302\303H\"\207" [diff-record mapc ediff-delete-overlay 1] 4]) (put 'ediff-clear-fine-diff-vector 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-clear-fine-differences-in-one-buffer #[(n buf-type) " \305\n\"A*J H\211 \203 \306\307\f\310H\"\210) \305\n\"A*J H\310\311I\207" [buf-type ediff-difference-vector-alist alist n diff-record assoc mapc ediff-delete-overlay 1 nil] 5]) (put 'ediff-clear-fine-differences-in-one-buffer 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-clear-fine-differences #[(n) "\306 \n\307 \"A*JH\211 \203 \310\311\f\312H\"\210) \n\307 \"A*JH\312\313I\210*\314 \n\307 \"A*JH\211 \203M \310\311\f\312H\"\210) \n\307 \"A*JH\312\313I\210* \205\223 \315 \n\307 \"A*JH\211 \203\201 \310\311\f\312H\"\210) \n\307 \"A*JH\312\313I*\207" [n buf-type ediff-difference-vector-alist alist diff-record ediff-3way-job A assoc mapc ediff-delete-overlay 1 nil B C] 5]) (put 'ediff-clear-fine-differences 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-mouse-event-p #[(event) "\301\302\303\304\305!\"\"\207" [event string-match "mouse" format "%S" event-basic-type] 6]) (put 'ediff-mouse-event-p 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-key-press-event-p #[(event) "\301!\206 9\207" [event char-or-string-p] 2]) (put 'ediff-key-press-event-p 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-event-point #[(event) "\302\303\304\305\306!\"\")\203= \211:\203 A@\202\" \307 `\310\311F)\312 8\206; A@:\2038 A@@\202; A@)\207\313!\206G 9)\203M `\207\314\315!\207" [event position string-match "mouse" format "%S" event-basic-type selected-window (0 . 0) 0 5 char-or-string-p error "Error"] 7]) (defalias 'ediff-event-buffer #[(event) "\302\303\304\305\306!\"\")\203* \307\211:\203 A@\202# \310 `\311\312F)\211@)!\207\313!\2064 9)\203: p\207\314\315!\207" [event position string-match "mouse" format "%S" event-basic-type window-buffer selected-window (0 . 0) 0 char-or-string-p error "Error"] 7]) (defalias 'ediff-event-key #[(event-or-key) "\207" [event-or-key] 1]) (defalias 'ediff-frame-iconified-p #[(frame) "\301 \205 \302!\205 \303!\304=\207" [frame ediff-window-display-p frame-live-p frame-visible-p icon] 2]) (put 'ediff-frame-iconified-p 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-window-visible-p #[(wind) "\301!\205 \302 ?\206 \303\304!!\207" [wind window-live-p ediff-window-display-p frame-visible-p window-frame] 3]) (put 'ediff-window-visible-p 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-frame-char-width #[(frame) "\301!\207" [frame frame-char-width] 2]) (put 'ediff-frame-char-width 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-reset-mouse #[(&optional frame do-not-grab-mouse) "\204 \305 \306 \205) \n\206( ?\206( \307=\203# \f\310>\206( \311 \312\313#)\207" [frame frame-or-wind do-not-grab-mouse ediff-grab-mouse this-command selected-frame ediff-window-display-p maybe (ediff-quit ediff-update-diffs) set-mouse-position 1 0] 4]) (defalias 'ediff-spy-after-mouse #[nil "\301 \211\207" [ediff-mouse-pixel-position mouse-pixel-position] 2]) (put 'ediff-spy-after-mouse 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-user-grabbed-mouse #[nil "\205F @\302 @=?\206F A@\203E \302 A@\203E AA\203E \302 AA\203E \303A@\302 A@Z! W\205C \303AA\302 AAZ! W?\207\304\207" [ediff-mouse-pixel-position ediff-mouse-pixel-threshold mouse-pixel-position abs nil] 3]) (defalias 'ediff-frame-char-height #[(frame) "\301!\207" [frame frame-char-height] 2]) (put 'ediff-frame-char-height 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-overlay-start #[(overl) "\301!\205 \302!\207" [overl ediff-overlayp overlay-start] 2]) (put 'ediff-overlay-start 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-overlay-end #[(overl) "\301!\205 \302!\207" [overl ediff-overlayp overlay-end] 2]) (put 'ediff-overlay-end 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-empty-overlay-p #[(overl) "\301!\205 \302!)\301!\205 \303!)U\207" [overl ediff-overlayp overlay-start overlay-end] 3]) (put 'ediff-empty-overlay-p 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-overlay-buffer #[(overl) "\301!\207" [overl overlay-buffer] 2]) (defalias 'ediff-overlay-get #[(overl property) "\302 \"\207" [overl property overlay-get] 3]) #@135 Calls `move-overlay' in Emacs and `set-extent-endpoints' in Lemacs. Checks if overlay's buffer exists before actually doing the move. (defalias 'ediff-move-overlay #[(overlay beg end &optional buffer) "\205 \305!\211\203# \306 !\203# \307\306 !!\203# \310\n \f$\202* \205* \311!)\207" [overlay buf beg end buffer ediff-overlay-buffer get-buffer buffer-name move-overlay ediff-delete-overlay] 6 (#$ . 57952)]) #@109 Calls `overlay-put' or `set-extent-property' depending on Emacs version. Checks if overlay's buffer exists. (defalias 'ediff-overlay-put #[(overlay prop value) "\303!\203 \304\303!!\203 \305\304\303!!!\203 \306 \n#\207\307!\207" [overlay prop value ediff-overlay-buffer get-buffer buffer-name overlay-put ediff-delete-overlay] 4 (#$ . 58375)]) (defalias 'ediff-abbreviate-file-name #[(file &optional dir) ";\203 \303BC\304\n!)\207\304\n!\207" [dir directory-abbrev-alist file "" abbreviate-file-name] 2]) (defalias 'ediff-strip-last-dir #[(dir) ";\204 \304!\305!\204 \306!GS\nH\n\307V\203. \310U\203. \307\nO\311\306!!*\207" [dir default-directory pos last-char expand-file-name file-directory-p file-name-directory 0 47 ediff-abbreviate-file-name] 3]) (defalias 'ediff-truncate-string-left #[(str newlen) "G\304\211 X\203 \202# \305 \306Z]\305\307\n\310 #]\304O\311 P*\207" [str substr len newlen nil 0 3 - 1 "..."] 7]) (defalias 'ediff-nonempty-string-p #[(string) ";\205 \301\230?\207" [string ""] 2]) (byte-code "\300\301\302\303#\210\304\305!\204 \306\305\307\"\210\300\207" [put ediff-nonempty-string-p byte-optimizer byte-compile-inline-expand fboundp subst-char-in-string defalias #[(fromchar tochar string &optional inplace) "G \203\n \202 \306! \307V\203( S\n H\f=\203 \n I\210\202 \n*\207" [string inplace newstr i fromchar tochar copy-sequence 0] 3 "Replace FROMCHAR with TOCHAR in STRING each time it occurs.\nUnless optional argument INPLACE is non-nil, return a new string."]] 4) (defalias 'ediff-abbrev-jobname #[(jobname) "\301=\203 \302\207\303=\203 \304\207\305=\203 \306\207\307=\203 \310\207\311=\203( \312\207\313=\2030 \314\207\315=\2038 \316\207\317=\203@ \320\207\321=\203H \322\207\323=\203P \324\207\325\326\327\330\331!\332\333O#!\207" [jobname ediff-directories "Compare two directories" ediff-files "Compare two files" ediff-buffers "Compare two buffers" ediff-directories3 "Compare three directories" ediff-files3 "Compare three files" ediff-buffers3 "Compare three buffers" ediff-revision "Compare file with a version" ediff-directory-revisions "Compare dir files with versions" ediff-merge-directory-revisions "Merge dir files with versions" ediff-merge-directory-revisions-with-ancestor "Merge dir versions via ancestors" capitalize subst-char-in-string 45 32 symbol-name 6 nil] 7]) (defalias 'ediff-strip-mode-line-format #[nil "@\301\235\205\f \3028\211\207" [mode-line-format (" A: " " B: " " C: " " Ancestor: ") 2] 2]) (put 'ediff-strip-mode-line-format 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-valid-difference-p #[(&optional n) "\204 \303Y\205 \nW\207" [n ediff-current-difference ediff-number-of-differences 0] 2]) (put 'ediff-valid-difference-p 'byte-optimizer 'byte-compile-inline-expand) #@32 Don't skip difference regions. (defalias 'ediff-show-all-diffs #[(n) "\300\207" [nil] 1 (#$ . 61212)]) (put 'ediff-show-all-diffs 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-message-if-verbose #[(string &rest args) "\205 \303\304 \n#\207" [ediff-verbose-p string args apply message] 4]) (put 'ediff-message-if-verbose 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-file-attributes #[(filename attr-number) "\302!\203\f \303!8\207\304\207" [filename attr-number ediff-listable-file file-attributes -1] 3]) (defalias 'ediff-file-size #[(filename) "\301\302\"\207" [filename ediff-file-attributes 7] 3]) (put 'ediff-file-size 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-file-modtime #[(filename) "\301\302\"\207" [filename ediff-file-attributes 5] 3]) (put 'ediff-file-modtime 'byte-optimizer 'byte-compile-inline-expand) (defalias 'ediff-convert-standard-filename #[(fname) "\301\302!\203\n \302!\207\207" [fname fboundp convert-standard-filename] 2]) (byte-code "\300\301\302\"\210\303\304!\207" [defalias ediff-with-syntax-table with-syntax-table provide ediff-init] 3)
Close
