Linux iad1-shared-b7-18 6.6.49-grsec-jammy+ #10 SMP Thu Sep 12 23:23:08 UTC 2024 x86_64
Apache
: 67.205.6.31 | : 216.73.216.47
Cant Read [ /etc/named.conf ]
8.2.29
fernandoquevedo
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
README
+ Create Folder
+ Create File
/
usr /
share /
emacs /
27.1 /
lisp /
[ HOME SHELL ]
Name
Size
Permission
Action
calc
[ DIR ]
drwxr-xr-x
calendar
[ DIR ]
drwxr-xr-x
cedet
[ 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
image
[ DIR ]
drwxr-xr-x
international
[ DIR ]
drwxr-xr-x
language
[ DIR ]
drwxr-xr-x
leim
[ 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
vc
[ DIR ]
drwxr-xr-x
COPYING
34.32
KB
-rw-r--r--
README
537
B
-rw-r--r--
abbrev.elc
34.55
KB
-rw-r--r--
align.elc
39.88
KB
-rw-r--r--
allout-widgets.elc
62.37
KB
-rw-r--r--
allout.elc
203.33
KB
-rw-r--r--
ansi-color.elc
17.12
KB
-rw-r--r--
apropos.elc
37.42
KB
-rw-r--r--
arc-mode.elc
58.06
KB
-rw-r--r--
array.elc
27.07
KB
-rw-r--r--
auth-source-pass.elc
11.68
KB
-rw-r--r--
auth-source.elc
64.32
KB
-rw-r--r--
autoarg.elc
6.63
KB
-rw-r--r--
autoinsert.elc
13.41
KB
-rw-r--r--
autorevert.elc
30.71
KB
-rw-r--r--
avoid.elc
11.62
KB
-rw-r--r--
battery.elc
24.42
KB
-rw-r--r--
bindings.elc
42.76
KB
-rw-r--r--
bookmark.elc
77.09
KB
-rw-r--r--
bs.elc
49.32
KB
-rw-r--r--
buff-menu.elc
27.02
KB
-rw-r--r--
button.elc
14.97
KB
-rw-r--r--
calculator.elc
53.9
KB
-rw-r--r--
case-table.elc
4.99
KB
-rw-r--r--
cdl.elc
1.07
KB
-rw-r--r--
char-fold.elc
311.81
KB
-rw-r--r--
chistory.elc
8.16
KB
-rw-r--r--
cmuscheme.elc
18.07
KB
-rw-r--r--
color.elc
12.83
KB
-rw-r--r--
comint.elc
114.46
KB
-rw-r--r--
completion.elc
41.12
KB
-rw-r--r--
composite.elc
27.94
KB
-rw-r--r--
cus-dep.elc
6.42
KB
-rw-r--r--
cus-edit.elc
139.04
KB
-rw-r--r--
cus-face.elc
10.54
KB
-rw-r--r--
cus-load.el
85.19
KB
-rw-r--r--
cus-start.elc
21.92
KB
-rw-r--r--
cus-theme.elc
25.05
KB
-rw-r--r--
custom.elc
47.41
KB
-rw-r--r--
dabbrev.elc
22.28
KB
-rw-r--r--
delim-col.elc
8.95
KB
-rw-r--r--
delsel.elc
9.2
KB
-rw-r--r--
descr-text.elc
26.87
KB
-rw-r--r--
desktop.elc
47.64
KB
-rw-r--r--
dframe.elc
19.92
KB
-rw-r--r--
dired-aux.elc
85.75
KB
-rw-r--r--
dired-loaddefs.el
22.29
KB
-rw-r--r--
dired-x.elc
44.53
KB
-rw-r--r--
dired.elc
127.27
KB
-rw-r--r--
dirtrack.elc
7.75
KB
-rw-r--r--
disp-table.elc
8.76
KB
-rw-r--r--
display-fill-column-indicator....
8.32
KB
-rw-r--r--
display-line-numbers.elc
8.67
KB
-rw-r--r--
dnd.elc
7.13
KB
-rw-r--r--
doc-view.elc
65.25
KB
-rw-r--r--
dom.elc
7.36
KB
-rw-r--r--
dos-fns.elc
6.14
KB
-rw-r--r--
dos-vars.elc
1.1
KB
-rw-r--r--
dos-w32.elc
11.67
KB
-rw-r--r--
double.elc
4.34
KB
-rw-r--r--
dynamic-setting.elc
2.2
KB
-rw-r--r--
ebuff-menu.elc
10.46
KB
-rw-r--r--
echistory.elc
4.75
KB
-rw-r--r--
ecomplete.elc
7.1
KB
-rw-r--r--
edmacro.elc
19.94
KB
-rw-r--r--
ehelp.elc
11.32
KB
-rw-r--r--
elec-pair.elc
21.41
KB
-rw-r--r--
electric.elc
23.69
KB
-rw-r--r--
elide-head.elc
2.65
KB
-rw-r--r--
emacs-lock.elc
9.29
KB
-rw-r--r--
env.elc
6.12
KB
-rw-r--r--
epa-dired.elc
1.62
KB
-rw-r--r--
epa-file.elc
8.65
KB
-rw-r--r--
epa-hook.elc
4.63
KB
-rw-r--r--
epa-mail.elc
9.43
KB
-rw-r--r--
epa.elc
45.25
KB
-rw-r--r--
epg-config.elc
8.97
KB
-rw-r--r--
epg.elc
166.06
KB
-rw-r--r--
expand.elc
9.07
KB
-rw-r--r--
ezimage.elc
9.65
KB
-rw-r--r--
face-remap.elc
16.58
KB
-rw-r--r--
facemenu.elc
27.89
KB
-rw-r--r--
faces.elc
90.21
KB
-rw-r--r--
ffap.elc
50.3
KB
-rw-r--r--
filecache.elc
16.69
KB
-rw-r--r--
fileloop.elc
6.62
KB
-rw-r--r--
filenotify.elc
28.49
KB
-rw-r--r--
files-x.elc
21.9
KB
-rw-r--r--
files.elc
236.95
KB
-rw-r--r--
filesets.elc
72.57
KB
-rw-r--r--
find-cmd.elc
4.9
KB
-rw-r--r--
find-dired.elc
10.41
KB
-rw-r--r--
find-file.elc
18.33
KB
-rw-r--r--
find-lisp.elc
7.66
KB
-rw-r--r--
finder-inf.el
41.27
KB
-rw-r--r--
finder.elc
14.73
KB
-rw-r--r--
flow-ctrl.elc
2.26
KB
-rw-r--r--
foldout.elc
7.25
KB
-rw-r--r--
follow.elc
40.63
KB
-rw-r--r--
font-core.elc
12.41
KB
-rw-r--r--
font-lock.elc
61.63
KB
-rw-r--r--
format-spec.elc
3.93
KB
-rw-r--r--
format.elc
27.56
KB
-rw-r--r--
forms.elc
35.1
KB
-rw-r--r--
frame.elc
85.94
KB
-rw-r--r--
frameset.elc
48.02
KB
-rw-r--r--
fringe.elc
10.23
KB
-rw-r--r--
generic-x.elc
40.27
KB
-rw-r--r--
help-at-pt.elc
11.15
KB
-rw-r--r--
help-fns.elc
45.35
KB
-rw-r--r--
help-macro.elc
4.25
KB
-rw-r--r--
help-mode.elc
23.89
KB
-rw-r--r--
help.elc
52.22
KB
-rw-r--r--
hex-util.elc
1.3
KB
-rw-r--r--
hexl.elc
35.39
KB
-rw-r--r--
hfy-cmap.elc
25.45
KB
-rw-r--r--
hi-lock.elc
29.38
KB
-rw-r--r--
hilit-chg.elc
28.77
KB
-rw-r--r--
hippie-exp.elc
21.52
KB
-rw-r--r--
hl-line.elc
11.23
KB
-rw-r--r--
htmlfontify-loaddefs.el
808
B
-rw-r--r--
htmlfontify.elc
67.51
KB
-rw-r--r--
ibuf-ext.elc
77.15
KB
-rw-r--r--
ibuf-macs.elc
12.47
KB
-rw-r--r--
ibuffer-loaddefs.el
12.68
KB
-rw-r--r--
ibuffer.elc
98.62
KB
-rw-r--r--
icomplete.elc
22.83
KB
-rw-r--r--
ido.elc
127.92
KB
-rw-r--r--
ielm.elc
19.2
KB
-rw-r--r--
iimage.elc
4.92
KB
-rw-r--r--
image-dired.elc
92.97
KB
-rw-r--r--
image-file.elc
6.53
KB
-rw-r--r--
image-mode.elc
42.56
KB
-rw-r--r--
image.elc
34.45
KB
-rw-r--r--
imenu.elc
24.94
KB
-rw-r--r--
indent.elc
23.63
KB
-rw-r--r--
info-look.elc
28.18
KB
-rw-r--r--
info-xref.elc
16.59
KB
-rw-r--r--
info.elc
144.48
KB
-rw-r--r--
informat.elc
9.73
KB
-rw-r--r--
isearch.elc
147.85
KB
-rw-r--r--
isearchb.elc
4.73
KB
-rw-r--r--
jit-lock.elc
23.49
KB
-rw-r--r--
jka-cmpr-hook.elc
13.07
KB
-rw-r--r--
jka-compr.elc
12.09
KB
-rw-r--r--
json.elc
22.76
KB
-rw-r--r--
jsonrpc.elc
31.65
KB
-rw-r--r--
kermit.elc
2.92
KB
-rw-r--r--
kmacro.elc
35.15
KB
-rw-r--r--
ldefs-boot.el
1.41
MB
-rw-r--r--
linum.elc
10.77
KB
-rw-r--r--
loaddefs.el
1.41
MB
-rw-r--r--
loadhist.elc
9.77
KB
-rw-r--r--
loadup.el
20.08
KB
-rw-r--r--
locate.elc
19.57
KB
-rw-r--r--
lpr.elc
9.44
KB
-rw-r--r--
ls-lisp.elc
22.7
KB
-rw-r--r--
macros.elc
7.23
KB
-rw-r--r--
makesum.elc
2.47
KB
-rw-r--r--
man.elc
53.85
KB
-rw-r--r--
master.elc
4.58
KB
-rw-r--r--
mb-depth.elc
3.56
KB
-rw-r--r--
md4.elc
8.12
KB
-rw-r--r--
menu-bar.elc
86.61
KB
-rw-r--r--
midnight.elc
10.22
KB
-rw-r--r--
minibuf-eldef.elc
6.43
KB
-rw-r--r--
minibuffer.elc
104.08
KB
-rw-r--r--
misc.elc
5.4
KB
-rw-r--r--
misearch.elc
12.37
KB
-rw-r--r--
mouse-copy.elc
3.61
KB
-rw-r--r--
mouse-drag.elc
6.43
KB
-rw-r--r--
mouse.elc
71.3
KB
-rw-r--r--
mpc.elc
79.29
KB
-rw-r--r--
msb.elc
26.76
KB
-rw-r--r--
mwheel.elc
12.83
KB
-rw-r--r--
newcomment.elc
39.43
KB
-rw-r--r--
notifications.elc
13.78
KB
-rw-r--r--
novice.elc
4.43
KB
-rw-r--r--
obarray.elc
1.71
KB
-rw-r--r--
outline.elc
37.04
KB
-rw-r--r--
paren.elc
8.69
KB
-rw-r--r--
password-cache.elc
3.57
KB
-rw-r--r--
pcmpl-cvs.elc
6.17
KB
-rw-r--r--
pcmpl-gnu.elc
12.96
KB
-rw-r--r--
pcmpl-linux.elc
3.09
KB
-rw-r--r--
pcmpl-rpm.elc
11.17
KB
-rw-r--r--
pcmpl-unix.elc
7.52
KB
-rw-r--r--
pcmpl-x.elc
8.95
KB
-rw-r--r--
pcomplete.elc
36.16
KB
-rw-r--r--
pixel-scroll.elc
10.82
KB
-rw-r--r--
plstore.elc
14.75
KB
-rw-r--r--
printing.elc
157.7
KB
-rw-r--r--
proced.elc
62.85
KB
-rw-r--r--
profiler.elc
42.81
KB
-rw-r--r--
ps-bdf.elc
12.69
KB
-rw-r--r--
ps-def.elc
2.23
KB
-rw-r--r--
ps-mule.elc
34.89
KB
-rw-r--r--
ps-print-loaddefs.el
2.6
KB
-rw-r--r--
ps-print.elc
141.17
KB
-rw-r--r--
ps-samp.elc
5.26
KB
-rw-r--r--
recentf.elc
48.73
KB
-rw-r--r--
rect.elc
26.88
KB
-rw-r--r--
register.elc
27.63
KB
-rw-r--r--
registry.elc
10.41
KB
-rw-r--r--
repeat.elc
5.14
KB
-rw-r--r--
replace.elc
84.62
KB
-rw-r--r--
reposition.elc
2.66
KB
-rw-r--r--
reveal.elc
7.16
KB
-rw-r--r--
rfn-eshadow.elc
7.23
KB
-rw-r--r--
rot13.elc
2.56
KB
-rw-r--r--
rtree.elc
4.09
KB
-rw-r--r--
ruler-mode.elc
21.87
KB
-rw-r--r--
savehist.elc
10.83
KB
-rw-r--r--
saveplace.elc
11.87
KB
-rw-r--r--
sb-image.elc
2.75
KB
-rw-r--r--
scroll-all.elc
4.41
KB
-rw-r--r--
scroll-bar.elc
16.68
KB
-rw-r--r--
scroll-lock.elc
5.41
KB
-rw-r--r--
select.elc
18.75
KB
-rw-r--r--
server.elc
47.56
KB
-rw-r--r--
ses.elc
131.12
KB
-rw-r--r--
shadowfile.elc
31.16
KB
-rw-r--r--
shell.elc
41.53
KB
-rw-r--r--
simple.elc
301.78
KB
-rw-r--r--
skeleton.elc
15.76
KB
-rw-r--r--
so-long.elc
47.15
KB
-rw-r--r--
sort.elc
15.49
KB
-rw-r--r--
soundex.elc
1.14
KB
-rw-r--r--
speedbar.elc
115.02
KB
-rw-r--r--
startup.elc
68.51
KB
-rw-r--r--
strokes.elc
44.03
KB
-rw-r--r--
subdirs.el
450
B
-rw-r--r--
subr.elc
186.63
KB
-rw-r--r--
svg.elc
12.71
KB
-rw-r--r--
t-mouse.elc
3.8
KB
-rw-r--r--
tab-bar.elc
52.48
KB
-rw-r--r--
tab-line.elc
29.85
KB
-rw-r--r--
tabify.elc
2.17
KB
-rw-r--r--
talk.elc
2.99
KB
-rw-r--r--
tar-mode.elc
57.2
KB
-rw-r--r--
tempo.elc
19.18
KB
-rw-r--r--
term.elc
107.99
KB
-rw-r--r--
thingatpt.elc
16.88
KB
-rw-r--r--
thread.elc
8.08
KB
-rw-r--r--
thumbs.elc
25.74
KB
-rw-r--r--
time-stamp.elc
18.69
KB
-rw-r--r--
time.elc
20.87
KB
-rw-r--r--
timezone.elc
10.94
KB
-rw-r--r--
tmm.elc
13.39
KB
-rw-r--r--
tool-bar.elc
9.76
KB
-rw-r--r--
tooltip.elc
13.19
KB
-rw-r--r--
tree-widget.elc
19.84
KB
-rw-r--r--
tutorial.elc
22.28
KB
-rw-r--r--
type-break.elc
37.35
KB
-rw-r--r--
uniquify.elc
17.68
KB
-rw-r--r--
userlock.elc
6.33
KB
-rw-r--r--
vcursor.elc
23.92
KB
-rw-r--r--
version.elc
6.01
KB
-rw-r--r--
view.elc
34.69
KB
-rw-r--r--
vt-control.elc
1.99
KB
-rw-r--r--
vt100-led.elc
1.33
KB
-rw-r--r--
w32-fns.elc
11.01
KB
-rw-r--r--
w32-vars.elc
5.16
KB
-rw-r--r--
wdired.elc
23.52
KB
-rw-r--r--
whitespace.elc
69.06
KB
-rw-r--r--
wid-browse.elc
8.48
KB
-rw-r--r--
wid-edit.elc
99.52
KB
-rw-r--r--
widget.elc
1.4
KB
-rw-r--r--
windmove.elc
19.82
KB
-rw-r--r--
window.elc
294.5
KB
-rw-r--r--
winner.elc
12.04
KB
-rw-r--r--
woman.elc
109.43
KB
-rw-r--r--
x-dnd.elc
19.56
KB
-rw-r--r--
xdg.elc
10.14
KB
-rw-r--r--
xml.elc
25.31
KB
-rw-r--r--
xt-mouse.elc
14.1
KB
-rw-r--r--
xwidget.elc
18.9
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : frameset.elc
;ELC ;;; Compiled ;;; in Emacs version 27.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. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (require 'cl-lib) #@67 compiler-macro for inlining `frameset-p'. (fn CL-WHOLE-ARG CL-X) (defalias 'frameset-p--cmacro #[514 "\300\301\302\303\211\211&\207" [cl--defsubst-expand (cl-x) (cl-block frameset-p (and (vectorp cl-x) (>= (length cl-x) 8) (memq (aref cl-x 0) cl-struct-frameset-tags) t)) nil] 9 (#$ . 426)]) (put 'frameset-p 'compiler-macro 'frameset-p--cmacro) #@13 (fn CL-X) (defalias 'frameset-p #[257 "\301!\205 \211G\302Y\205 \211\303H>\205 \304\207" [cl-struct-frameset-tags vectorp 8 0 t] 3 (#$ . 782)]) (byte-code "\300\301\302\303#\304\305\306\301#\207" [function-put frameset-p side-effect-free error-free put frameset cl-deftype-satisfies] 5) #@73 compiler-macro for inlining `frameset-version'. (fn CL-WHOLE-ARG CL-X) (defalias 'frameset-version--cmacro #[514 "\300\301\302\303\211\211&\207" [cl--defsubst-expand (cl-x) (cl-block frameset-version (progn (or (and (memq (aref cl-x 0) cl-struct-frameset-tags)) (signal 'wrong-type-argument (list 'frameset cl-x))) (aref cl-x 1))) nil] 9 (#$ . 1082)]) (put 'frameset-version 'compiler-macro 'frameset-version--cmacro) #@61 Access slot "version" of `frameset' struct CL-X. (fn CL-X) (defalias 'frameset-version #[257 "\211\301H>\204 \302\303\304D\"\210\211\305H\207" [cl-struct-frameset-tags 0 signal wrong-type-argument frameset 1] 5 (#$ . 1510)]) (byte-code "\300\301\302\303#\300\301\304\305#\300\207" [function-put frameset-version side-effect-free t gv-expander #[514 "\300\301\302\"\207" [error "%s is a read-only slot" frameset-version] 5 "\n\n(fn CL-DO CL-X)"]] 5) #@75 compiler-macro for inlining `frameset-timestamp'. (fn CL-WHOLE-ARG CL-X) (defalias 'frameset-timestamp--cmacro #[514 "\300\301\302\303\211\211&\207" [cl--defsubst-expand (cl-x) (cl-block frameset-timestamp (progn (or (and (memq (aref cl-x 0) cl-struct-frameset-tags)) (signal 'wrong-type-argument (list 'frameset cl-x))) (aref cl-x 2))) nil] 9 (#$ . 1969)]) (put 'frameset-timestamp 'compiler-macro 'frameset-timestamp--cmacro) #@63 Access slot "timestamp" of `frameset' struct CL-X. (fn CL-X) (defalias 'frameset-timestamp #[257 "\211\301H>\204 \302\303\304D\"\210\211\305H\207" [cl-struct-frameset-tags 0 signal wrong-type-argument frameset 2] 5 (#$ . 2407)]) (byte-code "\300\301\302\303#\300\301\304\305#\300\207" [function-put frameset-timestamp side-effect-free t gv-expander #[514 "\300\301\302\"\207" [error "%s is a read-only slot" frameset-timestamp] 5 "\n\n(fn CL-DO CL-X)"]] 5) #@69 compiler-macro for inlining `frameset-app'. (fn CL-WHOLE-ARG CL-X) (defalias 'frameset-app--cmacro #[514 "\300\301\302\303\211\211&\207" [cl--defsubst-expand (cl-x) (cl-block frameset-app (progn (or (and (memq (aref cl-x 0) cl-struct-frameset-tags)) (signal 'wrong-type-argument (list 'frameset cl-x))) (aref cl-x 3))) nil] 9 (#$ . 2874)]) (put 'frameset-app 'compiler-macro 'frameset-app--cmacro) #@57 Access slot "app" of `frameset' struct CL-X. (fn CL-X) (defalias 'frameset-app #[257 "\211\301H>\204 \302\303\304D\"\210\211\305H\207" [cl-struct-frameset-tags 0 signal wrong-type-argument frameset 3] 5 (#$ . 3282)]) (byte-code "\300\301\302\303#\300\207" [function-put frameset-app side-effect-free t] 4) #@70 compiler-macro for inlining `frameset-name'. (fn CL-WHOLE-ARG CL-X) (defalias 'frameset-name--cmacro #[514 "\300\301\302\303\211\211&\207" [cl--defsubst-expand (cl-x) (cl-block frameset-name (progn (or (and (memq (aref cl-x 0) cl-struct-frameset-tags)) (signal 'wrong-type-argument (list 'frameset cl-x))) (aref cl-x 4))) nil] 9 (#$ . 3598)]) (put 'frameset-name 'compiler-macro 'frameset-name--cmacro) #@58 Access slot "name" of `frameset' struct CL-X. (fn CL-X) (defalias 'frameset-name #[257 "\211\301H>\204 \302\303\304D\"\210\211\305H\207" [cl-struct-frameset-tags 0 signal wrong-type-argument frameset 4] 5 (#$ . 4011)]) (byte-code "\300\301\302\303#\300\207" [function-put frameset-name side-effect-free t] 4) #@77 compiler-macro for inlining `frameset-description'. (fn CL-WHOLE-ARG CL-X) (defalias 'frameset-description--cmacro #[514 "\300\301\302\303\211\211&\207" [cl--defsubst-expand (cl-x) (cl-block frameset-description (progn (or (and (memq (aref cl-x 0) cl-struct-frameset-tags)) (signal 'wrong-type-argument (list 'frameset cl-x))) (aref cl-x 5))) nil] 9 (#$ . 4330)]) (put 'frameset-description 'compiler-macro 'frameset-description--cmacro) #@65 Access slot "description" of `frameset' struct CL-X. (fn CL-X) (defalias 'frameset-description #[257 "\211\301H>\204 \302\303\304D\"\210\211\305H\207" [cl-struct-frameset-tags 0 signal wrong-type-argument frameset 5] 5 (#$ . 4778)]) (byte-code "\300\301\302\303#\300\207" [function-put frameset-description side-effect-free t] 4) #@76 compiler-macro for inlining `frameset-properties'. (fn CL-WHOLE-ARG CL-X) (defalias 'frameset-properties--cmacro #[514 "\300\301\302\303\211\211&\207" [cl--defsubst-expand (cl-x) (cl-block frameset-properties (progn (or (and (memq (aref cl-x 0) cl-struct-frameset-tags)) (signal 'wrong-type-argument (list 'frameset cl-x))) (aref cl-x 6))) nil] 9 (#$ . 5118)]) (put 'frameset-properties 'compiler-macro 'frameset-properties--cmacro) #@64 Access slot "properties" of `frameset' struct CL-X. (fn CL-X) (defalias 'frameset-properties #[257 "\211\301H>\204 \302\303\304D\"\210\211\305H\207" [cl-struct-frameset-tags 0 signal wrong-type-argument frameset 6] 5 (#$ . 5561)]) (byte-code "\300\301\302\303#\300\207" [function-put frameset-properties side-effect-free t] 4) #@72 compiler-macro for inlining `frameset-states'. (fn CL-WHOLE-ARG CL-X) (defalias 'frameset-states--cmacro #[514 "\300\301\302\303\211\211&\207" [cl--defsubst-expand (cl-x) (cl-block frameset-states (progn (or (and (memq (aref cl-x 0) cl-struct-frameset-tags)) (signal 'wrong-type-argument (list 'frameset cl-x))) (aref cl-x 7))) nil] 9 (#$ . 5898)]) (put 'frameset-states 'compiler-macro 'frameset-states--cmacro) #@60 Access slot "states" of `frameset' struct CL-X. (fn CL-X) (defalias 'frameset-states #[257 "\211\301H>\204 \302\303\304D\"\210\211\305H\207" [cl-struct-frameset-tags 0 signal wrong-type-argument frameset 7] 5 (#$ . 6321)]) (byte-code "\300\301\302\303#\300\207" [function-put frameset-states side-effect-free t] 4) #@134 compiler-macro for inlining `frameset--make'. (fn CL-WHOLE &cl-quote &key VERSION TIMESTAMP APP NAME DESCRIPTION PROPERTIES STATES) (defalias 'frameset--make--cmacro #[385 "\300\301\"\206 \302A@\300\303\"\206 \304A@\300\305\"A@\300\306\"A@\300\307\"A@\300\310\"A@\300\311\"A@\211\203a \211@\312>\203I \211AA\262\2026 \313 >A@\203X \314\262\2026 \315\316@\"\210\2026 \210\317\320\321\314\f\314\f\f\f\f\f\f\f&\f\207" [plist-member :version (nil 1) :timestamp (nil (current-time)) :app :name :description :properties :states (:version :timestamp :app :name :description :properties :states :allow-other-keys) :allow-other-keys nil error "Keyword argument %s not one of (:version :timestamp :app :name :description :properties :states)" cl--defsubst-expand (version timestamp app name description properties states) (cl-block frameset--make (vector 'frameset version timestamp app name description properties states))] 22 (#$ . 6647)]) (put 'frameset--make 'compiler-macro 'frameset--make--cmacro) #@113 Constructor for objects of type `frameset'. (fn &key VERSION TIMESTAMP APP NAME DESCRIPTION PROPERTIES STATES) (defalias 'frameset--make #[128 "\300\301\"\206 \302A@\300\303\"\206 \304\305 DA@\300\306\"A@\300\307\"A@\300\310\"A@\300\311\"A@\300\312\"A@\211\203d \211@\313>\203L \211AA\262\2029 \314 >A@\203[ \304\262\2029 \315\316@\"\210\2029 \210\317\320&\207" [plist-member :version (nil 1) :timestamp nil current-time :app :name :description :properties :states (:version :timestamp :app :name :description :properties :states :allow-other-keys) :allow-other-keys error "Keyword argument %s not one of (:version :timestamp :app :name :description :properties :states)" vector frameset] 17 (#$ . 7674)]) (byte-code "\300\301\302\303#\304\305\306\307\310\303\311\312\305\307& \210\313\314\315\316#\210\313\317\315\320#\210\313\321\315\322#\210\313\323\315\324#\210\313\325\315\326#\210\313\327\315\330#\210\313\331\315\332#\210\313\333\315\334#\207" [function-put frameset--make side-effect-free t cl-struct-define frameset "A frameset encapsulates a serializable view of a set of frames and windows.\n\nIt contains the following slots, which can be accessed with\n(frameset-SLOT fs) and set with (setf (frameset-SLOT fs) VALUE):\n\n version A read-only version number, identifying the format\n of the frameset struct. Currently its value is 1.\n timestamp A read-only timestamp, the output of `current-time'.\n app A symbol, or a list whose first element is a symbol, which\n identifies the creator of the frameset and related info;\n for example, desktop.el sets this slot to a list\n `(desktop . ,desktop-file-version).\n name A string, the name of the frameset instance.\n description A string, a description for user consumption (to show in\n menus, messages, etc).\n properties A property list, to store both frameset-specific and\n user-defined serializable data.\n states A list of items (FRAME-PARAMETERS . WINDOW-STATE), in no\n particular order. Each item represents a frame to be\n restored. FRAME-PARAMETERS is a frame's parameter alist,\n extracted with (frame-parameters FRAME) and filtered\n through `frameset-filter-params'.\n WINDOW-STATE is the output of `window-state-get' applied\n to the root window of the frame.\n\nTo avoid collisions, it is recommended that applications wanting to add\nprivate serializable data to `properties' either store all info under a\nsingle, distinctive name, or use property names with a well-chosen prefix.\n\nA frameset is intended to be used through the following simple API:\n\n - `frameset-save', the type's constructor, captures all or a subset of the\n live frames, and returns a serializable snapshot of them (a frameset).\n - `frameset-restore' takes a frameset, and restores the frames and windows\n it describes, as faithfully as possible.\n - `frameset-p' is the predicate for the frameset type.\n - `frameset-valid-p' checks a frameset's validity.\n - `frameset-copy' returns a deep copy of a frameset.\n - `frameset-prop' is a `setf'able accessor for the contents of the\n `properties' slot.\n - The `frameset-SLOT' accessors described above." nil vector ((cl-tag-slot) (version 1 :read-only t) (timestamp (current-time) :read-only t) (app nil) (name nil) (description nil) (properties nil) (states nil)) cl-struct-frameset-tags put frameset-p function-documentation "Return non-nil if OBJECT is a frameset, nil otherwise.\n\n(fn OBJECT)" frameset-version "Return the version number of FRAMESET.\n\nIt is an integer that identifies the format of the frameset struct.\nThis slot cannot be modified.\n\n(fn FRAMESET)" frameset-timestamp "Return the creation timestamp of FRAMESET.\n\nThe value is in the format returned by `current-time'.\nThis slot cannot be modified.\n\n(fn FRAMESET)" frameset-app "Return the application identifier for FRAMESET.\n\nThe value is either a symbol, like `my-app', or a list\n(my-app ADDITIONAL-DATA...).\n\n(fn FRAMESET)" frameset-name "Return the name of FRAMESET (a string).\n\n(fn FRAMESET)" frameset-description "Return the description of FRAMESET (a string).\n\n(fn FRAMESET)" frameset-properties "Return the property list of FRAMESET.\n\nThis list is useful to store both frameset-specific and user-defined\nserializable data. The simplest way to access and modify it is\nthrough `frameset-prop' (which see).\n\n(fn FRAMESET)" frameset-states "Return the list of frame states of FRAMESET.\n\nA frame state is a pair (FRAME-PARAMETERS . WINDOW-STATE), where\nFRAME-PARAMETERS is a frame's parameter alist, extracted with\n(frame-parameters FRAME) and filtered through `frameset-filter-params',\nand WINDOW-STATE is the output of `window-state-get' applied to the\nroot window of the frame.\n\nIMPORTANT: Modifying this slot may cause frameset functions to fail,\nunless the type constraints defined above are respected.\n\n(fn FRAMESET)"] 11) #@85 Return a deep copy of FRAMESET. FRAMESET is copied with `copy-tree'. (fn FRAMESET) (defalias 'frameset-copy #[257 "\300\301\"\207" [copy-tree t] 4 (#$ . 12635)]) #@75 Return non-nil if OBJECT is a valid frameset, nil otherwise. (fn OBJECT) (defalias 'frameset-valid-p #[257 "\301!\205\370 \211G\302Y\205\370 \211\303H>\205\370 \211\303H>\204$ \304\305\306D\"\210\211\307H\250\205\370 \211\303H>\204: \304\305\306D\"\210\211\310H:\205\370 \211\303H>\204P \304\305\306D\"\210\211\311H\211?\206e \2119\206e \211:\205e \211@9\262\205\370 \211\303H>\204y \304\305\306D\"\210\211\312H\206\200 \313;\205\370 \211\303H>\204\223 \304\305\306D\"\210\211\314H\206\232 \313;\205\370 \211\303H>\204\255 \304\305\306D\"\210\211\315H<\205\370 \211\303H>\204\303 \304\305\306D\"\210\211\316H\211<\205\341 \317\320\303H>\204\335 \304\305\306D\"\210\316H\"\262\205\370 \211\303H>\204\365 \304\305\306D\"\210\211\307H\207" [cl-struct-frameset-tags vectorp 8 0 signal wrong-type-argument frameset 1 2 3 4 "" 5 6 7 cl-every consp] 8 (#$ . 12805)]) #@88 Setter function for `frameset-prop'. Internal use only. (fn FRAMESET PROPERTY VALUE) (defalias 'frameset--prop-setter #[771 "\301H>\204 \302\303\304D\"\210\211\305\306\301H>\204$ \302\303\304 D\"\210\305H#I\266\207" [cl-struct-frameset-tags 0 signal wrong-type-argument frameset 6 plist-put] 11 (#$ . 13697)]) #@150 Return the value for FRAMESET of PROPERTY. Properties can be set with (setf (frameset-prop FRAMESET PROPERTY) NEW-VALUE) (fn FRAMESET PROPERTY) (defalias 'frameset-prop #[514 "\301\302H>\204 \303\304\305D\"\210\306H\"\207" [cl-struct-frameset-tags plist-get 0 signal wrong-type-argument frameset 6] 7 (#$ . 14032)]) (byte-code "\300\301\302\303#\300\207" [function-put frameset-prop gv-expander #[385 "\300\301\302$\207" [gv--defsetter frameset-prop #[385 "\300\301C\"B\207" [frameset--prop-setter append] 6 "\n\n(fn VAL &rest ARGS)"]] 7 "\n\n(fn DO &rest ARGS)"]] 4) #@138 Minimum set of parameters to filter for live (on-session) framesets. DO NOT MODIFY. See `frameset-filter-alist' for a full description. (defvar frameset-session-filter-alist '((name . :never) (left . frameset-filter-iconified) (minibuffer . frameset-filter-minibuffer) (top . frameset-filter-iconified)) (#$ . 14622)) #@116 Parameters to filter for persistent framesets. DO NOT MODIFY. See `frameset-filter-alist' for a full description. (defvar frameset-persistent-filter-alist (nconc '((background-color . frameset-filter-sanitize-color) (buffer-list . :never) (buffer-predicate . :never) (buried-buffer-list . :never) (client . :never) (delete-before . :never) (font . frameset-filter-font-param) (font-backend . :never) (foreground-color . frameset-filter-sanitize-color) (frameset--text-pixel-height . :save) (frameset--text-pixel-width . :save) (fullscreen . frameset-filter-shelve-param) (GUI:font . frameset-filter-unshelve-param) (GUI:fullscreen . frameset-filter-unshelve-param) (GUI:height . frameset-filter-unshelve-param) (GUI:width . frameset-filter-unshelve-param) (height . frameset-filter-shelve-param) (outer-window-id . :never) (parent-frame . :never) (parent-id . :never) (mouse-wheel-frame . :never) (tty . frameset-filter-tty-to-GUI) (tty-type . frameset-filter-tty-to-GUI) (width . frameset-filter-shelve-param) (window-id . :never) (window-system . :never)) frameset-session-filter-alist) (#$ . 14948)) #@2149 Alist of frame parameters and filtering functions. This alist is the default value of the FILTERS argument of `frameset-save' and `frameset-restore' (which see). Initially, `frameset-filter-alist' is set to, and shares the value of, `frameset-persistent-filter-alist'. You can override any item in this alist by `push'ing a new item onto it. If, for some reason, you intend to modify existing values, do (setq frameset-filter-alist (copy-tree frameset-filter-alist)) before changing anything. On saving, PARAMETERS is the parameter alist of each frame processed, and FILTERED is the parameter alist that gets saved to the frameset. On restoring, PARAMETERS is the parameter alist extracted from the frameset, and FILTERED is the resulting frame parameter alist used to restore the frame. Elements of `frameset-filter-alist' are conses (PARAM . ACTION), where PARAM is a parameter name (a symbol identifying a frame parameter), and ACTION can be: nil The parameter is copied to FILTERED. :never The parameter is never copied to FILTERED. :save The parameter is copied only when saving the frame. :restore The parameter is copied only when restoring the frame. FILTER A filter function. FILTER can be a symbol FILTER-FUN, or a list (FILTER-FUN ARGS...). FILTER-FUN is invoked with (apply FILTER-FUN CURRENT FILTERED PARAMETERS SAVING ARGS) where CURRENT A cons (PARAM . VALUE), where PARAM is the one being filtered and VALUE is its current value. FILTERED The resulting alist (so far). PARAMETERS The complete alist of parameters being filtered, SAVING Non-nil if filtering before saving state, nil if filtering before restoring it. ARGS Any additional arguments specified in the ACTION. FILTER-FUN is allowed to modify items in FILTERED, but no other arguments. It must return: nil Skip CURRENT (do not add it to FILTERED). t Add CURRENT to FILTERED as is. (NEW-PARAM . NEW-VALUE) Add this to FILTERED instead of CURRENT. Frame parameters not on this alist are passed intact, as if they were defined with ACTION = nil. (defvar frameset-filter-alist frameset-persistent-filter-alist (#$ . 16060)) #@311 True when switching to a graphic display. Return non-nil if the parameter alist PARAMETERS describes a frame on a text-only terminal, and the frame is being restored on a graphic display; otherwise return nil. Only meaningful when called from a filtering function in `frameset-filter-alist'. (fn PARAMETERS) (defalias 'frameset-switch-to-gui-p #[257 "\205 \301\236A?\205 A\207" [frameset--target-display display] 3 (#$ . 18292)]) #@314 True when switching to a text-only terminal. Return non-nil if the parameter alist PARAMETERS describes a frame on a graphic display, and the frame is being restored on a text-only terminal; otherwise return nil. Only meaningful when called from a filtering function in `frameset-filter-alist'. (fn PARAMETERS) (defalias 'frameset-switch-to-tty-p #[257 "\205 \301\236A\205 A?\207" [frameset--target-display display] 3 (#$ . 18736)]) #@194 Remove CURRENT when switching from tty to a graphic display. For the meaning of CURRENT, FILTERED, PARAMETERS and SAVING, see `frameset-filter-alist'. (fn CURRENT FILTERED PARAMETERS SAVING) (defalias 'frameset-filter-tty-to-GUI #[1028 "\211\206 \300!?\207" [frameset-switch-to-gui-p] 6 (#$ . 19183)]) #@250 When switching to a GUI frame, remove "unspecified" colors. Useful as a filter function for tty-specific parameters. For the meaning of CURRENT, FILTERED, PARAMETERS and SAVING, see `frameset-filter-alist'. (fn CURRENT FILTERED PARAMETERS SAVING) (defalias 'frameset-filter-sanitize-color #[1028 "\211\206! \301!?\206! A;?\206! \302A\303\304\305#)\266\203?\207" [inhibit-changing-match-data frameset-switch-to-gui-p "^unspecified-[fb]g$" nil t string-match] 11 (#$ . 19496)]) #@341 Force the minibuffer parameter to have a sensible value. When saving, convert (minibuffer . #<window>) to (minibuffer . nil). When restoring, if there are two copies, keep the one pointing to a live window. For the meaning of CURRENT, FILTERED, PARAMETERS and SAVING, see `frameset-filter-alist'. (fn CURRENT FILTERED PARAMETERS SAVING) (defalias 'frameset-filter-minibuffer #[1028 "A\300\203 \301!\203 \302\202- \303\202- \304\236\211\262\203, \301!\203( \211\241\210\300\202- \303\207" [nil windowp (minibuffer) t minibuffer] 8 (#$ . 19988)]) #@312 When switching to a tty frame, save parameter P as PREFIX:P. The parameter can be later restored with `frameset-filter-unshelve-param'. PREFIX defaults to `GUI'. For the meaning of CURRENT, FILTERED, PARAMETERS and SAVING, see `frameset-filter-alist'. (fn CURRENT FILTERED PARAMETERS SAVING &optional PREFIX) (defalias 'frameset-filter-shelve-param #[1284 "\211\204 \300\262\203 \301\207\302!\203) \303\304\305@#!\211\236?\205( \211AB\207\306!\203<