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:02:39 2023 ;;; from file /builddir/build/BUILD/emacs-24.3/lisp/cus-theme.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 "\300\301!\210\300\302!\207" [require widget cus-edit] 2) #@37 Keymap for `custom-new-theme-mode'. (defvar custom-new-theme-mode-map (byte-code "\302 \303 \"\210\304!\210\305\306\307#\210\305\310\311#\210\305\312\313#\210)\207" [map widget-keymap make-keymap set-keymap-parent suppress-keymap define-key "" custom-theme-write "n" widget-forward "p" widget-backward] 4) (#$ . 617)) (byte-code "\300\301N\204 \302\300\301\303\304!#\210\305\306!\204 \302\306\307\310#\210\300\207" [custom-new-theme-mode-hook variable-documentation put purecopy "Hook run when entering Custom-Theme mode.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it. (This is true for all hook variables.)" boundp custom-new-theme-mode-map definition-name custom-new-theme-mode] 5) (defvar custom-new-theme-mode-map (make-sparse-keymap)) (byte-code "\300\301N\204 \302\300\301\303\304!#\210\305\306!\204 \302\306\307\310#\210\300\207" [custom-new-theme-mode-map variable-documentation put purecopy "Keymap for `custom-new-theme-mode'." boundp custom-new-theme-mode-syntax-table definition-name custom-new-theme-mode] 5) (defvar custom-new-theme-mode-syntax-table (make-syntax-table)) (byte-code "\300\301N\204 \302\300\301\303\304!#\210\302\305\306\307#\207" [custom-new-theme-mode-syntax-table variable-documentation put purecopy "Syntax table for `custom-new-theme-mode'." custom-new-theme-mode-abbrev-table definition-name custom-new-theme-mode] 5) (defvar custom-new-theme-mode-abbrev-table (progn (define-abbrev-table 'custom-new-theme-mode-abbrev-table nil) custom-new-theme-mode-abbrev-table)) (byte-code "\300\301N\204 \302\300\301\303\304!#\210\302\305\306\307#\207" [custom-new-theme-mode-abbrev-table variable-documentation put purecopy "Abbrev table for `custom-new-theme-mode'." custom-new-theme-mode derived-mode-parent nil] 5) #@237 Major mode for editing Custom themes. Do not call this mode function yourself. It is meant for internal use. This mode runs the hook `custom-new-theme-mode-hook', as the final step during initialization. \{custom-new-theme-mode-map} (defalias 'custom-new-theme-mode #[nil "\306\300!\210\307\310 \210\311\312\313 !\210\314\f!\210 \313 !\210\315 \210\306\316!\210\317)\320\321!\207" [delay-mode-hooks major-mode mode-name custom-new-theme-mode-map custom-new-theme-mode-syntax-table custom-new-theme-mode-abbrev-table make-local-variable t kill-all-local-variables custom-new-theme-mode "Custom-Theme" use-local-map set-syntax-table custom--initialize-widget-variables revert-buffer-function custom-theme-revert run-mode-hooks custom-new-theme-mode-hook local-abbrev-table] 2 (#$ . 2424) nil]) (put 'custom-new-theme-mode 'mode-class 'special) (defvar custom-theme-name nil) (defvar custom-theme-variables nil) (defvar custom-theme-faces nil) (defvar custom-theme-description nil) (defvar custom-theme--migrate-settings nil) (defvar custom-theme-insert-variable-marker nil) (defvar custom-theme-insert-face-marker nil) #@55 Faces listed by default in the *Custom Theme* buffer. (defvar custom-theme--listed-faces '(default cursor fixed-pitch variable-pitch escape-glyph minibuffer-prompt highlight region shadow secondary-selection trailing-whitespace font-lock-builtin-face font-lock-comment-delimiter-face font-lock-comment-face font-lock-constant-face font-lock-doc-face font-lock-function-name-face font-lock-keyword-face font-lock-negation-char-face font-lock-preprocessor-face font-lock-regexp-grouping-backslash font-lock-regexp-grouping-construct font-lock-string-face font-lock-type-face font-lock-variable-name-face font-lock-warning-face button link link-visited fringe header-line tooltip mode-line mode-line-buffer-id mode-line-emphasis mode-line-highlight mode-line-inactive isearch isearch-fail lazy-highlight match next-error query-replace) (#$ . 3557)) #@337 Create or edit a custom theme. THEME, if non-nil, should be an existing theme to edit. If THEME is `user', the resulting *Custom Theme* buffer also contains a checkbox for removing the theme settings specified in the buffer from the Custom save file. BUFFER, if non-nil, should be a buffer to use; the default is named *Custom Theme*. (defalias 'customize-create-theme #[(&optional theme buffer) "\306\307\206 \310!!\210\311\312 \210\313ed\"\314\211\203( @\315\n!\210 A\211\204 +\316 \210\317\320!\210\317\305!\210\f\317\321!\210\314\317\322!\210\314\317\323!\210\324\317\325!\210\314\317\326!\210\317\327!\210\317\330!\210\331\332!\203m \333\334!\204m \314\f\335=\203w \336\337!\210\340\341\342\343\344\345\346\347&\210\336\350!\210\340\341\342\351\344\352\346\353&\210\336\350!\210\340\341\342\354\344\355\346\356&\210\336\357!\210\340\360\361\f\203\267 \f\335=\204\267 \362\f!\202\270 \324#\336\363!\210\340\364\361\365\366!#\340\341\367\370\371$\210\f\335=\203\355 \311\336\350!\210\340\372\361\346\373%\210\336\374\375\376\377#!\210\314\211\211\211 @ A B C\f\203X\f\335=\204 \201E \f\314\311#\210\f\201F N\314 D\211\203W @\211D@\201G =\203<DA@CBC\201H D8BBB\202PDA@ABA\201H D8@B@ A\211\204*\336\201I !\210\f\203}A\203\233\201J A\211AA@@\211A@@\"\210\202b\314 >\211\203\232 @>\201J >\314\"\210 A\211\204\207*\201K \336\201L !\210\340\341\342\201M \344\201N \201O \201P \201Q \201R \201S \201T \201U \201T \346\201V &\210\336\201W !\210\f\203C\203C@\201X =\203\374C\210CACB\211AB@\210\202\332\201Y C\211AC@\201Z B\211AB@!\"\210\202\332\201K \336\201L !\210\340\341\342\201[ \344\201\\ \201O \201P \201Q \201R \201S \201T \201U \201T \346\201] &\210\336\201^ !\210\201_ \210eb\210\201` \324!,\207" [buffer inhibit-read-only ov --dolist-tail-- theme custom-theme--save-name switch-to-buffer get-buffer-create "*Custom Theme*" t erase-buffer overlays-in nil delete-overlay custom-new-theme-mode make-local-variable custom-theme-name custom-theme-faces custom-theme-variables custom-theme-description "" custom-theme--migrate-settings custom-theme-insert-face-marker custom-theme-insert-variable-marker custom-theme--listed-faces called-interactively-p interactive y-or-n-p "Include basic face customizations in this theme? " user widget-insert "This buffer contains all the Custom settings you have made.\nYou can convert them into a new custom theme, and optionally\nremove them from your saved Custom file.\n\n" widget-create push-button :tag " Visit Theme " :help-echo "Insert the settings of a pre-defined theme." :action #[(_widget &optional _event) "\300\301!\207" [call-interactively custom-theme-visit-theme] 2] " " " Merge Theme " "Merge in the settings of a pre-defined theme." #[(_widget &optional _event) "\300\301!\207" [call-interactively custom-theme-merge-theme] 2] " Revert " "Revert this buffer to its original state." #[(&rest ignored) "\300 \207" [revert-buffer] 1] "\n\nTheme name : " editable-field :value symbol-name "Description: " text format-time-string "Created %Y-%m-%d." :notify custom-theme-write " Save Theme " checkbox #[(widget &optional event) "\303!\205 \304 \"\210\303!\211\207" [widget event custom-theme--migrate-settings widget-value widget-toggle-action] 3] propertize " Remove saved theme settings from Custom save file." face (variable-pitch (:height 0.9)) face-specs faces values vars setting load-theme theme-settings theme-value 3 "\n\n Theme faces:\n " custom-theme-add-face-1 point-marker " " "Insert Additional Face" "Add another face to this theme." :follow-link mouse-face :button-face custom-link :mouse-face highlight :pressed-face #[(_widget &optional _event) "\300\301!\207" [call-interactively custom-theme-add-face] 2] "\n\n Theme variables:\n " custom-enabled-themes custom-theme-add-var-1 eval "Insert Variable" "Add another variable to this theme." #[(_widget &optional _event) "\300\301!\207" [call-interactively custom-theme-add-variable] 2] 10 widget-setup message] 17 (#$ . 4410) nil]) #@109 Revert the current *Custom Theme* buffer. This is the `revert-buffer-function' for `custom-new-theme-mode'. (defalias 'custom-theme-revert #[(_ignore-auto noconfirm) "\204\n \302\303!\205 \304 p\"\207" [noconfirm custom-theme--save-name y-or-n-p "Discard current changes? " customize-create-theme] 3 (#$ . 8471)]) #@189 Add a widget for VAR (a symbol) to the *New Custom Theme* buffer. VALUE should be a value to which to set the widget; when called interactively, this defaults to the current value of VAR. (defalias 'custom-theme-add-variable #[(var value) " \236\211\204 \212 b\210\306\f\"\210 `\307\223\210\310 )\2022 \311\nA@\312\"\210\313\n8 \314 \315\fC#\210\316 !))\207" [var custom-theme-variables entry custom-theme-insert-variable-marker value widget custom-theme-add-var-1 nil widget-setup widget-value-set t 2 widget-put :shown-value custom-redraw] 5 (#$ . 8794) (let ((v (read-variable "Variable name: "))) (list v (symbol-value v)))]) (defalias 'custom-theme-add-var-1 #[(symbol val) "\303\304!\210\305\306\307\310\311\312%\303\304!\210\305\313\314\315!\307\316 C\317\320\321\322\323\324\325\326&E\nB\303\304!\207" [symbol val custom-theme-variables widget-insert " " widget-create checkbox :value t :help-echo "Enable/disable this variable." custom-variable :tag custom-unlispify-tag-name :shown-value :notify ignore :custom-level 0 :custom-state hidden :custom-style simple] 18]) #@136 Add a widget for FACE (a symbol) to the *New Custom Theme* buffer. SPEC, if non-nil, should be a face spec to which to set the widget. (defalias 'custom-theme-add-face #[(face &optional spec) "\306!\204 \204 \307\310\"\210\n\236\211\204+ \212\fb\210\311 \"\210\f`\312\223\210\313 )\202Q \203G \314 A@\315\"\210\316 8 \317 \320 #\210\321 !)\202Q \322\323!\205Q \307\324\")\207" [face spec custom-theme-faces entry custom-theme-insert-face-marker widget facep error "`%s' has no face definition" custom-theme-add-face-1 nil widget-setup widget-value-set t 2 widget-put :shown-value custom-redraw called-interactively-p interactive "`%s' is already present"] 5 (#$ . 9887) (list (read-face-name "Face name" nil nil) nil)]) (defalias 'custom-theme-add-face-1 #[(symbol spec) "\303\304!\210\305\306\307\310\311\312%\303\304!\210\305\313\314\315!\316\310\307\317\320\321\322\323 \324\325&E\nB\303\304!\207" [symbol spec custom-theme-faces widget-insert " " widget-create checkbox :value t :help-echo "Enable/disable this face." custom-face :tag custom-unlispify-tag-name :documentation-shown :custom-state hidden :custom-style simple :shown-value :sample-indent 34] 18]) #@52 Set up a Custom buffer to edit custom theme THEME. (defalias 'custom-theme-visit-theme #[(theme) "\303!\204 \304\305\"\210 \306=\204 \307!\207\310\311!\205! \312\313\314\"\207" [theme major-mode custom-theme--save-name custom-theme-name-valid-p error "No valid theme named `%s'" custom-new-theme-mode customize-create-theme y-or-n-p "Discard current changes? " custom-theme-revert nil t] 3 (#$ . 11073) (list (intern (completing-read "Find custom theme: " (mapcar 'symbol-name (custom-available-themes)))))]) #@66 Merge the custom theme THEME's settings into the current buffer. (defalias 'custom-theme-merge-theme #[(theme) "\306=\204 \307!\204 \310\311\"\210\312\313\314#\210\315\316N!\211\313\211\203V @\211@\317=\nA@\320\n8 \211 \203@ \321>\204N \203I \322\202J \323 \f\"\210+ A\211\204% +\207" [theme settings setting --dolist-tail-- value name user custom-theme-name-valid-p error "Invalid theme name `%s'" load-theme nil t reverse theme-settings theme-value 3 (custom-enabled-themes custom-safe-themes) custom-theme-add-variable custom-theme-add-face option] 5 (#$ . 11595) (list (intern (completing-read "Merge custom theme: " (mapcar 'symbol-name (custom-available-themes)))))]) #@51 Write the current custom theme to its theme file. (defalias 'custom-theme-write #[(&rest _ignore) "\306!\306\n!\f 7 8\307 9 \310\230\203\" \311\312\313 \"\314 \"\210\315\316 !!\204/ \317\320 \"\210\321 \322P5\"9\3239!\203M \324\325\3269\"!\204M \317\327!\210\330\331! :r:q\210\332\216\333 \210\3345!\204k \335\3365!\337\"\2109;\340 \210\341 \261\210 \203\201 \342 \343\261\210\344c\210\345 \346 !\"\210\347 \3468!\"\210\350 \344\261\210\351 \210+\352\3539\"\210<\205\354\355 = > \307 ?\211 @\203\337 @@\211?@\356=\204\326 \357?A@\360\"\203\326 \361\362?8\363\"\210@A\211@\204\270 *8\307 A\211 @\203 @@A\357AA@\360\"\203\361\362A8\363\"\210@A\211@\204\353 *\364 \210*\365C B\366\316 !!)-\207" [custom-theme-name name custom-theme-description doc custom-theme-variables vars widget-value nil "" read-from-minibuffer "Theme name: " user-login-name widget-value-set custom-theme-name-valid-p intern error "Custom themes cannot be named `%s'" expand-file-name "-theme.el" file-exists-p y-or-n-p format "File %s exists. Overwrite? " "Aborted" generate-new-buffer " *temp*" ((byte-code "\301!\203\n \302!\210\301\207" [#1=#:temp-buffer buffer-name kill-buffer] 2)) emacs-lisp-mode file-directory-p make-directory file-name-as-directory t erase-buffer "(deftheme " "\n \"" "\"" ")\n" custom-theme-write-variables reverse custom-theme-write-faces "\n(provide-theme '" save-buffer message "Theme written to %s" (t) (t) custom-enabled-themes widget-get :value widget-apply 2 :custom-mark-to-reset-standard custom-save-all custom-theme-directory load-theme custom-theme-faces faces filename #1# buffer-file-name custom-theme--migrate-settings custom-reset-standard-faces-list custom-reset-standard-variables-list var --dolist-tail-- face custom-theme-load-path] 5 (#$ . 12294) nil]) #@97 Write a `custom-theme-set-variables' command for THEME. It includes all variables in list VARS. (defalias 'custom-theme-write-variables #[(theme vars) "\205\222 p\306\307!\210\306\310!\210\306\n!\210\306\311!\210\312\211 \203z \f@\313 A@\314\"\203s @ \315 8 \313\316\"\242\211 \203E \317!\202K \313\320\"@ \321 !\203r n\204[ \306\311!\210\306\322!\210\323 !\210\306\324!\210\323\325!!\210\306\326!\210,\fA\211\204 *n\203\203 \306\324!\210\306\326!\210\327\311!?\205\221 \306\311!)\207" [vars standard-output theme spec --dolist-tail-- symbol princ "\n(custom-theme-set-variables\n" " '" "\n" nil widget-get :value 2 :children widget-value :shown-value boundp " '(" prin1 " " custom-quote ")" looking-at widget child value] 4 (#$ . 14114)]) #@90 Write a `custom-theme-set-faces' command for THEME. It includes all faces in list FACES. (defalias 'custom-theme-write-faces #[(theme faces) "\205\227 p\306\307!\210\306\310!\210\306\n!\210\306\311!\210\312\211 \203 \f@\313 A@\314\"\203x @ \315 8 \313\316\"\242\203B \317!\202M \313\320\"\206M \321 ! \322 !\203w \203w \306n\203c \323\202d \324!\210\325 !\210\306\326!\210\325!\210\306\327!\210+\fA\211\204 *n\203\210 \306\326!\210\306\327!\210\330\311!?\205\226 \306\311!)\207" [faces standard-output theme spec --dolist-tail-- symbol princ "\n(custom-theme-set-faces\n" " '" "\n" nil widget-get :value 2 :children custom-face-widget-to-spec :shown-value custom-face-get-current-spec facep " '(" "\n '(" prin1 " " ")" looking-at widget value] 4 (#$ . 14879)]) #@61 Display a description of the Custom theme THEME (a symbol). (defalias 'describe-theme #[(theme) "\306!\204 \307\310\"\210\311\312D\313\314!\"\210 \315\211\223\210\315\316 B\f r\317\320 !q\210p\321 \210 \315\211\322\211\322 \323 \210\324\325!\210+\211 r q\210\326!)\327 !\210+\330\n!\210*\207" [theme help-window-point-marker help-window temp-buffer-show-hook default-directory #1=#:old-dir custom-theme-name-valid-p error "Invalid theme name `%s'" help-setup-xref describe-theme called-interactively-p interactive nil #[nil "\301 \211\207" [help-window selected-window] 2] get-buffer-create help-buffer kill-all-local-variables t erase-buffer run-hooks temp-buffer-setup-hook describe-theme-1 internal-temp-output-buffer-show help-window-setup buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks inhibit-read-only #2=#:buf standard-output] 5 (#$ . 15667) (list (intern (completing-read "Describe custom theme: " (mapcar 'symbol-name (custom-available-themes)))))]) (defalias 'describe-theme-1 #[(theme) "\306!\210\307\310!\210\311\312!\313P\314 \315#\316\211\203) \307\317!\210\320\321\n!\322\n#\210\307\323!\210\307\324!\210\211 >)\203Q \211\f>)\203F \307\325!\210\202J \307\326!\210\327N\202\211 \307\330!\210\n\203\211 \331\332! r q\210\333\216\334\n!\210\316\211 '\335\336\217)\211 (\203\210 (<\203\210 (@\337=\203\210 \340(8,\307\341!\210\307 ;\203\227 \202\230 \342!\210*\307\343!\210\320\344\345#\210\307\346!\207" [theme doc fn custom-known-themes custom-enabled-themes #1=#:temp-buffer prin1 princ " is a custom theme" locate-file symbol-name "-theme.el" custom-theme--load-path ("" "c") nil " in `" help-insert-xref-button file-name-nondirectory help-theme-def "'" ".\n" "It is loaded and enabled." "It is loaded but disabled." theme-documentation "It is not loaded." generate-new-buffer " *temp*" ((byte-code "\301!\203\n \302!\210\301\207" [#1# buffer-name kill-buffer] 2)) insert-file-contents (byte-code "\300p!\207" [read] 2) ((end-of-file)) deftheme 2 "\n\nDocumentation:\n" "No documentation available." "\n\nYou can " "customize" help-theme-edit " this theme." read-circle sexp] 5]) #@66 Whether to allow multi-selections in the *Custom Themes* buffer. (custom-declare-variable 'custom-theme-allow-multiple-selections nil '(#$ . 17841) :version "24.1" :type 'boolean :group 'custom-buffer) #@40 Keymap for `custom-theme-choose-mode'. (defvar custom-theme-choose-mode-map (byte-code "\303 \304\305 \n\"\"\210\306!\210\307\310\311#\210\307\312\313#\210\307\314\315#\210\307\316\317#\210)\207" [map widget-keymap special-mode-map make-keymap set-keymap-parent make-composed-keymap suppress-keymap define-key "" custom-theme-save "n" widget-forward "p" widget-backward "?" custom-describe-theme] 5) (#$ . 18049)) (byte-code "\300\301N\204 \302\300\301\303\304!#\210\305\306!\204 \302\306\307\310#\210\300\207" [custom-theme-choose-mode-hook variable-documentation put purecopy "Hook run when entering Themes mode.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it. (This is true for all hook variables.)" boundp custom-theme-choose-mode-map definition-name custom-theme-choose-mode] 5) (defvar custom-theme-choose-mode-map (make-sparse-keymap)) (byte-code "\300\301N\204 \302\300\301\303\304!#\210\305\306!\204 \302\306\307\310#\210\300\207" [custom-theme-choose-mode-map variable-documentation put purecopy "Keymap for `custom-theme-choose-mode'." boundp custom-theme-choose-mode-syntax-table definition-name custom-theme-choose-mode] 5) (defvar custom-theme-choose-mode-syntax-table (make-syntax-table)) (byte-code "\300\301N\204 \302\300\301\303\304!#\210\302\305\306\307#\207" [custom-theme-choose-mode-syntax-table variable-documentation put purecopy "Syntax table for `custom-theme-choose-mode'." custom-theme-choose-mode-abbrev-table definition-name custom-theme-choose-mode] 5) (defvar custom-theme-choose-mode-abbrev-table (progn (define-abbrev-table 'custom-theme-choose-mode-abbrev-table nil) custom-theme-choose-mode-abbrev-table)) (byte-code "\300\301N\204 \302\300\301\303\304!#\210\302\305\306\307#\207" [custom-theme-choose-mode-abbrev-table variable-documentation put purecopy "Abbrev table for `custom-theme-choose-mode'." custom-theme-choose-mode derived-mode-parent special-mode] 5) #@317 Major mode for selecting Custom themes. Do not call this mode function yourself. It is meant for internal use. In addition to any hooks its parent mode `special-mode' might have run, this mode runs the hook `custom-theme-choose-mode-hook', as the final step during initialization. \{custom-theme-choose-mode-map} (defalias 'custom-theme-choose-mode #[nil "\306\300!\210\307\310 \210\311\312\310\313N\203 \314\311\313\310\313N#\210\315 !\204' \316 \317 \"\210\320\f!\211 \2036 \321 =\203< \322\f\323 \"\210)\324 \325\"\204V =\204V \326 \325 C#\210\327 !\210\330\f!\210 \327 !\210\331 \210\306\332!\210\333)\334\335!\207" [delay-mode-hooks major-mode mode-name custom-theme-choose-mode-map custom-theme-choose-mode-syntax-table parent make-local-variable t special-mode custom-theme-choose-mode "Themes" mode-class put keymap-parent set-keymap-parent current-local-map char-table-parent standard-syntax-table set-char-table-parent syntax-table abbrev-table-get :parents abbrev-table-put use-local-map set-syntax-table custom--initialize-widget-variables revert-buffer-function #[(_ignore-auto noconfirm) "\204\n \301\302!\205 \303p!\207" [noconfirm y-or-n-p "Discard current choices? " customize-themes] 2] run-mode-hooks custom-theme-choose-mode-hook custom-theme-choose-mode-abbrev-table local-abbrev-table] 6 (#$ . 20013) nil]) (put 'custom-theme-choose-mode 'mode-class 'special) #@156 Display a selectable list of Custom themes. When called from Lisp, BUFFER should be the buffer to use; if omitted, a buffer named *Custom Themes* is used. (defalias 'customize-themes #[(&optional buffer) "\306\307\206 \310!!\210\311\312 \210)\313 \210\314\302!\210\315\314\303!\210 \204* \fG\316V\203* \311\317\320\321!!\210\322\323\324\325\326\327\330\331\332\331\333\334\335 \336\337\340\341&\210\317\342!\210\343\344N\211 @\203\224 @A\204s @\211 A@@)\345=\203s @@\211 AA@)\304=\204\224 \317\346\347\350\351#!\210\322\323\324\352\326\327\330\331\332\331\333\353\335 \336\337\340\354&\210\317\355!\210)\322\356\357\360\333\361\340\362&\210\317\363!\210\322\364\324 \340\365%\210\317\346\366\350\367#!\210\317\370!\210\371\315 B C\372 \315 D\211 E\203'E@D\322\364\324D\211 D\f>)\373D\333C\340\374& BDBB\nB\375B\356\376\377\201F \377\324\201G \201H D\"\340\201I \333C&\f\210\317\201J \346\201K D!\350\201L #\363#\210EA\211E\204\311 ,eb\210\201M \207" [buffer inhibit-read-only custom--listed-themes custom-theme-allow-multiple-selections custom-enabled-themes custom-mode-link-map switch-to-buffer get-buffer-create "*Custom Themes*" t erase-buffer custom-theme-choose-mode make-local-variable nil 1 widget-insert substitute-command-keys "Type RET or click to enable/disable listed custom themes.\nType \\[custom-describe-theme] to describe the theme at point.\nTheme files are named *-theme.el in `" widget-create link :value "custom-theme-load-path" :button-face custom-link :mouse-face highlight :pressed-face :help-echo "Describe `custom-theme-load-path'." :keymap :follow-link mouse-face :action #[(_widget &rest _ignore) "\300\301!\207" [describe-variable custom-theme-load-path] 2] "'.\n\n" user theme-settings theme-value propertize " Note: Your custom settings take precedence over theme settings.\n To migrate your settings into a theme, click " face font-lock-warning-face "here" "Migrate." #[(_widget &rest _ignore) "\300\301!\207" [customize-create-theme user] 2] ".\n\n" push-button :tag " Save Theme Settings " "Save the selected themes for future sessions." custom-theme-save 10 checkbox custom-theme-selections-toggle " Select more than one theme at a time" (variable-pitch (:height 0.9)) "\n\nAvailable Custom Themes:\n" "mouse-2: Enable this theme for this session" custom-available-themes :theme-name custom-theme-checkbox-toggle widget-create-child-and-convert :button-face-get ignore user-settings x widget help-echo theme --dolist-tail-- :mouse-face-get format " %s" widget-parent-action " -- " custom-theme-summary shadow widget-setup] 19 (#$ . 21424) nil]) #@35 Return the summary line of THEME. (defalias 'custom-theme-summary #[(theme) "\306 \211\n>)\203 \307N\202Q \310\311 !\312P\313 \314#\211\203P \315\316! r\fq\210\317\216\320 !\210\306\211 \321\322\217)\211 \203O <\203O @\323=\203O \3248,)\204Y \325\202h \326\327\"\203g \330\331\"\202h )\207" [doc theme custom-known-themes fn #1=#:temp-buffer read-circle nil theme-documentation locate-file symbol-name "-theme.el" custom-theme--load-path ("" "c") generate-new-buffer " *temp*" ((byte-code "\301!\203\n \302!\210\301\207" [#1# buffer-name kill-buffer] 2)) insert-file-contents (byte-code "\300p!\207" [read] 2) ((end-of-file)) deftheme 2 "(no documentation available)" string-match ".*" match-string 0 sexp] 5 (#$ . 24045)]) (defalias 'custom-theme-checkbox-toggle #[(widget &optional event) "\306\307\"\310!\203 \311 !\210\312\n\"\210\202| \204q \f\313 \211 \203B @\211 =\2049 \236\2039 \311 !\210A\211\204$ *\313 \211 \203p @\211@ =\204g \314 A\313\"\210\315 A\316 A\n$\210A\211\204M *\317 !\203| \312\n\"\210\320\304\321\322\f!C#)\207" [widget this-theme event custom-theme-allow-multiple-selections custom-enabled-themes theme widget-get :theme-name widget-value disable-theme widget-toggle-action nil widget-value-set widget-apply :notify load-theme put customized-value custom-quote --dolist-tail-- custom--listed-themes] 6]) #@48 Describe the Custom theme on the current line. (defalias 'custom-describe-theme #[nil "\301\302 !\211\205 \303\304\305\"!)\207" [widget widget-at line-beginning-position describe-theme widget-get :theme-name] 5 (#$ . 25430) nil]) (defalias 'custom-theme-save #[(&rest _ignore) "\301\300\"\210\302\303!\207" [custom-enabled-themes customize-save-variable message "Custom themes saved for future sessions."] 3 nil nil]) (defalias 'custom-theme-selections-toggle #[(widget &optional event) "\304!\203 \305\306\307\310\311 \"\"GW\203 \312\313!\210\314\n\"\210\304!\211\207" [widget custom--listed-themes event custom-theme-allow-multiple-selections widget-value 1 delq nil mapcar #[(x) "\301A!\207" [x widget-value] 2] error "More than one theme is currently selected" widget-toggle-action] 6]) (provide 'cus-theme)