Linux server.edchosting.com 4.18.0-553.79.1.lve.el7h.x86_64 #1 SMP Wed Oct 15 16:34:46 UTC 2025 x86_64
LiteSpeed
Server IP : 75.98.162.185 & Your IP : 216.73.216.163
Domains :
Cant Read [ /etc/named.conf ]
User : goons4good
Terminal
Auto Root
Create File
Create Folder
Localroot Suggester
Backdoor Destroyer
Readme
/
usr /
share /
emacs /
24.3 /
lisp /
Delete
Unzip
Name
Size
Permission
Date
Action
calc
[ DIR ]
drwxr-xr-x
2023-06-09 05:02
calendar
[ DIR ]
drwxr-xr-x
2023-06-09 05:02
cedet
[ DIR ]
drwxr-xr-x
2023-06-09 05:02
emacs-lisp
[ DIR ]
drwxr-xr-x
2023-06-09 05:02
emulation
[ DIR ]
drwxr-xr-x
2023-06-09 05:02
erc
[ DIR ]
drwxr-xr-x
2023-06-09 05:02
eshell
[ DIR ]
drwxr-xr-x
2023-06-09 05:02
gnus
[ DIR ]
drwxr-xr-x
2023-06-09 05:02
international
[ DIR ]
drwxr-xr-x
2023-06-09 05:02
language
[ DIR ]
drwxr-xr-x
2023-06-09 05:02
mail
[ DIR ]
drwxr-xr-x
2023-06-09 05:02
mh-e
[ DIR ]
drwxr-xr-x
2023-06-09 05:02
net
[ DIR ]
drwxr-xr-x
2023-06-09 05:02
nxml
[ DIR ]
drwxr-xr-x
2023-06-09 05:02
obsolete
[ DIR ]
drwxr-xr-x
2023-06-09 05:02
org
[ DIR ]
drwxr-xr-x
2023-06-09 05:02
play
[ DIR ]
drwxr-xr-x
2023-06-09 05:02
progmodes
[ DIR ]
drwxr-xr-x
2023-06-09 05:02
term
[ DIR ]
drwxr-xr-x
2023-06-09 05:02
textmodes
[ DIR ]
drwxr-xr-x
2023-06-09 05:02
url
[ DIR ]
drwxr-xr-x
2023-06-09 05:02
vc
[ DIR ]
drwxr-xr-x
2023-06-09 05:02
COPYING
34.32
KB
-rw-r--r--
2013-03-08 03:32
README
538
B
-rw-r--r--
2012-04-13 21:33
abbrev.elc
30.89
KB
-rw-r--r--
2023-06-07 04:18
align.elc
38.85
KB
-rw-r--r--
2023-06-07 04:02
allout-widgets.elc
62.73
KB
-rw-r--r--
2023-06-07 04:02
allout.elc
205.09
KB
-rw-r--r--
2023-06-07 04:02
ansi-color.elc
17.13
KB
-rw-r--r--
2023-06-07 04:02
apropos.elc
34.55
KB
-rw-r--r--
2023-06-07 04:02
arc-mode.elc
58.2
KB
-rw-r--r--
2023-06-07 04:02
array.elc
26.08
KB
-rw-r--r--
2023-06-07 04:02
autoarg.elc
5.92
KB
-rw-r--r--
2023-06-07 04:02
autoinsert.elc
11.59
KB
-rw-r--r--
2023-06-07 04:02
autorevert.elc
17.96
KB
-rw-r--r--
2023-06-07 04:02
avoid.elc
11.37
KB
-rw-r--r--
2023-06-07 04:02
battery.elc
19.36
KB
-rw-r--r--
2023-06-07 04:02
bindings.elc
38.45
KB
-rw-r--r--
2023-06-07 04:18
bookmark.elc
65.98
KB
-rw-r--r--
2023-06-07 04:02
bs.elc
49.12
KB
-rw-r--r--
2023-06-07 04:02
buff-menu.elc
25.26
KB
-rw-r--r--
2023-06-07 04:19
button.elc
13.22
KB
-rw-r--r--
2023-06-07 04:18
calculator.elc
50.38
KB
-rw-r--r--
2023-06-07 04:02
case-table.elc
4.7
KB
-rw-r--r--
2023-06-07 04:18
cdl.elc
1.2
KB
-rw-r--r--
2023-06-07 04:02
chistory.elc
6.03
KB
-rw-r--r--
2023-06-07 04:02
cmuscheme.elc
18.25
KB
-rw-r--r--
2023-06-07 04:02
color.elc
11.98
KB
-rw-r--r--
2023-06-07 04:02
comint.elc
111.01
KB
-rw-r--r--
2023-06-07 04:02
completion.elc
42.08
KB
-rw-r--r--
2023-06-07 04:02
composite.elc
25.33
KB
-rw-r--r--
2023-06-07 04:18
cus-dep.elc
4.88
KB
-rw-r--r--
2023-06-07 04:02
cus-edit.elc
135.22
KB
-rw-r--r--
2023-06-07 04:02
cus-face.elc
11.21
KB
-rw-r--r--
2023-06-07 04:18
cus-load.el
72.07
KB
-rw-r--r--
2023-06-07 04:16
cus-start.elc
15.41
KB
-rw-r--r--
2023-06-07 04:18
cus-theme.elc
25.64
KB
-rw-r--r--
2023-06-07 04:02
custom.elc
43.88
KB
-rw-r--r--
2023-06-07 04:18
dabbrev.elc
22.38
KB
-rw-r--r--
2023-06-07 04:02
delim-col.elc
8.07
KB
-rw-r--r--
2023-06-07 04:02
delsel.elc
6.44
KB
-rw-r--r--
2023-06-07 04:02
descr-text.elc
23.76
KB
-rw-r--r--
2023-06-07 04:02
desktop.elc
34.73
KB
-rw-r--r--
2023-06-07 04:02
dframe.elc
21.42
KB
-rw-r--r--
2023-06-07 04:02
dired-aux.elc
73.91
KB
-rw-r--r--
2023-06-07 04:02
dired-x.elc
43.31
KB
-rw-r--r--
2023-06-07 04:02
dired.elc
129.27
KB
-rw-r--r--
2023-06-07 04:02
dirtrack.elc
7.39
KB
-rw-r--r--
2023-06-07 04:02
disp-table.elc
9.09
KB
-rw-r--r--
2023-06-07 04:19
dnd.elc
7.29
KB
-rw-r--r--
2023-06-07 04:19
doc-view.elc
47.2
KB
-rw-r--r--
2023-06-07 04:02
dos-fns.elc
6.31
KB
-rw-r--r--
2023-06-07 04:19
dos-vars.elc
1.2
KB
-rw-r--r--
2023-06-07 04:19
dos-w32.elc
11.18
KB
-rw-r--r--
2023-06-07 04:19
double.elc
3.99
KB
-rw-r--r--
2023-06-07 04:02
dynamic-setting.elc
2.23
KB
-rw-r--r--
2023-06-07 04:19
ebuff-menu.elc
10.74
KB
-rw-r--r--
2023-06-07 04:02
echistory.elc
4.94
KB
-rw-r--r--
2023-06-07 04:02
edmacro.elc
20.48
KB
-rw-r--r--
2023-06-07 04:02
ehelp.elc
11.7
KB
-rw-r--r--
2023-06-07 04:02
electric.elc
11.97
KB
-rw-r--r--
2023-06-07 04:02
elide-head.elc
2.8
KB
-rw-r--r--
2023-06-07 04:02
emacs-lock.elc
9.19
KB
-rw-r--r--
2023-06-07 04:02
env.elc
5.47
KB
-rw-r--r--
2023-06-07 04:18
epa-dired.elc
1.78
KB
-rw-r--r--
2023-06-07 04:02
epa-file.elc
8.19
KB
-rw-r--r--
2023-06-07 04:02
epa-hook.elc
4.46
KB
-rw-r--r--
2023-06-07 04:18
epa-mail.elc
7.7
KB
-rw-r--r--
2023-06-07 04:02
epa.elc
34.21
KB
-rw-r--r--
2023-06-07 04:02
epg-config.elc
3.89
KB
-rw-r--r--
2023-06-07 04:02
epg.elc
88.76
KB
-rw-r--r--
2023-06-07 04:02
expand.elc
9.24
KB
-rw-r--r--
2023-06-07 04:03
ezimage.elc
9.91
KB
-rw-r--r--
2023-06-07 04:03
face-remap.elc
15
KB
-rw-r--r--
2023-06-07 04:03
facemenu.elc
26.49
KB
-rw-r--r--
2023-06-07 04:19
faces.elc
80.49
KB
-rw-r--r--
2023-06-07 04:18
ffap.elc
47.01
KB
-rw-r--r--
2023-06-07 04:03
filecache.elc
15.38
KB
-rw-r--r--
2023-06-07 04:03
files-x.elc
12.22
KB
-rw-r--r--
2023-06-07 04:03
files.elc
193.24
KB
-rw-r--r--
2023-06-07 04:18
filesets.elc
71.89
KB
-rw-r--r--
2023-06-07 04:03
find-cmd.elc
4.95
KB
-rw-r--r--
2023-06-07 04:03
find-dired.elc
8.27
KB
-rw-r--r--
2023-06-07 04:03
find-file.elc
18.12
KB
-rw-r--r--
2023-06-07 04:03
find-lisp.elc
7.35
KB
-rw-r--r--
2023-06-07 04:03
finder-inf.el
37.71
KB
-rw-r--r--
2023-06-07 04:16
finder.elc
13.95
KB
-rw-r--r--
2023-06-07 04:03
flow-ctrl.elc
2.38
KB
-rw-r--r--
2023-06-07 04:03
foldout.elc
7.42
KB
-rw-r--r--
2023-06-07 04:03
follow.elc
29.11
KB
-rw-r--r--
2023-06-07 04:03
font-core.elc
12.04
KB
-rw-r--r--
2023-06-07 04:19
font-lock.elc
62.75
KB
-rw-r--r--
2023-06-07 04:19
format-spec.elc
1.92
KB
-rw-r--r--
2023-06-07 04:03
format.elc
27.65
KB
-rw-r--r--
2023-06-07 04:18
forms.elc
35.14
KB
-rw-r--r--
2023-06-07 04:03
frame.elc
49.73
KB
-rw-r--r--
2023-06-07 04:19
fringe.elc
8.81
KB
-rw-r--r--
2023-06-07 04:19
generic-x.elc
43.94
KB
-rw-r--r--
2023-06-07 04:03
gs.elc
3.87
KB
-rw-r--r--
2023-06-07 04:03
help-at-pt.elc
11.21
KB
-rw-r--r--
2023-06-07 04:03
help-fns.elc
32.37
KB
-rw-r--r--
2023-06-07 04:03
help-macro.elc
4.42
KB
-rw-r--r--
2023-06-07 04:03
help-mode.elc
23.45
KB
-rw-r--r--
2023-06-07 04:03
help.elc
39.42
KB
-rw-r--r--
2023-06-07 04:18
hex-util.elc
1.42
KB
-rw-r--r--
2023-06-07 04:03
hexl.elc
33.06
KB
-rw-r--r--
2023-06-07 04:03
hfy-cmap.elc
24.87
KB
-rw-r--r--
2023-06-07 04:03
hi-lock.elc
23.53
KB
-rw-r--r--
2023-06-07 04:03
hilit-chg.elc
27.9
KB
-rw-r--r--
2023-06-07 04:03
hippie-exp.elc
22.68
KB
-rw-r--r--
2023-06-07 04:03
hl-line.elc
8.23
KB
-rw-r--r--
2023-06-07 04:03
htmlfontify.el.htmlfontify-command-injection-vulnerability
101.78
KB
-rw-r--r--
2013-01-01 15:37
htmlfontify.elc
66.45
KB
-rw-r--r--
2023-06-07 04:03
ibuf-ext.elc
55.96
KB
-rw-r--r--
2023-06-07 04:03
ibuf-macs.elc
11.32
KB
-rw-r--r--
2023-06-07 04:03
ibuffer.elc
101.47
KB
-rw-r--r--
2023-06-07 04:03
icomplete.elc
10.18
KB
-rw-r--r--
2023-06-07 04:03
ido.elc
113.4
KB
-rw-r--r--
2023-06-07 04:03
ielm.elc
18.26
KB
-rw-r--r--
2023-06-07 04:03
iimage.elc
4.6
KB
-rw-r--r--
2023-06-07 04:03
image-dired.elc
84.38
KB
-rw-r--r--
2023-06-07 04:03
image-file.elc
6.05
KB
-rw-r--r--
2023-06-07 04:03
image-mode.elc
23.73
KB
-rw-r--r--
2023-06-07 04:03
image.elc
24.66
KB
-rw-r--r--
2023-06-07 04:19
imenu.elc
26.35
KB
-rw-r--r--
2023-06-07 04:03
indent.elc
18.37
KB
-rw-r--r--
2023-06-07 04:19
info-look.elc
27.92
KB
-rw-r--r--
2023-06-07 04:03
info-xref.elc
16.12
KB
-rw-r--r--
2023-06-07 04:03
info.elc
138.16
KB
-rw-r--r--
2023-06-07 04:03
informat.elc
9.99
KB
-rw-r--r--
2023-06-07 04:03
isearch.elc
98.16
KB
-rw-r--r--
2023-06-07 04:19
isearchb.elc
4.68
KB
-rw-r--r--
2023-06-07 04:03
iswitchb.elc
31.48
KB
-rw-r--r--
2023-06-07 04:03
jit-lock.elc
17.68
KB
-rw-r--r--
2023-06-07 04:19
jka-cmpr-hook.el
14.3
KB
-rw-r--r--
2013-01-01 15:37
jka-cmpr-hook.elc
12.4
KB
-rw-r--r--
2023-06-07 04:18
jka-compr.el
24.25
KB
-rw-r--r--
2013-01-01 15:37
jka-compr.elc
12.43
KB
-rw-r--r--
2023-06-07 04:03
json.elc
13.49
KB
-rw-r--r--
2023-06-07 04:03
kermit.elc
2.9
KB
-rw-r--r--
2023-06-07 04:03
kmacro.elc
30.69
KB
-rw-r--r--
2023-06-07 04:03
ldefs-boot.el
1.16
MB
-rw-r--r--
2013-03-04 22:54
linum.elc
9.48
KB
-rw-r--r--
2023-06-07 04:03
loaddefs.el
1.16
MB
-rw-r--r--
2023-06-07 04:19
loadhist.elc
8.98
KB
-rw-r--r--
2023-06-07 04:03
loadup.el
14.09
KB
-rw-r--r--
2013-01-01 15:37
locate.elc
17.66
KB
-rw-r--r--
2023-06-07 04:03
longlines.elc
14.81
KB
-rw-r--r--
2023-06-07 04:03
lpr.elc
9.23
KB
-rw-r--r--
2023-06-07 04:03
ls-lisp.elc
18.79
KB
-rw-r--r--
2023-06-07 04:19
macros.elc
7.26
KB
-rw-r--r--
2023-06-07 04:03
makesum.elc
2.51
KB
-rw-r--r--
2023-06-07 04:03
man.elc
44.16
KB
-rw-r--r--
2023-06-07 04:03
master.elc
4.42
KB
-rw-r--r--
2023-06-07 04:03
mb-depth.elc
3.09
KB
-rw-r--r--
2023-06-07 04:03
md4.elc
8.09
KB
-rw-r--r--
2023-06-07 04:03
menu-bar.elc
71.76
KB
-rw-r--r--
2023-06-07 04:19
midnight.elc
8.52
KB
-rw-r--r--
2023-06-07 04:03
minibuf-eldef.elc
6.11
KB
-rw-r--r--
2023-06-07 04:03
minibuffer.elc
83.45
KB
-rw-r--r--
2023-06-07 04:18
misc.elc
5.53
KB
-rw-r--r--
2023-06-07 04:03
misearch.elc
11.59
KB
-rw-r--r--
2023-06-07 04:03
mouse-copy.elc
3.86
KB
-rw-r--r--
2023-06-07 04:03
mouse-drag.elc
6.57
KB
-rw-r--r--
2023-06-07 04:03
mouse.elc
53.62
KB
-rw-r--r--
2023-06-07 04:19
mpc.elc
78.45
KB
-rw-r--r--
2023-06-07 04:03
msb.elc
26.64
KB
-rw-r--r--
2023-06-07 04:03
mwheel.elc
9.61
KB
-rw-r--r--
2023-06-07 04:19
newcomment.elc
35.2
KB
-rw-r--r--
2023-06-07 04:19
notifications.elc
12.25
KB
-rw-r--r--
2023-06-07 04:03
novice.elc
4.75
KB
-rw-r--r--
2023-06-07 04:03
outline.elc
34.97
KB
-rw-r--r--
2023-06-07 04:03
paren.elc
6.48
KB
-rw-r--r--
2023-06-07 04:03
password-cache.elc
3.59
KB
-rw-r--r--
2023-06-07 04:03
pcmpl-cvs.elc
6.33
KB
-rw-r--r--
2023-06-07 04:03
pcmpl-gnu.elc
11.17
KB
-rw-r--r--
2023-06-07 04:03
pcmpl-linux.elc
3.38
KB
-rw-r--r--
2023-06-07 04:03
pcmpl-rpm.elc
11
KB
-rw-r--r--
2023-06-07 04:03
pcmpl-unix.elc
7.7
KB
-rw-r--r--
2023-06-07 04:03
pcomplete.elc
36.63
KB
-rw-r--r--
2023-06-07 04:03
printing.elc
157.61
KB
-rw-r--r--
2023-06-07 04:03
proced.elc
63.27
KB
-rw-r--r--
2023-06-07 04:03
profiler.elc
37.19
KB
-rw-r--r--
2023-06-07 04:03
ps-bdf.elc
13.15
KB
-rw-r--r--
2023-06-07 04:03
ps-def.elc
3.01
KB
-rw-r--r--
2023-06-07 04:03
ps-mule.elc
34.8
KB
-rw-r--r--
2023-06-07 04:03
ps-print.elc
140.25
KB
-rw-r--r--
2023-06-07 04:03
ps-samp.elc
5.43
KB
-rw-r--r--
2023-06-07 04:03
recentf.elc
48.71
KB
-rw-r--r--
2023-06-07 04:03
rect.elc
11.74
KB
-rw-r--r--
2023-06-07 04:03
register.elc
20.55
KB
-rw-r--r--
2023-06-07 04:19
repeat.elc
5.24
KB
-rw-r--r--
2023-06-07 04:03
replace.elc
66.96
KB
-rw-r--r--
2023-06-07 04:19
reposition.elc
2.82
KB
-rw-r--r--
2023-06-07 04:03
reveal.elc
7.01
KB
-rw-r--r--
2023-06-07 04:03
rfn-eshadow.elc
6.86
KB
-rw-r--r--
2023-06-07 04:19
rot13.elc
2.54
KB
-rw-r--r--
2023-06-07 04:03
ruler-mode.elc
20.12
KB
-rw-r--r--
2023-06-07 04:03
savehist.elc
11.11
KB
-rw-r--r--
2023-06-07 04:03
saveplace.elc
7.92
KB
-rw-r--r--
2023-06-07 04:03
sb-image.elc
2.89
KB
-rw-r--r--
2023-06-07 04:03
scroll-all.elc
4.04
KB
-rw-r--r--
2023-06-07 04:03
scroll-bar.elc
10.34
KB
-rw-r--r--
2023-06-07 04:19
scroll-lock.elc
4.68
KB
-rw-r--r--
2023-06-07 04:03
select.elc
11.17
KB
-rw-r--r--
2023-06-07 04:19
server.elc
48.81
KB
-rw-r--r--
2023-06-07 04:03
ses.elc
101.59
KB
-rw-r--r--
2023-06-07 04:03
shadowfile.elc
22.26
KB
-rw-r--r--
2023-06-07 04:03
shell.elc
39.68
KB
-rw-r--r--
2023-06-07 04:03
simple.elc
229.5
KB
-rw-r--r--
2023-06-07 04:18
skeleton.elc
16.16
KB
-rw-r--r--
2023-06-07 04:03
sort.elc
13.16
KB
-rw-r--r--
2023-06-07 04:03
soundex.elc
1.29
KB
-rw-r--r--
2023-06-07 04:03
speedbar.elc
116.63
KB
-rw-r--r--
2023-06-07 04:03
startup.elc
63.41
KB
-rw-r--r--
2023-06-07 04:18
strokes.elc
43.91
KB
-rw-r--r--
2023-06-07 04:03
subdirs.el
409
B
-rw-r--r--
2023-06-07 04:19
subr.elc
139.35
KB
-rw-r--r--
2023-06-07 04:18
t-mouse.elc
3.31
KB
-rw-r--r--
2023-06-07 04:03
tabify.elc
1.96
KB
-rw-r--r--
2023-06-07 04:03
talk.elc
3.11
KB
-rw-r--r--
2023-06-07 04:03
tar-mode.elc
52.65
KB
-rw-r--r--
2023-06-07 04:03
tempo.elc
19.35
KB
-rw-r--r--
2023-06-07 04:03
term.elc
101.1
KB
-rw-r--r--
2023-06-07 04:03
terminal.elc
30.78
KB
-rw-r--r--
2023-06-07 04:03
thingatpt.elc
12.61
KB
-rw-r--r--
2023-06-07 04:03
thumbs.elc
26.94
KB
-rw-r--r--
2023-06-07 04:03
time-stamp.elc
18.8
KB
-rw-r--r--
2023-06-07 04:03
time.elc
20.34
KB
-rw-r--r--
2023-06-07 04:03
timezone.elc
11.13
KB
-rw-r--r--
2023-06-07 04:03
tmm.elc
12.73
KB
-rw-r--r--
2023-06-07 04:03
tool-bar.elc
9.35
KB
-rw-r--r--
2023-06-07 04:19
tooltip.elc
12.19
KB
-rw-r--r--
2023-06-07 04:19
tree-widget.elc
20.43
KB
-rw-r--r--
2023-06-07 04:03
tutorial.elc
22.55
KB
-rw-r--r--
2023-06-07 04:03
type-break.elc
38.3
KB
-rw-r--r--
2023-06-07 04:03
uniquify.elc
18.52
KB
-rw-r--r--
2023-06-07 04:03
userlock.elc
5.21
KB
-rw-r--r--
2023-06-07 04:03
vcursor.elc
23.53
KB
-rw-r--r--
2023-06-07 04:03
version.elc
5.52
KB
-rw-r--r--
2023-06-07 04:18
view.elc
34.38
KB
-rw-r--r--
2023-06-07 04:03
vt-control.elc
2.13
KB
-rw-r--r--
2023-06-07 04:03
vt100-led.elc
1.47
KB
-rw-r--r--
2023-06-07 04:03
w32-common-fns.elc
3.72
KB
-rw-r--r--
2023-06-07 04:03
w32-fns.elc
10.26
KB
-rw-r--r--
2023-06-07 04:19
w32-vars.elc
5.17
KB
-rw-r--r--
2023-06-07 04:19
wdired.elc
22.84
KB
-rw-r--r--
2023-06-07 04:03
whitespace.elc
65.65
KB
-rw-r--r--
2023-06-07 04:03
wid-browse.elc
8.14
KB
-rw-r--r--
2023-06-07 04:03
wid-edit.elc
104.79
KB
-rw-r--r--
2023-06-07 04:03
widget.elc
1.33
KB
-rw-r--r--
2023-06-07 04:18
windmove.elc
9.42
KB
-rw-r--r--
2023-06-07 04:03
window.elc
196.08
KB
-rw-r--r--
2023-06-07 04:19
winner.elc
11.41
KB
-rw-r--r--
2023-06-07 04:03
woman.elc
108.03
KB
-rw-r--r--
2023-06-07 04:03
x-dnd.elc
19.55
KB
-rw-r--r--
2023-06-07 04:19
xml.elc
25.16
KB
-rw-r--r--
2023-06-07 04:03
xt-mouse.elc
9.7
KB
-rw-r--r--
2023-06-07 04:03
Save
Rename
;ELC ;;; Compiled by mockbuild@buildfarm06.corp.cloudlinux.com on Wed Jun 7 08:03:10 2023 ;;; from file /builddir/build/BUILD/emacs-24.3/lisp/hilit-chg.el ;;; in Emacs version 24.3.1 ;;; with all optimizations. ;;; This file uses dynamic docstrings, first added in Emacs 19.29. ;;; This file does not contain utf-8 non-ASCII characters, ;;; and so can be loaded in Emacs versions earlier than 23. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\302\303!\210\304\305\306\307\310\311\312\313&\210\314\305\315\316\312\305%\210\317\320\321\305#\210\317\320\322\323\324!\206' \325#\210\314\326\327\330\312\305%\210\317\331\321\326#\210\317\331\322\323\324!\206A \325#\210\332\333\334\306#\210\335\306\211\203o @\333N\203h \334N\204h \317\334\333N#\210 A\211\204Q *\336\333\334\324#\210\337\334\340\341\342\343\312\305&\210\332\344\345\306#\210\335\306\211\203\255 @\344N\203\246 \345N\204\246 \317\345\344N#\210 A\211\204\217 *\336\344\345\346#\210\337\345\325\347\342\350\312\305&\210\332\351\352\306#\210\335\306\211\203\353 @\351N\203\344 \352N\204\344 \317\352\351N#\210 A\211\204\315 *\336\351\352\346#\210\337\352\353\354\342\355\312\305&\210\332\356\357\306#\210\335\306\211\203) @\356N\203\"\357N\204\"\317\357\356N#\210 A\211\204 *\336\356\357\346#\210\337\357\360\361\342\362\312\305&\210\337\363\325\364\342\365\312\305&\210\337\366\306\367\342\350\312\305&\207" [prop --dolist-tail-- require wid-edit custom-declare-group highlight-changes nil "Highlight Changes mode." :version "20.4" :group faces custom-declare-face ((((min-colors 88) (class color)) (:foreground "red1")) (((class color)) (:foreground "red")) (t (:inverse-video t))) "Face used for highlighting changes." put highlight-changes-face face-alias obsolete-face purecopy "22.1" t highlight-changes-delete ((((min-colors 88) (class color)) (:foreground "red1" :underline t)) (((class color)) (:foreground "red" :underline t)) (t (:inverse-video t))) "Face used for highlighting deletions." highlight-changes-delete-face defvaralias highlight-changes-colours highlight-changes-colors (saved-value saved-variable-comment) make-obsolete-variable custom-declare-variable (if (eq (frame-parameter nil 'background-mode) 'light) '("magenta" "blue" "darkgreen" "chocolate" "sienna4" "NavyBlue") '("yellow" "magenta" "blue" "maroon" "firebrick" "green4" "DarkOrchid")) "Colors used by `highlight-changes-rotate-faces'.\nThe newest rotated change will be displayed in the first element of this list,\nthe next older will be in the second element etc.\n\nThis list is used if `highlight-changes-face-list' is nil, otherwise that\nvariable overrides this list. If you only care about foreground\ncolors then use this, if you want fancier faces then set\n`highlight-changes-face-list'." :type (repeat color) highlight-changes-initial-state highlight-changes-visibility-initial-state "23.1" "Controls whether changes are initially visible in Highlight Changes mode.\n\nThis controls the initial value of `highlight-changes-visible-mode'.\nWhen a buffer is in Highlight Changes mode the function\n`highlight-changes-visible-mode' is used to toggle the mode on or off." boolean highlight-changes-active-string highlight-changes-visible-string " +Chg" "The string used when in Highlight Changes mode and changes are visible.\nThis should be set to nil if no indication is desired, or to\na string with a leading space." (choice string (const :tag "None" nil)) highlight-changes-passive-string highlight-changes-invisible-string " -Chg" "The string used when in Highlight Changes mode and changes are hidden.\nThis should be set to nil if no indication is desired, or to\na string with a leading space." (choice string (const :tag "None" nil)) highlight-changes-global-modes "Determine whether a buffer is suitable for global Highlight Changes mode.\n\nA function means call that function to decide: if it returns non-nil,\nthe buffer is suitable.\n\nA list means the elements are major modes suitable for Highlight\nChanges mode, or a list whose first element is `not' followed by major\nmodes which are not suitable.\n\nA value of t means the buffer is suitable if it is visiting a file and\nits name does not begin with ` ' or `*'.\n\nA value of nil means no buffers are suitable for `global-highlight-changes-mode'\n(effectively disabling the mode).\n\nExample:\n (c-mode c++-mode)\nmeans that Highlight Changes mode is turned on for buffers in C and C++\nmodes only." (choice (const :tag "all non-special buffers visiting files" t) (set :menu-tag "specific modes" :tag "modes" :value (not) (const :tag "All except these" not) (repeat :tag "Modes" :inline t (symbol :tag "mode"))) (function :menu-tag "determined by function" :value buffer-file-name) (const :tag "none" nil)) highlight-changes-global-changes-existing-buffers "If non-nil, toggling global Highlight Changes mode affects existing buffers.\nNormally, `global-highlight-changes' affects only new buffers (to be\ncreated). However, if `highlight-changes-global-changes-existing-buffers'\nis non-nil, then turning on `global-highlight-changes' will turn on\nHighlight Changes mode in suitable buffers, and turning the mode off will\nremove it from existing buffers."] 9) (defvar hilit-chg-list nil) (defvar hilit-chg-string " ??") (make-variable-buffer-local 'hilit-chg-string) #@113 Non-nil if Highlight-Changes mode is enabled. Use the command `highlight-changes-mode' to change this variable. (defvar highlight-changes-mode nil (#$ . 5461)) (make-variable-buffer-local 'highlight-changes-mode) #@1007 Toggle highlighting changes in this buffer (Highlight Changes mode). With a prefix argument ARG, enable Highlight Changes mode if ARG is positive, and disable it otherwise. If called from Lisp, enable the mode if ARG is omitted or nil. When Highlight Changes is enabled, changes are marked with a text property. Normally they are displayed in a distinctive face, but command \[highlight-changes-visible-mode] can be used to toggles this on and off. Other functions for buffers in this mode include: \[highlight-changes-next-change] - move point to beginning of next change \[highlight-changes-previous-change] - move to beginning of previous change \[highlight-changes-remove-highlight] - remove the change face from the region \[highlight-changes-rotate-faces] - rotate different "ages" of changes through various faces. \[highlight-compare-with-file] - mark text as changed by comparing this buffer with the contents of a file \[highlight-compare-buffers] highlights differences between two buffers. (defalias 'highlight-changes-mode #[(&optional arg) "\305 \306=\203 \n?\202 \307 !\310V\311 \204$ \312\313!\203A \313 \203A \314=\2031 \f\2041 \n?\n\203; \315 \210\202E \316 \210\202E \317\320!\210\321\322\n\203O \323\202P \324\"\210\325\326!\203q \305 \203d \305 \232\203q \317\327\n\203n \330\202o \331\"\210)\332 \210\n\207" [#1=#:last-message arg highlight-changes-mode this-command highlight-changes-global-changes-existing-buffers current-message toggle prefix-numeric-value 0 display-color-p fboundp x-display-grayscale-p global-highlight-changes-mode hilit-chg-set hilit-chg-clear message "Highlight Changes mode requires color or grayscale display" run-hooks highlight-changes-mode-hook highlight-changes-mode-on-hook highlight-changes-mode-off-hook called-interactively-p any "Highlight-Changes mode %sabled" "en" "dis" force-mode-line-update] 3 (#$ . 5682) (list (or current-prefix-arg 'toggle))]) (byte-code "\301\302\303\304\300!\205\n \305\211%\207" [highlight-changes-mode-map add-minor-mode highlight-changes-mode hilit-chg-string boundp nil] 6) #@129 Non-nil if Highlight-Changes-Visible mode is enabled. Use the command `highlight-changes-visible-mode' to change this variable. (defvar highlight-changes-visible-mode t (#$ . 7766)) (make-variable-buffer-local 'highlight-changes-visible-mode) #@551 Toggle visibility of highlighting due to Highlight Changes mode. With a prefix argument ARG, enable Highlight Changes Visible mode if ARG is positive, and disable it otherwise. If called from Lisp, enable the mode if ARG is omitted or nil. Highlight Changes Visible mode only has an effect when Highlight Changes mode is on. When enabled, the changed text is displayed in a distinctive face. The default value can be customized with variable `highlight-changes-visibility-initial-state'. This command does not itself set highlight-changes mode. (defalias 'highlight-changes-visible-mode #[(&optional arg) "\303 \304=\203 \n?\202 \305 !\306V\307 \210\310\311\n\203! \312\202\" \313\"\210\314\315!\203C \303 \2036 \303 \232\203C \316\317\n\203@ \320\202A \321\"\210)\322 \210\n\207" [#1=#:last-message arg highlight-changes-visible-mode current-message toggle prefix-numeric-value 0 hilit-chg-update run-hooks highlight-changes-visible-mode-hook highlight-changes-visible-mode-on-hook highlight-changes-visible-mode-off-hook called-interactively-p any message "Highlight-Changes-Visible mode %sabled" "en" "dis" force-mode-line-update] 3 (#$ . 8016) (list (or current-prefix-arg 'toggle))]) (byte-code "\301\302\303\304\300!\205\n \303\211%\207" [highlight-changes-visible-mode-map add-minor-mode highlight-changes-visible-mode nil boundp] 6) (defalias 'hilit-chg-cust-fix-changes-face-list #[(w _wc &optional event) "\306!\307 \235\203c \310 ! G\311\211\211 \211 \203R @\312\313\314 \"! \f=\204@ \307=\203; \315\316\f\"\210\202@ \315 \f\"\210\317\fC\n\" SA\211\204 \n\306!\232\204b \320\n\"\210\321 \210-)\322\323\"\211 \205v \324\325$)\207" [w old-list new-list old-name new-name n widget-value default reverse nil intern format "highlight-changes-%d" copy-face highlight-changes append widget-value-set widget-setup widget-get :parent widget-apply :notify p parent event] 6]) #@429 A list of faces used when rotating changes. Normally the variable is initialized to nil and the list is created from `highlight-changes-colors' when needed. However, you can set this variable to any list of faces. You will have to do this if you want faces which don't just differ from the `highlight-changes' face by the foreground color. Otherwise, this list will be constructed when needed from `highlight-changes-colors'. (custom-declare-variable 'highlight-changes-face-list nil '(#$ . 9939) :type '(choice (repeat :notify hilit-chg-cust-fix-changes-face-list face) (const :tag "Derive from highlight-changes-colors" nil)) :group 'highlight-changes) #@211 Call function FUNC for each region used by Highlight Changes mode. If START-POSITION is nil, (point-min) is used. If END-POSITION is nil, (point-max) is used. FUNC is called with 3 params: PROPERTY START STOP. (defalias 'hilit-chg-map-changes #[(func &optional start-position end-position) "\206 e \206\n d\306\211 \211 \205< \fW\205< \307 \310\"\311 \f\310 $ \2035 \n \n\2063 \f#\210\n\211\204 \306,\207" [start-position end-position end prop limit start nil get-text-property hilit-chg text-property-not-all func] 6 (#$ . 10603)]) #@230 Display face information for Highlight Changes mode. An overlay from BEG to END containing a change face is added from the information in the text property of type `hilit-chg'. This is the opposite of `hilit-chg-hide-changes'. (defalias 'hilit-chg-display-changes #[(&optional beg end) "\302\303 #\207" [beg end hilit-chg-map-changes hilit-chg-make-ov] 4 (#$ . 11154)]) (defalias 'hilit-chg-make-ov #[(prop start end) "\204 \306\307!\210\310 \n\"\311=\203 \312\202 \235A@ \f\2035 \313 \304\f#\210\313 \314\315#\210\313 \316\315#\2029 \306\317\"*\207" [prop start end hilit-chg-list face ov error "hilit-chg-make-ov: prop is nil" make-overlay hilit-chg-delete highlight-changes-delete overlay-put evaporate t hilit-chg "hilit-chg-make-ov: no face for prop: %s"] 4]) #@221 Remove face information for Highlight Changes mode. The overlay containing the face is removed, but the text property containing the change information is retained. This is the opposite of `hilit-chg-display-changes'. (defalias 'hilit-chg-hide-changes #[(&optional beg end) "\206 e \206\n d\306 \n\"\307 \211 \205- @\310\f\311\"\203% \312\f!\210 A\211\204 \307,\207" [beg end limit start p --dolist-tail-- overlays-in nil overlay-get hilit-chg delete-overlay] 4 (#$ . 11938)]) #@156 Fix change overlays in region between BEG and END. Ensure the overlays agree with the changes as determined from the text properties of type `hilit-chg'. (defalias 'hilit-chg-fixup #[(beg end) "\302 \303\304$\210\305 \"\207" [beg end remove-overlays hilit-chg t hilit-chg-display-changes] 5 (#$ . 12432)]) #@75 Bind variables according to VARLIST and eval BODY restoring buffer state. (defalias 'highlight-save-buffer-state '(macro . #[(&rest body) "\302\303!\304\305B\306B\307 B\310\311BBF)\207" [modified body make-symbol "modified" let* ((buffer-modified-p)) ((inhibit-modification-hooks t) deactivate-mark buffer-file-name buffer-file-truename) progn unless ((restore-buffer-modified-p nil))] 6 (#$ . 12747)])) (byte-code "\300\301\302\303#\210\300\301\304\305#\207" [put highlight-save-buffer-state lisp-indent-function 0 edebug-form-spec t] 4) #@137 Remove the change face from the region between BEG and END. This allows you to manually remove highlighting from uninteresting changes. (defalias 'highlight-changes-remove-highlight #[(beg end) "\306 \307\310\211\310 \311 \312#\210\313 \"\210?\205 \314\310!-\207" [#1=#:modified inhibit-modification-hooks deactivate-mark buffer-file-name buffer-file-truename beg buffer-modified-p t nil remove-text-properties (hilit-chg nil) hilit-chg-fixup restore-buffer-modified-p end] 5 (#$ . 13296) "r"]) #@140 Record changes and optionally display them in a distinctive face. `hilit-chg-set' adds this function to the `after-change-functions' hook. (defalias 'hilit-chg-set-face-on-change #[(beg end leng-before &optional no-property-change) "\306 \307\216\310\311 \203 \f\205\226 \205\226 \312\"\202\226 \313 \314 \315\211 \315 U\203J \316V\203J \n\\d^\317\202m \320\311\"\317=\203m \214~\210\321\211T\311\211$\210 \203l \312T\"\210) \204{ \321\311 $\210 \204\204 \203\214 \322 #\210?\205\225 \323\315!-,\207" [save-match-data-internal type end-incr undo-in-progress highlight-changes-mode highlight-changes-visible-mode match-data ((byte-code "\301\302\"\207" [save-match-data-internal set-match-data evaporate] 3)) 1 hilit-chg hilit-chg-fixup buffer-modified-p t nil 0 hilit-chg-delete get-text-property put-text-property hilit-chg-make-ov restore-buffer-modified-p beg end #1=#:modified inhibit-modification-hooks deactivate-mark buffer-file-name buffer-file-truename leng-before no-property-change] 6 (#$ . 13808)]) #@62 Update a buffer's highlight changes when visibility changed. (defalias 'hilit-chg-update #[nil "\203 \206 \305 \207\f \206 \306 \207" [highlight-changes-visible-mode highlight-changes-visible-string hilit-chg-string buffer-read-only highlight-changes-invisible-string hilit-chg-display-changes hilit-chg-hide-changes] 1 (#$ . 14874)]) #@49 Turn on Highlight Changes mode for this buffer. (defalias 'hilit-chg-set #[nil "\303\304\305\306#\210\307 \210\306 \310 \210\311 \210\312\304\305\313\306$\207" [highlight-changes-mode highlight-changes-visibility-initial-state highlight-changes-visible-mode remove-hook after-change-functions hilit-chg-set-face-on-change t hilit-chg-make-list hilit-chg-update force-mode-line-update add-hook nil] 5 (#$ . 15223)]) #@91 Remove Highlight Changes mode for this buffer. This removes all saved change information. (defalias 'hilit-chg-clear #[nil "\203\n \306\307\310 \"\207\311\312\313\314#\210\315 \314\316\211 \316 \317 \210\320\321!\210 \204* \322\316!\210-\316\323 \207" [buffer-read-only #1=#:modified inhibit-modification-hooks deactivate-mark buffer-file-name buffer-file-truename message "Cannot remove highlighting from read-only mode buffer %s" buffer-name remove-hook after-change-functions hilit-chg-set-face-on-change t buffer-modified-p nil hilit-chg-hide-changes hilit-chg-map-changes #[(_prop start stop) "\302 \303#\207" [start stop remove-text-properties (hilit-chg nil)] 4] restore-buffer-modified-p force-mode-line-update highlight-changes-mode] 5 (#$ . 15646)]) #@73 Move to the beginning of the next change, if in Highlight Changes mode. (defalias 'highlight-changes-next-change #[nil "\203- `\303\304`\305\"\211\203 \306`\305\"\n\203 \306\n\305\"\n\203( \nb\202+ \307\310!*\207\307\311!\207" [highlight-changes-mode prop start nil get-text-property hilit-chg next-single-property-change message "no next change" "This buffer is not in Highlight Changes mode."] 4 (#$ . 16419) nil]) #@77 Move to the beginning of the previous change, if in Highlight Changes mode. (defalias 'highlight-changes-previous-change #[nil "\203F `\303o\204 \304`S\305\" \203 \306`\305\"\n\203$ \306\n\305\"\n\2038 \306\n\305\"\2067 \304e\305\"\2057 e\n\203A \nb\202D \307\310!*\207\307\311!\207" [highlight-changes-mode prop start nil get-text-property hilit-chg previous-single-property-change message "no previous change" "This buffer is not in Highlight Changes mode."] 3 (#$ . 16850) nil]) #@63 Construct `hilit-chg-list' and `highlight-changes-face-list'. (defalias 'hilit-chg-make-list #[(&optional force) "\203 \2036 \n\306\307 \307 \2035 \310\311\312\f\"!\313\314 \"\210\315 @\"\210\316 C\" A\fT\202 +\317\314D\306\307\211 \203i \310\311\320\f\"! @\316D\" A\fT\202E \316D\"\211,\207" [highlight-changes-face-list force highlight-changes-colors name n p 1 nil intern format "highlight-changes-%d" copy-face highlight-changes set-face-foreground append hilit-chg "change-%d" hilit-chg-list last-face last-category] 4 (#$ . 17347)]) #@59 Increment (age) the Highlight Changes mode text property. (defalias 'hilit-chg-bump-change #[(prop start end) "\305 \306=\203 \307\n8\202 \307 \n\2358 \203\" \310 \f\311$\202( \312\313 \f $)\207" [new-prop prop hilit-chg-list start end nil hilit-chg-delete 2 put-text-property hilit-chg message "%d-%d unknown property %s not changed"] 5 (#$ . 17936)]) #@601 Rotate the faces if in Highlight Changes mode and the changes are visible. Current changes are displayed in the face described by the first element of `highlight-changes-face-list', one level older changes are shown in face described by the second element, and so on. Very old changes remain shown in the last face in the list. You can automatically rotate colors when the buffer is saved by adding this function to `write-file-functions' as a buffer-local value. To do this, eval the following in the buffer to be saved: (add-hook 'write-file-functions 'highlight-changes-rotate-faces nil t) (defalias 'highlight-changes-rotate-faces #[nil "\203 \203 \304 \305\306\216\307 \210\310 \210\311\312!\210\313 \210+\314\207" [highlight-changes-mode highlight-changes-visible-mode inhibit-modification-hooks modified buffer-modified-p t ((byte-code "\204 \301\302!\210\302\207" [modified restore-buffer-modified-p nil] 2)) hilit-chg-make-list hilit-chg-hide-changes hilit-chg-map-changes hilit-chg-bump-change hilit-chg-display-changes nil] 2 (#$ . 18302) nil]) #@138 Get differences between two buffers and set highlight changes. Both buffers are done unless optional parameter MARKUP-A-ONLY is non-nil. (defalias 'highlight-markup-buffers #[(buf-a file-a buf-b file-b &optional markup-a-only) "\306\307!\210\310 \311\216\312\211\312\211 \312\211 \312\211 \312 \313 ! \313 ! r q\210 ) !r q\210 ) \"\312\211 # $%\203n \203n \314\315\316 \"!\203k r q\210\317 \210\313 ! )\202n \312%%\204} \320 \312\"\211%#&\203\246 \203\246 \314\315\316 \"!\203\243 r q\210\317 \210\313 ! )\202\246 \312&&\204\265 \320 \312\"\211&$ q\210\321\322!\210'\204\314 r q\210\321\322!\210)\323 % &$\211@ A@\324 \210\n\2031\n@@\n@A@ @@ @A@ \fZZ q\210\325\f !$\210'\204(r q\210\325\"$\210)\nA A\202\341 \204@r q\210\326\312!\210) \204Or q\210\326\312!\210)#\203Y\327#!\210$\205b\327$!.\207" [#1=#:wconfig change-info change-a change-b a-start a-end require ediff-util current-window-configuration ((set-window-configuration #1#)) nil buffer-modified-p y-or-n-p format "Save buffer %s? " save-buffer ediff-make-temp-file highlight-changes-mode 1 hilit-chg-get-diff-info hilit-chg-make-list hilit-chg-set-face-on-change set-buffer-modified-p delete-file len-a b-start b-end len-b buf-a bufa-modified buf-b bufb-modified buffer-read-only buf-a-read-only buf-b-read-only temp-a temp-b file-a file-b markup-a-only] 6 (#$ . 19380)]) #@505 Compare two buffers and highlight the differences. The default is the current buffer and the one in the next window. If either buffer is modified and is visiting a file, you are prompted to save the file. Unless the buffer is unmodified and visiting a file, the buffer is written to a temporary file for comparison. If a buffer is read-only, differences will be highlighted but no property changes are made, so \[highlight-changes-next-change] and \[highlight-changes-previous-change] will not work. (defalias 'highlight-compare-buffers #[(buf-a buf-b) "\304!\304 !\305 \n$*\207" [buf-a buf-b file-b file-a buffer-file-name highlight-markup-buffers] 5 (#$ . 20817) (list (get-buffer (read-buffer "buffer-a " (current-buffer) t)) (get-buffer (read-buffer "buffer-b " (window-buffer (next-window (selected-window))) t)))]) #@542 Compare this buffer with a file, and highlight differences. If the buffer has a backup filename, it is used as the default when this function is called interactively. If the current buffer is visiting the file being compared against, it also will have its differences highlighted. Otherwise, the file is read in temporarily but the buffer is deleted. If the buffer is read-only, differences will be highlighted but no property changes are made, so \[highlight-changes-next-change] and \[highlight-changes-previous-change] will not work. (defalias 'highlight-compare-with-file #[(file-b) "p\305 \306\n!\211\206 \307\n! \310 \f\n ?%\210 ?\205\" \311\f!,\207" [buf-a file-a file-b existing-buf buf-b buffer-file-name get-file-buffer find-file-noselect highlight-markup-buffers kill-buffer] 7 (#$ . 21654) (let ((file buffer-file-name) (file-name nil) (file-dir nil)) (and file (setq file-name (file-name-nondirectory file) file-dir (file-name-directory file))) (setq file-name (make-backup-file-name file-name)) (if (file-exists-p file-name) nil (setq file-name nil)) (list (read-file-name "Find to compare with: " file-dir nil nil file-name)))]) (defalias 'hilit-chg-get-diff-info #[(buf-a file-a buf-b file-b) "\306\211\211\307 \f \306\211\310\311\312BC&\210\n\2034 \313\n!\2034 \314\313\n!!\2034 r\nq\210\315\306!\210)\202@ \316=\204@ \317!\210 +D\207" [hilit-y hilit-x hilit-e buf-a file-a buf-b nil ediff-setup hilit-chg-get-diff-list-hk ediff-job-name something get-buffer buffer-name ediff-really-quit ediff-quit error file-b this-command ediff-KILLED-VITAL-BUFFER] 10]) (defalias 'hilit-chg-get-diff-list-hk #[nil "p\306\307\211\211\211\211\211 \307\211W\205\344 \310!\210\311 \312\"A*JH\313H\211\203G \314\f\307\"\202` \311 \312\"A*JH\211\306\234C\n \203\200 \315 @!\316 @!D A\314C\"\202b \317 \312\"A*JH\313H\211\203\242 \314 \307\"\202\273 \317 \312\"A*JH\211\306\234C \203\333 \315 @!\316 @!D A\314C\"\202\275 T\211\202 .\207" [hilit-e b a vb va p 0 nil ediff-make-fine-diffs A assoc 1 append overlay-start overlay-end B extent n hilit-x hilit-y ediff-number-of-differences ediff-difference-vector-alist alist buf-type] 8]) (defvar highlight-changes-mode-major-mode nil) (byte-code "\300\301!\210\302\303\304\305\306\307\310\311\312\313\314\315& \207" [make-variable-buffer-local highlight-changes-mode-major-mode custom-declare-variable global-highlight-changes-mode nil "Non-nil if Global-Highlight-Changes mode is enabled.\nSee the command `global-highlight-changes-mode' for a description of this minor mode.\nSetting this variable directly does not take effect;\neither customize it (see the info node `Easy Customization')\nor call the function `global-highlight-changes-mode'." :set custom-set-minor-mode :initialize custom-initialize-default :group highlight-changes :type boolean] 12) #@387 Toggle Highlight-Changes mode in all buffers. With prefix ARG, enable Global-Highlight-Changes mode if ARG is positive; otherwise, disable it. If called from Lisp, enable the mode if ARG is omitted or nil. Highlight-Changes mode is enabled in all buffers where `highlight-changes-mode-turn-on' would do it. See `highlight-changes-mode' for more information on Highlight-Changes mode. (defalias 'global-highlight-changes-mode #[(&optional arg) "\306 \307=\203 \n?\202 \310 !\311V\211\203/ \312\313\314\"\210\312\315\314\"\210\312\316\317\"\210\312\320\321\"\210\202C \322\313\314\"\210\322\315\314\"\210\322\316\317\"\210\322\320\321\"\210\323 \324\211 \203m \f@r q\210\n\203] \325 \210\202e \203e \305\326!\210)\fA\211\204L *\327\330\n\203x \331\202y \332\"\210\333\334!\203\236 \335\302!\210\306 \203\221 \306 \232\203\236 \336\337\n\203\233 \340\202\234 \341\"\210)\342 \210\n\207" [#1=#:last-message arg global-highlight-changes-mode buf --dolist-tail-- highlight-changes-mode current-message toggle prefix-numeric-value 0 add-hook after-change-major-mode-hook global-highlight-changes-mode-enable-in-buffers change-major-mode-after-body-hook find-file-hook global-highlight-changes-mode-check-buffers change-major-mode-hook global-highlight-changes-mode-cmhh remove-hook buffer-list nil highlight-changes-mode-turn-on -1 run-hooks global-highlight-changes-mode-hook global-highlight-changes-mode-on-hook global-highlight-changes-mode-off-hook called-interactively-p any customize-mark-as-set message "Global-Highlight-Changes mode %sabled" "en" "dis" force-mode-line-update] 4 (#$ . 24582) (list (or current-prefix-arg 'toggle))]) (byte-code "\301\302\303\304\300!\205\n \303\211%\207" [global-highlight-changes-mode-map add-minor-mode global-highlight-changes-mode nil boundp] 6) (defvar global-highlight-changes-mode-buffers nil) (defalias 'global-highlight-changes-mode-enable-in-buffers #[nil "\306\211\2059 \n@\307 !\2031 r q\210 \f=\2040 \203+ \305\310!\210\311 \210\f\2020 \311 \210\f)\nA\211\204 \306*\207" [global-highlight-changes-mode-buffers buf --dolist-tail-- highlight-changes-mode-major-mode major-mode highlight-changes-mode nil buffer-live-p -1 highlight-changes-mode-turn-on] 3]) (put 'global-highlight-changes-mode-enable-in-buffers 'definition-name 'global-highlight-changes-mode) (defalias 'global-highlight-changes-mode-check-buffers #[nil "\301 \210\302\303\304\305\"\207" [global-highlight-changes-mode-buffers global-highlight-changes-mode-enable-in-buffers nil remove-hook post-command-hook global-highlight-changes-mode-check-buffers] 3]) (put 'global-highlight-changes-mode-check-buffers 'definition-name 'global-highlight-changes-mode) (defalias 'global-highlight-changes-mode-cmhh #[nil "\300\301p\"\210\302\303\304\"\207" [add-to-list global-highlight-changes-mode-buffers add-hook post-command-hook global-highlight-changes-mode-check-buffers] 3]) (byte-code "\300\301\302\303#\210\304\305\303\306#\210\307\305\303\310#\207" [put global-highlight-changes-mode-cmhh definition-name global-highlight-changes-mode defalias global-highlight-changes nil make-obsolete "23.1"] 4) #@134 See if Highlight Changes mode should be turned on for this buffer. This is called when `global-highlight-changes-mode' is turned on. (defalias 'highlight-changes-mode-turn-on #[nil "\206@ \204\n \303\207\304 !\203 \202: <\203/ \242\305=\203) \n A>?\202: \n >\202: \306\307\310 \"?\205@ \311 \205@ \300\312!\207" [highlight-changes-mode highlight-changes-global-modes major-mode nil functionp not string-match "^[ *]" buffer-name buffer-file-name 1] 3 (#$ . 27723)]) (defalias 'hilit-chg-desktop-restore #[(desktop-buffer-locals) "\301\211\236A\206 \302!\207" [desktop-buffer-locals highlight-changes-mode 1] 3]) (byte-code "\300\301\302\"\210\300\303\304\"\210\305\306!\207" [add-to-list desktop-minor-mode-handlers (highlight-changes-mode . hilit-chg-desktop-restore) desktop-locals-to-save highlight-changes-mode provide hilit-chg] 3)