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 : tutorial.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. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\300\301!\210\302\303\304\305\306\307%\207" [require help-mode custom-declare-face tutorial-warning-face ((t :inherit font-lock-warning-face)) "Face used to highlight warnings in the tutorial." :group help] 6) #@38 Point before display of key changes. (defvar tutorial--point-before-chkeys 0 (#$ . 630)) (make-variable-buffer-local 'tutorial--point-before-chkeys) #@37 Point after display of key changes. (defvar tutorial--point-after-chkeys 0 (#$ . 785)) (make-variable-buffer-local 'tutorial--point-after-chkeys) #@20 Tutorial language. (defvar tutorial--lang nil (#$ . 937)) (make-variable-buffer-local 'tutorial--lang) #@934 Give more information about a changed key binding. This is used in `help-with-tutorial'. The information includes the key sequence that no longer has a default binding, the default binding and the current binding. It also tells in what keymap the new binding has been done and how to access the function in the default binding from the keyboard. For `cua-mode' key bindings that try to combine CUA key bindings with default Emacs bindings information about this is shown. VALUE should have either of these formats: (cua-mode) (current-binding KEY-FUN DEF-FUN KEY WHERE) Where KEY is a key sequence whose standard binding has been changed KEY-FUN is the actual binding for KEY DEF-FUN is the standard binding of KEY WHERE is a text describing the key sequences to which DEF-FUN is bound now (or, if it is remapped, a key sequence for the function it is remapped to) (defalias 'tutorial--describe-nonstandard-key #[(value) "r\306\307 !q\210p\310 \210 \311\211\312\211\312 6\313 \210\314\315!\210+\211 7 8\316\3179D\320\321!\"\210r\307 q\210\322\323\261\210\312 69@\324=\203L \325c\210\202 9@\326=\203 9A@\32798\33098\33198\311\332 \311 : ; < = > ? @;\203\241 ;@ A\333A>\312# B;A;B@=\203\235 A<\311;*\202v <\203\252 \334\335!\210\336\337\340>!?#c\210\341@\203\303 \336\342@\"\202\304 \343\261\210\344c\210:\203\330 \345\336\346:\"\261\210=\347\230\203\363 \350?!\204\351\352\353?\"\354\261\210\202\355\356\357=\311\312 C\360#)\266\203\203 \347\202\f\361=\336\362?\"\261\210.\363e`\"\210)\364 )\3657!\210+\207" [default-directory #1=#:old-dir buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks get-buffer-create help-buffer kill-all-local-variables nil t erase-buffer run-hooks temp-buffer-setup-hook help-setup-xref tutorial--describe-nonstandard-key called-interactively-p interactive "Your Emacs customizations override the default binding for this key:" "\n\n" cua-mode "CUA mode is enabled.\n\nWhen CUA mode is enabled, you can use C-z, C-x, C-c, and C-v to\nundo, cut, copy, and paste in addition to the normal Emacs\nbindings. The C-x and C-c keys only do cut and copy when the\nregion is active, so in most cases, they do not conflict with the\nnormal function of these prefix keys.\n\nIf you really need to perform a command which starts with one of\nthe prefix keys even when the region is active, you have three\noptions:\n- press the prefix key twice very quickly (within 0.2 seconds),\n- press the prefix key and the following key within 0.2 seconds, or\n- use the SHIFT key with the prefix key, i.e. C-S-x or C-S-c." current-binding 2 3 4 current-active-maps lookup-key mapatoms #[(s) "?\205# \303 !\205# \304 J!\205# \302=?\205# \n J=\205# \211\207" [mapsym s map boundp keymapp] 2] format-message "The default Emacs binding for the key %s is the command `%s'. " key-description "However, your customizations have " "rebound it to the command `%s'" "unbound it" "." " (For the more advanced user:" " This binding is in the keymap `%s'.)" "" keymapp "\n\nYou can use M-x " format "%s" " RET instead." "\n\nWith your current key bindings" " you can use " "^the .*menus?$" string-match "the key" " to get the function `%s'." fill-region help-print-return-message internal-temp-output-buffer-show inhibit-read-only #2=#:buf standard-output value mapsym maps map where key db cb m mb inhibit-changing-match-data] 10 (#$ . 1047)]) #@219 Sort predicate for use with `tutorial--default-keys'. This is a predicate function to `sort'. The sorting is for presentation purpose only and is done on the key sequence. LEFT and RIGHT are the elements to compare. (defalias 'tutorial--sort-keys #[(left right) "\306A@\307\"\306 A@\307\" \2031 \n\2031 <\2031 \n<\2031 @\n@\232\2031 A\nA\202 @\n@ \211 \203P \f\203P <\203P \f<\203P \310 \f\"\202\207 \311 !\203b \311\f!\203b \fV\202\207 \311 !\203l \312\202\207 \311\f!\203v \307\202\207 9\205\207 \f9\205\207 \313\f!\313 !\231,\207" [left right y x cy cx append nil tutorial--sort-keys wholenump t symbol-name] 5 (#$ . 4548)]) #@58 Default Emacs key bindings that the tutorial depends on. (defconst tutorial--default-keys (byte-code "\302\303\304\305\306\307\310\311\312\313\314\315\316\317\320\321\322\323\324\325\326\327\330\331\332\333\334\335\336\337\340\341\342\343\344\345\346\347\350\351\352\353\354\355\356\357\360\361\362\363\364\365\366\367\370\371B\2577\372 \373\"*\207" [suspend-emacs default-keys suspend-frame (ESC-prefix [27]) (Control-X-prefix [24]) (mode-specific-command-prefix [3]) (save-buffers-kill-terminal [24 3]) (scroll-up-command [22]) (scroll-down-command [134217846]) (recenter-top-bottom [12]) (forward-char [6]) (backward-char [2]) (forward-word [134217830]) (backward-word [134217826]) (next-line [14]) (previous-line [16]) (move-beginning-of-line [1]) (move-end-of-line [5]) (backward-sentence [134217825]) (forward-sentence [134217829]) (newline " ") (beginning-of-buffer [134217788]) (end-of-buffer [134217790]) (universal-argument [21]) (keyboard-quit [7]) (downcase-region [24 12]) (delete-other-windows [24 49]) (delete-backward-char "") (delete-char [4]) (backward-kill-word [134217855]) (kill-word [134217828]) (kill-line [11]) (kill-sentence [134217835]) (set-mark-command [0]) (set-mark-command [67108896]) (kill-region [23]) (yank [25]) (yank-pop [134217849]) (undo [24 117]) (find-file [24 6]) (save-buffer [24 19]) (list-buffers [24 2]) (switch-to-buffer [24 98]) (save-some-buffers [24 115]) (execute-extended-command [134217848]) (describe-mode [8 109]) (set-fill-column [24 102]) (fill-paragraph [134217841]) (isearch-forward [19]) (isearch-backward [18]) (split-window-below [24 50]) (scroll-other-window [134217750]) (other-window [24 111]) (find-file-other-window [24 52 6]) (keyboard-escape-quit [27 27 27]) (describe-key-briefly [8 99]) (describe-key [8 107]) ([26]) sort tutorial--sort-keys] 56) (#$ . 5197)) #@40 Give detailed help about changed keys. (defalias 'tutorial--detailed-help #[(button) "r\306\307 !q\210p\310 \210 \311\211\312\211\312 7\313 \210\314\315!\210+\211 8 9\316\317:D\320\321!\"\210r\307 q\210\322:\323\" \322:\324\" rq\210\212eb\210\325;!*\211 <\203\326c\210\327 =\330=\331\332\333$c\210)<\311 >\211 ?\203?@\211>A@ @>@ A\334>8 B\335>8 C\336>8 D\337A! Erq\210\340A!) F@F=\204\fE\230\203\301 \341\342EG\343\344E%\210\345E\346\261\210\347j\210\350B\351@\352\353\354\312&\210\355j\210C<\203\344 \356C\330\357C\360\230\203\365 \330\361B\"\202\367 C\"c\210\350D@\352\362\351DA\354\312&\210\363c\210.?A\211?\204s *\364c\210\365 ,\3668!\210+\207" [default-directory #1=#:old-dir buffer-read-only buffer-file-name buffer-undo-list inhibit-modification-hooks get-buffer-create help-buffer kill-all-local-variables nil t erase-buffer run-hooks temp-buffer-setup-hook help-setup-xref tutorial--detailed-help called-interactively-p interactive button-get tutorial-buffer explain-key-desc tutorial--find-changed-keys "The following key bindings used in the tutorial have been changed\nfrom the Emacs default:\n\n" " %-14s %-27s %-16s\n" format "Standard Key" "Command" "In Your Emacs" 2 3 4 key-description key-binding put-text-property 0 face tutorial-warning-face " " " " 18 insert-button value action #[(button) "\301\302\303\"!\207" [button describe-function button-get value] 4 nil nil] follow-link 45 "list" " %-16s " "" "M-x %s" #[(b) "\302\301\"\303 !)\207" [b value button-get tutorial--describe-nonstandard-key] 3 nil nil] "\n" "\nIt is OK to change key bindings, but changed bindings do not\ncorrespond to what the tutorial says.\n\n" help-print-return-message internal-temp-output-buffer-show inhibit-read-only #2=#:buf standard-output button tutorial--default-keys changed-keys frm tk --dolist-tail-- def-fun key def-fun-txt where remark key-txt key-fun] 9 (#$ . 7037)]) #@1068 Find the key bindings used in the tutorial that have changed. Return a list with elements of the form '(KEY DEF-FUN DEF-FUN-TXT WHERE REMARK QUIET) where KEY is a key sequence whose standard binding has been changed DEF-FUN is the standard binding of KEY DEF-FUN-TXT is a short descriptive text for DEF-FUN WHERE is a text describing the key sequences to which DEF-FUN is bound now (or, if it is remapped, a key sequence for the function it is remapped to) REMARK is a list with info about rebinding. It has either of these formats: (TEXT cua-mode) (TEXT current-binding KEY-FUN DEF-FUN KEY WHERE) Here TEXT is a link text to show to the user. The rest of the list is used to show information when the user clicks the link. KEY-FUN is the actual binding for KEY. QUIET is t if this changed keybinding should be handled quietly. This is used by `tutorial--display-changes'. (defalias 'tutorial--find-changed-keys #[(default-keys) "\306\211\307\310!r\nq\210\311\216\312 \210 \306 \211 \203\332 @\211A@ ?\f@ @\313\314@\" A\315@! B@\316=\203A \317C\320\"\202T @\321=\203P \317C\322\"\202T \323?! D\324B\203a B\202c @! E\306 FE\203\303 E@F\325F!E\326EGW\203\306 \327E\330\331G#\331\230\203\306 \332F!\203\275 F\333\234\211F\203\275 \334F\317C\335\"\"A@\211F\203\275 F;\203\275 \336\337F\"\202\276 \340E\202\306 \341E\306D@=\204\321D\203\337 D\315@!=\204\321'\203?\342\232\203\362 D\343=\204 ?\344\232\203D\345=\203\346\347D\202\262'\203U@\316=\203!D\350\232\203!\351\211A\204K@\352=\2036D\353\232\2036\354\211A\204K@\321=\203UD\355\232\203U\356\211A\203U\357\347D\360E\202\262\361\362!\203\204\361\363!\203\2043\364=\203\204@\365=\203vD\366=\204\321@\367=\203\204D\370=\204\321G\203\245?\371\232\203\227D\372=\204\321?\373\232\203\245D\374=\204\321\375\376D@?E\257?@AE\306\257\211 H \235\203\313 \210\202\320H B). A\211\204 - *\207" [remark changed-keys #1=#:temp-buffer default-keys kdf --dolist-tail-- nil generate-new-buffer " *temp*" #[nil "\301!\205 \302!\207" [#1# buffer-name kill-buffer] 2] fundamental-mode format "%s" command-remapping ESC-prefix lookup-key [27] Control-X-prefix [24] key-binding where-is-internal key-description 10 substring 0 "<menu-bar>" vectorp 1 assoc [menu-bar] format-message "the `%s' menu" "the menus" "" [22] cua-paste [26] undo "cua-mode, more info" cua-mode (keymap (118 . cua-repeat-replace-region)) "\"ESC prefix\"" mode-specific-command-prefix (keymap (timeout . copy-region-as-kill)) "\"C-c prefix\"" (keymap (timeout . kill-region)) "\"C-x prefix\"" "cua-mode replacement" "Same key" boundp viper-mode-string viper-current-state vi-state isearch-forward viper-isearch-forward isearch-backward viper-isearch-backward [C-delete] kill-word [C-backspace] backward-kill-word "more info" current-binding key def-fun def-fun-txt rem-fun global-map key-fun where cwhere normal-erase-is-backspace #2=#:x] 7 (#$ . 8988)]) (defalias 'tutorial--key-description #[(key) "\302!\211\303\230\203 \304\202# \305\230\203 \306\202# \307\230\203\" \310\202# )\207" [key desc key-description "ESC" "<ESC>" "RET" "<Return>" "DEL" "<Delback>"] 3]) #@207 Display changes to some default key bindings. If some of the default key bindings that the tutorial depends on have been changed then display the changes in the tutorial buffer with some explanatory links. (defalias 'tutorial--display-changes #[nil "\306!\307\310 \"\311` \311 \312\313\314\315#\316Q 9\317\320!\203# \321\322!\210 \204- \317\320!\203g \323:\324\"\323:\325\" ;\211 <\203f ;\203f =b\210<\326\261\210\327;\330p\331\332\333\334\335\336& \210\337c\210\340=`\341#\210*eb\210\3429d\334#\205A\343\344\345!\n\"\211\203j \346\345\224\347\"\204j @ > A\211 ?A@ @\350?8 A\311\211 B C\311 DA\351\230\204<A\352\230\203\267 \353\354@\"A\355 E\323:\356\"B\323:\357\"CB\205\333 C\205\333 \353B>A#D\340\345\224\345\225\360#\210D\203<\361?8\203\376 \362\345\224\345\225\363D$\210\202<\212\361?\233\334\240\210\311y\210\346`\347\"\364=\203\311y\210\202 `\365D\326\261\210\327C\330p\331\332\366>\333\334\335\336& \210\367c\210\340\f`\370#\210).\202j .\207" [tutorial--default-keys changed-keys changed-keys-alist changed-key start case-fold-search tutorial--find-changed-keys mapcar #[(ck) "\301@!B\207" [ck tutorial--key-description] 2] nil "\\(?:[[:space:]]\\|[[:punct:]]\\)\\(" mapconcat #[(kdf) "\301\302A@!!\207" [kdf regexp-quote tutorial--key-description] 3] "\\|" "\\)[[:punct:][:space:]]" boundp viper-mode-string require cus-edit get-lang-string tut-chgdhead tut-chgdhead2 " [" insert-button tutorial-buffer action tutorial--detailed-help follow-link t face link "]\n\n" add-text-properties (tutorial-remark remark face tutorial-warning-face read-only t) re-search-forward assoc match-string 1 get-text-property tutorial-remark 3 "Same key" "" format "M-x %s" point-marker tut-chgdkey tut-chgdkey2 (face tutorial-warning-face tutorial-remark key-sequence) 5 put-text-property help-echo remark "** " explain-key-desc "] **\n" (tutorial-remark remark rear-nonsticky t face tutorial-warning-face read-only t) keybindings-regexp tutorial--lang head2 head tutorial--point-before-chkeys desc ck def-fun where s1 s2 help-string tutorial--point-after-chkeys] 13 (#$ . 12382)]) #@41 Directory to which tutorials are saved. (defalias 'tutorial--saved-dir #[nil "\300\301!\207" [locate-user-emacs-file "tutorial/"] 2 (#$ . 14514)]) #@39 File name in which to save tutorials. (defalias 'tutorial--saved-file #[nil "\303! \203 \304\230\203 \n\305P\306\n\307 \"*\207" [tutorial--lang ext file-name file-name-extension "" ".tut" expand-file-name tutorial--saved-dir] 3 (#$ . 14667)]) #@64 Remove the remark lines that was added to the tutorial buffer. (defalias 'tutorial--remove-remarks #[nil "\212eb\210\303\211\211\304`\305\"\203 `\211\202 \306`\305\"\211\205@ \306\n\305\"\304\n\305\" \2040 d b\210\307=\204\n \n |\210\202\n ,\207" [prop-val prop-end prop-start nil get-text-property tutorial-remark next-single-property-change key-sequence] 3 (#$ . 14924)]) #@214 Save the tutorial buffer. This saves the part of the tutorial before and after the area showing changed keys. It also saves the point position and the position where the display of changed bindings was inserted. (defalias 'tutorial--save-tutorial #[nil "\3011 \302\303!\203 \304\305 !\202 \306\307!0\207\306\310\311!\")\207" [err (error) y-or-n-p "Save your position in the tutorial? " tutorial--save-tutorial-to tutorial--saved-file message "Tutorial position not saved" "Error saving tutorial state: %s" error-message-string] 4 (#$ . 15316)]) #@93 Save the tutorial buffer to SAVED-FILE. See `tutorial--save-tutorial' for more information. (defalias 'tutorial--save-tutorial-to #[(saved-file) "\306 \204 \307`W\205\256 \310 \311\312 !\204. \3131\" \314 \311\"0\202- \315\316\317 \320\n!#)\210\312 !\203\251 \321U\203> `\202L ` W\203I `[\202L ` Z`\311\315 \322 \210eb\210\323 !\324\323\325!!!\324\261\210\3261x \327\311\211\"#0\202\204 \315\316\330\"\320\n!#)\210\3311\217 \332 0\202\223 \210\202\224 \210 b\210\203\242 \333\334!\202\245 \333\335!,\202\255 \333\336 \"*\207" [save-err tutorial-dir err tutorial--point-after-chkeys inhibit-read-only buffer-undo-list buffer-modified-p 1 tutorial--saved-dir nil file-directory-p (error) make-directory t warn "Could not create directory %s: %s" error-message-string 0 tutorial--remove-remarks number-to-string "\n" marker-position (error) write-region "Could not save tutorial to %s: %s" (error) undo-only message "Could not save tutorial state." "Saved tutorial state." "Can't save tutorial: %s is not a directory" old-point tut-point tutorial--point-before-chkeys saved-file] 5 (#$ . 15873)]) #@695 Select the Emacs learn-by-doing tutorial. If there is a tutorial version written in the language of the selected language environment, that version is used. If there's no tutorial in that language, `TUTORIAL' is selected. With ARG, you are asked to choose which language. If DONT-ASK-FOR-REVERT is non-nil the buffer is reverted without any question when restarting the tutorial. If any of the standard Emacs key bindings that are used in the tutorial have been changed then an explanatory note about this is shown in the beginning of the tutorial buffer. When the tutorial buffer is killed the content and the point position in the buffer is saved so that the tutorial may be resumed later. (defalias 'help-with-tutorial #[(&optional arg dont-ask-for-revert) "\306\307!\203- \310\311\312\313!\203( \314 P!\203\" \315\316!\210\313\317!\202+ \315\320!\202+ \315 !*\207\n\203G \321\322 \323\324\216\325\326 \"\210\327\330\331\332#+\202S \333 \330\"\203R \202S \332 @\333@\330\"\211 A B\334B!\211 C\205n \335C\336\" DC\205z \337C!? E\322 F\340 GeHD\203\231 \341\342\343\335C\336\"!!!\210\202\243 C\203\243 \344C!\210\345 \210C\203\274 E\204\274 I?\205\272 \314\346!?EE?\205n\344\347B!!\210@\204\322 \350\351!\210@J\352\353 !F\336 K\354 \210)\315\355!\210\356\317!\210\322L\325\357\360\322\336$\210I\203\375 \322FF\203\314\361!FF\203J\362\353 !\210\363\322\211 M N O\364 \210+eb\210\365\366\367 \370 \"!G\322y\210\365\366\367 \370 \"!P\322y\210e`|\210Pb\210\371 P\202g\362\372AQ\"!\210\363\322\211 M N O\364 \210+\322y\210\371 P\373 \210I\204w\315\316!\210\356\317!\210F\203\241\317GV\203\211G[\202\216GH\\\211 R\340W\203\231\340RRb\210)\202fdb\210\374\375\322\336#\203\260`d|\210eb\210\376\377!\210\201V \210\212\340y\210\201W \336 S\201X !)\262)\203\334`\340y\210`|\210\202\201X \201Y !\203\361\201Z \201[ !\210\202\201X \201\\ !\210\201Z \201] !\210\376\201^ !\210\201Z \201_ !\210\201V \210\201` \201a \201b e`\"\201c #\211 T\201d W\203G`\322\210`|\210T\317V\203b\201e T!\210\202b\201e T\201f \245!\210\340y\210\201e T\211\201f \245Z!\210)eb\210\322U\201g \322!.\207" [prompt2 prompt1 arg #1=#:setup-hook #2=#:fun current-language-environment boundp viper-current-state "You can not run the Emacs tutorial directly because you have enabled Viper." "\nThere is however a Viper tutorial you can run instead.\nRun the Viper tutorial? " fboundp viper-tutorial y-or-n-p message "" 0 "Tutorial aborted by user" minibuffer-completion-help nil #[nil "\302\303\"\210 \207" [#1# #2# remove-hook minibuffer-setup-hook] 3] #[nil "\301\302\"\207" [#1# remove-hook minibuffer-setup-hook] 3] add-hook minibuffer-setup-hook read-language-name tutorial "Language: " "English" get-language-info get-buffer get-buffer-window t buffer-modified-p 1 raise-frame window-frame select-window switch-to-buffer delete-other-windows "You have changed the Tutorial buffer. Revert it? " get-buffer-create error "Variable lang is nil" file-exists-p tutorial--saved-file erase-buffer "Preparing tutorial ..." sit-for kill-buffer-hook tutorial--save-tutorial "Resume your last saved tutorial? " insert-file-contents :safe hack-local-variables string-to-number buffer-substring-no-properties line-beginning-position line-end-position point-marker expand-file-name tutorial--display-changes search-backward ";;; arch-tag: " search-forward "\n<<" lang filename tut-buf-name old-tut-buf old-tut-win old-tut-is-ok old-tut-file old-tut-point tutorial--point-after-chkeys dont-ask-for-revert tutorial--lang inhibit-read-only buffer-auto-save-file-name enable-dir-local-variables enable-local-eval enable-local-variables tutorial--point-before-chkeys tutorial-directory old-point inhibit-changing-match-data n buffer-undo-list beginning-of-line "\\[" looking-at "<<Blank lines inserted.*>>" replace-match "[Middle of page left blank for didactic purposes. Text continues below]" "<<" "[" ">>" "]" - window-height count-lines 6 8 newline 2 set-buffer-modified-p] 7 (#$ . 16994) "P"]) #@332 Language specific strings for Emacs. This is an association list with the keys equal to the strings that can be returned by `read-language-name'. The elements in the list are themselves association lists with keys that are string ids and values that are the language specific strings. See `get-lang-string' for more information. (defconst lang-strings '(("English" (tut-chgdkey . "%s has been rebound, but you can use %s instead") (tut-chgdkey2 . "More") (tut-chgdhead . "\n NOTICE: The main purpose of the Emacs tutorial is to teach you\n the most important standard Emacs commands (key bindings).\n However, your Emacs has been customized by changing some of\n these basic editing commands, so it doesn't correspond to the\n tutorial. We have inserted colored notices where the altered\n commands have been introduced.") (tut-chgdhead2 . "More"))) (#$ . 21031)) #@591 Get a language specific string for Emacs. In certain places Emacs can replace a string shown to the user with a language specific string. This function retrieves such strings. LANG is the language specification. It should be one of those strings that can be returned by `read-language-name'. STRINGID is a symbol that specifies the string to retrieve. If no string is found for STRINGID in the chosen language then the English string is returned unless NO-ENG-FALLBACK is non-nil. See `lang-strings' for more information. Currently this feature is only used in `help-with-tutorial'. (defalias 'get-lang-string #[(lang stringid &optional no-eng-fallback) "\306 \"\307\211\203 \306\f A\"\211 \203 A)\n\204( \204( \310\311\f\312#\n*\207" [lang lang-strings found-string my-lang-strings stringid entry assoc nil get-lang-string "English" t no-eng-fallback] 5 (#$ . 21905)]) (provide 'tutorial)
Close
