Linux ns8.secondary29.go.th 2.6.32-754.28.1.el6.x86_64 #1 SMP Wed Mar 11 18:38:45 UTC 2020 x86_64
Apache/2.2.15 (CentOS)
: 122.154.134.11 | : 122.154.134.9
Cant Read [ /etc/named.conf ]
5.6.40
apache
www.github.com/MadExploits
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
CPANEL RESET
CREATE WP USER
README
+ Create Folder
+ Create File
/
usr /
share /
emacs /
23.1 /
lisp /
[ HOME SHELL ]
Name
Size
Permission
Action
calc
[ DIR ]
drwxr-xr-x
calendar
[ DIR ]
drwxr-xr-x
emacs-lisp
[ DIR ]
drwxr-xr-x
emulation
[ DIR ]
drwxr-xr-x
erc
[ DIR ]
drwxr-xr-x
eshell
[ DIR ]
drwxr-xr-x
gnus
[ DIR ]
drwxr-xr-x
international
[ DIR ]
drwxr-xr-x
language
[ DIR ]
drwxr-xr-x
mail
[ DIR ]
drwxr-xr-x
mh-e
[ DIR ]
drwxr-xr-x
net
[ DIR ]
drwxr-xr-x
nxml
[ DIR ]
drwxr-xr-x
obsolete
[ DIR ]
drwxr-xr-x
org
[ DIR ]
drwxr-xr-x
play
[ DIR ]
drwxr-xr-x
progmodes
[ DIR ]
drwxr-xr-x
term
[ DIR ]
drwxr-xr-x
textmodes
[ DIR ]
drwxr-xr-x
url
[ DIR ]
drwxr-xr-x
COPYING
34.32
KB
-rw-r--r--
README
538
B
-rw-r--r--
abbrev.elc
29.69
KB
-rw-r--r--
abbrevlist.elc
1.12
KB
-rw-r--r--
add-log.elc
35.21
KB
-rw-r--r--
align.elc
38.38
KB
-rw-r--r--
allout.elc
208.3
KB
-rw-r--r--
ansi-color.elc
16.3
KB
-rw-r--r--
apropos.elc
31.93
KB
-rw-r--r--
arc-mode.elc
54.72
KB
-rw-r--r--
array.elc
25.83
KB
-rw-r--r--
autoarg.elc
5.98
KB
-rw-r--r--
autoinsert.elc
12.01
KB
-rw-r--r--
autorevert.elc
18.25
KB
-rw-r--r--
avoid.elc
10.17
KB
-rw-r--r--
battery.elc
17.98
KB
-rw-r--r--
bindings.elc
39.04
KB
-rw-r--r--
bookmark.elc
55.9
KB
-rw-r--r--
bs.elc
48.34
KB
-rw-r--r--
buff-menu.elc
28
KB
-rw-r--r--
button.elc
13.92
KB
-rw-r--r--
calculator.elc
49.18
KB
-rw-r--r--
case-table.elc
4.42
KB
-rw-r--r--
cdl.elc
1.26
KB
-rw-r--r--
chistory.elc
5.75
KB
-rw-r--r--
cmuscheme.elc
17.43
KB
-rw-r--r--
comint.elc
100.97
KB
-rw-r--r--
compare-w.elc
10.98
KB
-rw-r--r--
complete.elc
23.62
KB
-rw-r--r--
completion.elc
45.06
KB
-rw-r--r--
composite.elc
29.39
KB
-rw-r--r--
cus-dep.elc
5.04
KB
-rw-r--r--
cus-edit.elc
129.67
KB
-rw-r--r--
cus-face.elc
10.46
KB
-rw-r--r--
cus-load.el
63.45
KB
-rw-r--r--
cus-start.elc
10.67
KB
-rw-r--r--
cus-theme.elc
13.7
KB
-rw-r--r--
custom.elc
36.46
KB
-rw-r--r--
cvs-status.elc
23
KB
-rw-r--r--
dabbrev.elc
23.08
KB
-rw-r--r--
delim-col.elc
8.41
KB
-rw-r--r--
delsel.elc
5.24
KB
-rw-r--r--
descr-text.elc
20.69
KB
-rw-r--r--
desktop.elc
34.52
KB
-rw-r--r--
dframe.elc
22.51
KB
-rw-r--r--
diff-mode.elc
55.58
KB
-rw-r--r--
diff.elc
5.51
KB
-rw-r--r--
dired-aux.elc
67.5
KB
-rw-r--r--
dired-x.elc
44.96
KB
-rw-r--r--
dired.elc
96.48
KB
-rw-r--r--
dirtrack.elc
7.39
KB
-rw-r--r--
disp-table.elc
8.33
KB
-rw-r--r--
dnd.elc
7.04
KB
-rw-r--r--
doc-view.elc
36.01
KB
-rw-r--r--
dos-fns.elc
5.53
KB
-rw-r--r--
dos-vars.elc
1.24
KB
-rw-r--r--
dos-w32.elc
11.12
KB
-rw-r--r--
double.elc
4.13
KB
-rw-r--r--
ebuff-menu.elc
9.11
KB
-rw-r--r--
echistory.elc
4.93
KB
-rw-r--r--
ediff-diff.elc
35.54
KB
-rw-r--r--
ediff-help.elc
11.47
KB
-rw-r--r--
ediff-hook.elc
5.89
KB
-rw-r--r--
ediff-init.elc
60.88
KB
-rw-r--r--
ediff-merg.elc
10.04
KB
-rw-r--r--
ediff-mult.elc
58.31
KB
-rw-r--r--
ediff-ptch.elc
18.63
KB
-rw-r--r--
ediff-util.elc
118.44
KB
-rw-r--r--
ediff-vers.elc
4.74
KB
-rw-r--r--
ediff-wind.elc
30.56
KB
-rw-r--r--
ediff.elc
36.28
KB
-rw-r--r--
edmacro.elc
21.45
KB
-rw-r--r--
ehelp.elc
11.03
KB
-rw-r--r--
electric.elc
2.81
KB
-rw-r--r--
elide-head.elc
2.8
KB
-rw-r--r--
emacs-lock.elc
2.77
KB
-rw-r--r--
emerge.elc
80.16
KB
-rw-r--r--
env.elc
5.69
KB
-rw-r--r--
epa-dired.elc
1.87
KB
-rw-r--r--
epa-file.elc
6.77
KB
-rw-r--r--
epa-hook.elc
4.28
KB
-rw-r--r--
epa-mail.elc
7.04
KB
-rw-r--r--
epa.elc
34.03
KB
-rw-r--r--
epg-config.elc
4.01
KB
-rw-r--r--
epg.elc
85.05
KB
-rw-r--r--
expand.elc
9.42
KB
-rw-r--r--
ezimage.elc
9.2
KB
-rw-r--r--
face-remap.elc
13.15
KB
-rw-r--r--
facemenu.elc
23.61
KB
-rw-r--r--
faces.elc
81.51
KB
-rw-r--r--
ffap.elc
46.14
KB
-rw-r--r--
filecache.elc
16.1
KB
-rw-r--r--
files.elc
175.25
KB
-rw-r--r--
filesets.elc
73.03
KB
-rw-r--r--
find-cmd.elc
4.94
KB
-rw-r--r--
find-dired.elc
7.4
KB
-rw-r--r--
find-file.elc
18.68
KB
-rw-r--r--
find-lisp.elc
7.42
KB
-rw-r--r--
finder-inf.el
93.47
KB
-rw-r--r--
finder.elc
12.11
KB
-rw-r--r--
flow-ctrl.elc
2.44
KB
-rw-r--r--
foldout.elc
7.6
KB
-rw-r--r--
follow.elc
37.11
KB
-rw-r--r--
font-core.elc
12.92
KB
-rw-r--r--
font-lock.elc
61.1
KB
-rw-r--r--
format-spec.elc
1.98
KB
-rw-r--r--
format.elc
27.73
KB
-rw-r--r--
forms-d2.el
3.13
KB
-rw-r--r--
forms-pass.el
742
B
-rw-r--r--
forms.elc
35.13
KB
-rw-r--r--
frame.elc
48.66
KB
-rw-r--r--
fringe.elc
8.01
KB
-rw-r--r--
generic-x.elc
44.25
KB
-rw-r--r--
gs.elc
3.93
KB
-rw-r--r--
help-at-pt.elc
11.27
KB
-rw-r--r--
help-fns.elc
21.77
KB
-rw-r--r--
help-macro.elc
4.37
KB
-rw-r--r--
help-mode.elc
19.38
KB
-rw-r--r--
help.elc
40.91
KB
-rw-r--r--
hex-util.elc
1.48
KB
-rw-r--r--
hexl.elc
32.06
KB
-rw-r--r--
hi-lock.elc
23.27
KB
-rw-r--r--
hilit-chg.elc
28.02
KB
-rw-r--r--
hippie-exp.elc
23.39
KB
-rw-r--r--
hl-line.elc
7.71
KB
-rw-r--r--
ibuf-ext.elc
54.62
KB
-rw-r--r--
ibuf-macs.elc
11.65
KB
-rw-r--r--
ibuffer.elc
91.96
KB
-rw-r--r--
icomplete.elc
10.36
KB
-rw-r--r--
ido.elc
110.93
KB
-rw-r--r--
ielm.elc
17.67
KB
-rw-r--r--
iimage.elc
4.06
KB
-rw-r--r--
image-dired.elc
82.24
KB
-rw-r--r--
image-file.elc
6.11
KB
-rw-r--r--
image-mode.elc
14.54
KB
-rw-r--r--
image.elc
17.09
KB
-rw-r--r--
imenu.elc
24.8
KB
-rw-r--r--
indent.elc
17
KB
-rw-r--r--
info-look.elc
26.13
KB
-rw-r--r--
info-xref.elc
7.04
KB
-rw-r--r--
info.elc
119.11
KB
-rw-r--r--
informat.elc
9.69
KB
-rw-r--r--
isearch.elc
76.23
KB
-rw-r--r--
isearchb.elc
4.92
KB
-rw-r--r--
iswitchb.elc
32.11
KB
-rw-r--r--
jit-lock.elc
17.93
KB
-rw-r--r--
jka-cmpr-hook.elc
11.67
KB
-rw-r--r--
jka-compr.elc
12.64
KB
-rw-r--r--
json.elc
13.04
KB
-rw-r--r--
kermit.elc
2.96
KB
-rw-r--r--
kmacro.elc
31.07
KB
-rw-r--r--
ldefs-boot.el
1.17
MB
-rw-r--r--
ledit.elc
4.74
KB
-rw-r--r--
linum.elc
9.56
KB
-rw-r--r--
loaddefs.el
1.17
MB
-rw-r--r--
loadhist.elc
8.65
KB
-rw-r--r--
loadup.el
12.67
KB
-rw-r--r--
locate.elc
17.81
KB
-rw-r--r--
log-edit.elc
24.93
KB
-rw-r--r--
log-view.elc
14.06
KB
-rw-r--r--
longlines.elc
14.94
KB
-rw-r--r--
lpr.elc
8.61
KB
-rw-r--r--
ls-lisp.elc
17.35
KB
-rw-r--r--
macros.elc
6.99
KB
-rw-r--r--
makesum.elc
2.16
KB
-rw-r--r--
man.elc
40.03
KB
-rw-r--r--
master.elc
4.52
KB
-rw-r--r--
mb-depth.elc
3.12
KB
-rw-r--r--
md4.elc
8.14
KB
-rw-r--r--
menu-bar.elc
67.01
KB
-rw-r--r--
midnight.elc
8.92
KB
-rw-r--r--
minibuf-eldef.elc
5.15
KB
-rw-r--r--
minibuffer.elc
42.75
KB
-rw-r--r--
misc.elc
3.67
KB
-rw-r--r--
misearch.elc
8.96
KB
-rw-r--r--
mouse-copy.elc
4.07
KB
-rw-r--r--
mouse-drag.elc
7.33
KB
-rw-r--r--
mouse-sel.elc
20.93
KB
-rw-r--r--
mouse.elc
60.03
KB
-rw-r--r--
msb.elc
27.27
KB
-rw-r--r--
mwheel.elc
9.41
KB
-rw-r--r--
newcomment.elc
32.76
KB
-rw-r--r--
novice.elc
4.75
KB
-rw-r--r--
outline.elc
34.54
KB
-rw-r--r--
paren.elc
6.43
KB
-rw-r--r--
password-cache.elc
3.58
KB
-rw-r--r--
patcomp.el
775
B
-rw-r--r--
paths.el
7.28
KB
-rw-r--r--
pcmpl-cvs.elc
6
KB
-rw-r--r--
pcmpl-gnu.elc
8.21
KB
-rw-r--r--
pcmpl-linux.elc
3.17
KB
-rw-r--r--
pcmpl-rpm.elc
7.5
KB
-rw-r--r--
pcmpl-unix.elc
5.44
KB
-rw-r--r--
pcomplete.elc
34.1
KB
-rw-r--r--
pcvs-defs.elc
16.27
KB
-rw-r--r--
pcvs-info.elc
25.83
KB
-rw-r--r--
pcvs-parse.elc
15.34
KB
-rw-r--r--
pcvs-util.elc
26.8
KB
-rw-r--r--
pcvs.elc
85.52
KB
-rw-r--r--
pgg-def.elc
2.78
KB
-rw-r--r--
pgg-gpg.elc
13.09
KB
-rw-r--r--
pgg-parse.elc
13.45
KB
-rw-r--r--
pgg-pgp.elc
7.64
KB
-rw-r--r--
pgg-pgp5.elc
7.68
KB
-rw-r--r--
pgg.elc
18.01
KB
-rw-r--r--
printing.elc
157.56
KB
-rw-r--r--
proced.elc
57.95
KB
-rw-r--r--
ps-bdf.elc
13.34
KB
-rw-r--r--
ps-def.elc
3.09
KB
-rw-r--r--
ps-mule.elc
36.17
KB
-rw-r--r--
ps-print.elc
145.59
KB
-rw-r--r--
ps-samp.elc
5.5
KB
-rw-r--r--
recentf.elc
49.04
KB
-rw-r--r--
rect.elc
10.79
KB
-rw-r--r--
register.elc
10.69
KB
-rw-r--r--
repeat.elc
6.05
KB
-rw-r--r--
replace.elc
55.02
KB
-rw-r--r--
reposition.elc
2.88
KB
-rw-r--r--
reveal.elc
6.61
KB
-rw-r--r--
rfn-eshadow.elc
7.12
KB
-rw-r--r--
rot13.elc
2.6
KB
-rw-r--r--
ruler-mode.elc
22.48
KB
-rw-r--r--
s-region.elc
3.3
KB
-rw-r--r--
savehist.elc
10.57
KB
-rw-r--r--
saveplace.elc
7.51
KB
-rw-r--r--
sb-image.elc
2.51
KB
-rw-r--r--
scroll-all.elc
4.05
KB
-rw-r--r--
scroll-bar.elc
11.47
KB
-rw-r--r--
scroll-lock.elc
4.64
KB
-rw-r--r--
select.elc
11.8
KB
-rw-r--r--
server.elc
39.79
KB
-rw-r--r--
ses.elc
87.39
KB
-rw-r--r--
sha1.elc
8
KB
-rw-r--r--
shadowfile.elc
22.61
KB
-rw-r--r--
shell.elc
34.08
KB
-rw-r--r--
simple.elc
196.35
KB
-rw-r--r--
skeleton.elc
15.78
KB
-rw-r--r--
smerge-mode.elc
33.61
KB
-rw-r--r--
sort.elc
12.94
KB
-rw-r--r--
soundex.elc
1.34
KB
-rw-r--r--
speedbar.elc
115.06
KB
-rw-r--r--
startup.elc
60.78
KB
-rw-r--r--
strokes.elc
44.11
KB
-rw-r--r--
subdirs.el
426
B
-rw-r--r--
subr.elc
113.48
KB
-rw-r--r--
t-mouse.elc
3.38
KB
-rw-r--r--
tabify.elc
2
KB
-rw-r--r--
talk.elc
3.19
KB
-rw-r--r--
tar-mode.elc
52.24
KB
-rw-r--r--
tempo.elc
18.63
KB
-rw-r--r--
term.elc
99.67
KB
-rw-r--r--
terminal.elc
31.36
KB
-rw-r--r--
thingatpt.elc
10.84
KB
-rw-r--r--
thumbs.elc
26.23
KB
-rw-r--r--
time-stamp.elc
21.03
KB
-rw-r--r--
time.elc
18.2
KB
-rw-r--r--
timezone.elc
10.99
KB
-rw-r--r--
tmm.elc
13.9
KB
-rw-r--r--
tool-bar.elc
9.69
KB
-rw-r--r--
tooltip.elc
12.35
KB
-rw-r--r--
tree-widget.elc
20.87
KB
-rw-r--r--
tutorial.elc
21.41
KB
-rw-r--r--
type-break.elc
35.61
KB
-rw-r--r--
uniquify.elc
19.91
KB
-rw-r--r--
userlock.elc
4.69
KB
-rw-r--r--
vc-annotate.elc
22.68
KB
-rw-r--r--
vc-arch.elc
17.58
KB
-rw-r--r--
vc-bzr.elc
26.84
KB
-rw-r--r--
vc-cvs.elc
32.19
KB
-rw-r--r--
vc-dav.elc
5.3
KB
-rw-r--r--
vc-dir.elc
39.5
KB
-rw-r--r--
vc-dispatcher.elc
14.61
KB
-rw-r--r--
vc-git.elc
32.75
KB
-rw-r--r--
vc-hg.elc
25.95
KB
-rw-r--r--
vc-hooks.elc
32.75
KB
-rw-r--r--
vc-mtn.elc
10.95
KB
-rw-r--r--
vc-rcs.elc
34.99
KB
-rw-r--r--
vc-sccs.elc
13.24
KB
-rw-r--r--
vc-svn.elc
20.57
KB
-rw-r--r--
vc.elc
59.4
KB
-rw-r--r--
vcursor.elc
23.44
KB
-rw-r--r--
version.el
3.37
KB
-rw-r--r--
view.elc
35.96
KB
-rw-r--r--
vt-control.elc
2.06
KB
-rw-r--r--
vt100-led.elc
1.53
KB
-rw-r--r--
w32-fns.elc
15.82
KB
-rw-r--r--
w32-vars.elc
5.53
KB
-rw-r--r--
wdired.elc
21.69
KB
-rw-r--r--
whitespace.elc
59.83
KB
-rw-r--r--
wid-browse.elc
7.89
KB
-rw-r--r--
wid-edit.elc
104.76
KB
-rw-r--r--
widget.elc
1.37
KB
-rw-r--r--
windmove.elc
9.57
KB
-rw-r--r--
window.elc
57.4
KB
-rw-r--r--
winner.elc
11.61
KB
-rw-r--r--
woman.elc
107.73
KB
-rw-r--r--
x-dnd.elc
19.35
KB
-rw-r--r--
xml.elc
18.38
KB
-rw-r--r--
xt-mouse.elc
7.43
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : tutorial.elc
;ELC ;;; Compiled by mockbuild@c6b8.bsys.dev.centos.org on Thu Feb 19 13:05:22 2015 ;;; from file /builddir/build/BUILD/emacs-23.1/lisp/tutorial.el ;;; in Emacs version 23.1.1 ;;; with all optimizations. ;;; This file uses dynamic docstrings, first added in Emacs 19.29. (if (and (boundp 'emacs-version) (< (aref emacs-version (1- (length emacs-version))) ?A) (or (and (boundp 'epoch::version) epoch::version) (string-lessp emacs-version "19.29"))) (error "`tutorial.el' was compiled for Emacs 19.29 or later")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (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 (#$ . 829)) (make-variable-buffer-local 'tutorial--point-before-chkeys) #@37 Point after display of key changes. (defvar tutorial--point-after-chkeys 0 (#$ . 984)) (make-variable-buffer-local 'tutorial--point-after-chkeys) #@20 Tutorial language. (defvar tutorial--lang nil (#$ . 1136)) (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) "\306 \220\307\310Dt\"\210r\306 q\210\311\312\261\210\313@\314=\203# \315c\210\202\330 @\316=\203\330 A@\3178\3208\3218\322\323 \322 . / 0 \203i @ 1\3241.\313# 2 A20=\203e 1\322*\202D \f\203q \325\326!\210\327\330.!\331\261\210\332\333/\"c\210\334\335\261\210\332\3330\"c\210\336c\210\n\203\236 \337\340\332\333\n\"\341\261\210 \342\230\203\270 \343/!\204\321 \344\332\333/\"\345\261\210\202\321 \346\347\350\351 \"\203\305 \342\202\306 \352 \353\332\333/\"\336\261\210.\354e`\"\210)\355 )\221\207" [value inhibit-read-only mapsym maps map where help-buffer help-setup-xref tutorial--describe-nonstandard-key "Your Emacs customizations override the default binding for this key:" "\n\n" t 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 nil 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] "The default Emacs binding for the key " key-description " is the command `" format "%s" "'. " "However, your customizations have rebound it to the command `" "'." " (For the more advanced user:" " This binding is in the keymap `" "'.)" "" keymapp "\n\nYou can use M-x " " RET instead." "\n\nWith your current key bindings" " you can use " string-match "^the .*menus?$" "the key" " to get the function `" fill-region print-help-return-message key db cb m mb] 9 (#$ . 1247)]) #@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) "\306\211A@)\307\"\306\n\211A@)\307\" \2037 \2037 <\2037 <\2037 @ @\232\2037 A A\202 @ @ \211 \203V \f\203V <\203V \f<\203V \310 \f\"\202\215 \311 !\203h \311\f!\203h \fV\202\215 \311 !\203r \312\202\215 \311\f!\203| \307\202\215 9\205\215 \f9\205\215 \313\f!\313 !\231,\207" [left x right y cy cx append nil tutorial--sort-keys wholenump t symbol-name] 5 (#$ . 4285)]) #@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\371\372B\2578\373 \374\"*\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 [22]) (scroll-down [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]) (advertised-undo [24 117]) (advertised-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-vertically [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] 57) (#$ . 4942)) #@40 Give detailed help about changed keys. (defalias 'tutorial--detailed-help #[(button) "\306 \220\307\310Dt\"\210r\306 q\210\311\301\"\311\302\"r q\210\212eb\210\312 !*\211 \203\356 \313c\210\314 \315 \316\317\320$c\210)\f\321 .\211 /\203\355 /@\211.A@ 0.@ 1\322.8 2\323.8 3\324.8 4\3250! 5\3261! 6r q\210\3271!) 7\321 807=\204\342 6\n\230\203\227 \330\3316G\332\3336%\210\3346\335\261\210\336j\210\3372\3400\341\342\343\344&\210\345j\2103<\203\272 \3463\315\3473\350\230\203\313 \315\3512\"\202\315 3\"c\210\3374@\341\352\3404A\343\344&\210\353c\210. /A\211/\204B *\354c\210\355 ,\221\207" [button tutorial-buffer explain-key-desc tutorial--default-keys changed-keys frm help-buffer help-setup-xref tutorial--detailed-help button-get 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" nil 2 3 4 command-remapping 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 t 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" print-help-return-message tk --dolist-tail-- def-fun key def-fun-txt where remark rem-fun key-txt key-fun tot-len] 10 (#$ . 6813)]) #@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\316 @\211A@ >\f@ ?\313\314?\" @\315?! A?\316=\203A \317B\320\"\202T ?\321=\203P \317B\322\"\202T \323>! C\324A\203a A\202c ?! D\306 ED\203\306 D@E\325E!D\326DGW\203\311 D\327\330GO\330\230\203\311 \331E!\203\300 E\332\234\211E\203\300 \333E\317B\334\"\"\211 FA@)\211E\203\300 E;\203\300 \313\335E\"\202\301 \336D\202\311 \337D\306C?=\204\305C\203\342 C\315?!=\204\305%\203\n>\340\232\203\365 C\341=\204>\342\232\203\nC\343=\203\n\344\345D\202\265%\203X?\316=\203$C\346\232\203$\347\211@\204N?\350=\2039C\351\232\2039\352\211@\204N?\321=\203XC\353\232\203X\354\211@\203X\355\345D\356D\202\265\357\360!\203\207\357\361!\203\2071\362=\203\207?\363=\203yC\364=\204\305?\365=\203\207C\366=\204\305G\203\250>\367\232\203\232C\370\232\204\305>\371\232\203\250C\372\232\204\305\373\374C?>D\257\375\301>?@D\306\257\"\210. A\211\204 - *\207" [remark changed-keys #1=#:temp-buffer default-keys kdf --dolist-tail-- nil generate-new-buffer " *temp*" ((byte-code "\301!\203\n \302!\210\301\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 0 "<menu-bar>" vectorp 1 assoc [menu-bar] "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 add-to-list key def-fun def-fun-txt rem-fun global-map key-fun where cwhere x normal-erase-is-backspace] 9 (#$ . 8408)]) (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#\205F\343\344\345!\n\"\211\203j \346\345\224\347\"\204j @ > A\211 ?@ @?A@ A\350?8 B\311\211 C D\311 EB\351\230\204AB\352\230\203\274 \353\354A\"B\355 F\323:\356\"C\323:\357\"DC\205\340 D\205\340 \353C>B#E\340\345\224\345\225\360#\210E\203A\361?8\203\362\345\224\345\225\363E$\210\202A\212\361?\233\334\240\210\311y\210\346`\347\"\364=\203 \311y\210\202`\365E\326\261\210\327D\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:]]\\(" 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 key def-fun where s1 s2 help-string tutorial--point-after-chkeys] 13 (#$ . 11786)]) #@41 Directory to which tutorials are saved. (defalias 'tutorial--saved-dir #[nil "\300\301!\207" [locate-user-emacs-file "tutorial/"] 2 (#$ . 13902)]) #@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 (#$ . 14055)]) #@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 (#$ . 14312)]) #@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 "\300\301\302\217\207" [err (byte-code "\300\301!\203 \302\303 !\207\304\305!\207" [y-or-n-p "Save your position in the tutorial? " tutorial--save-tutorial-to tutorial--saved-file message "Tutorial position not saved"] 2) ((error (byte-code "\301\302\303!\"\207" [err message "Error saving tutorial state: %s" error-message-string] 4)))] 3 (#$ . 14704)]) #@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\205y \310 \311\312 !\204 \313\314\315\217\210\312 !\203t \n\316U\203+ `\2029 `\nW\2036 `[\2029 `\nZ`\311\317 \320 \210eb\210\321 !\322\321\323 !!\322\261\210\313\324\325\217\210\313\326\327\217\210 b\210\203m \330\331!\202p \330\332!,\202x \330\333 \"*\207" [save-err tutorial-dir tutorial--point-after-chkeys inhibit-read-only buffer-undo-list old-point buffer-modified-p 1 tutorial--saved-dir nil file-directory-p err (make-directory tutorial-dir nil) ((error (byte-code "\303\304\305 \306\n!#\207" [save-err tutorial-dir err t warn "Could not create directory %s: %s" error-message-string] 5))) 0 t tutorial--remove-remarks number-to-string "\n" marker-position (byte-code "\301\302\211#\207" [saved-file write-region nil] 4) ((error (byte-code "\303\304\305 \306\n!#\207" [save-err saved-file err t warn "Could not save tutorial to %s: %s" error-message-string] 5))) (undo-only) ((error)) message "Could not save tutorial state." "Saved tutorial state." "Can't save tutorial: %s is not a directory" tut-point tutorial--point-before-chkeys] 5 (#$ . 15321)]) #@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\203A \321\303\322\"\210\323\324\325\326#)\202M \327\f\324\"\203L \f\202M \326 \327 \324\"\211 @ A\330A!\211 B\205f \331B\332\" CB\205r \333B!? D\334 E\335 FeGC\203\221 \336\337\340\331B\332\"!!!\210\202\233 B\203\233 \341B!\210\342 \210B\203\264 D\204\264 H?\205\262 \314\343!?DD?\205\341\344A!!\210 \204\311 \345\346!\210 I\347\350 !E\332 J\351 \210)\315\352!\210\353\317!\210\334K\321\354\355\334\332$\210H\203\363 \334EE\203\375 \314\356!EE\2033\357\350 !\210eb\210\360\361\362 \363 \"!F\334y\210\360\361\362 \363 \"!L\334y\210e`|\210Lb\210\364 L\202C\357\365@M\"!\210\334y\210\364 L\366 \210H\204S\315\316!\210\353\317!\210E\203}\317FV\203eF[\202jFG\\\211 N\335W\203u\335NNb\210)\202eb\210\367\370!\210\371 \210\212\335y\210\372\373!)\203\234`\335y\210`|\210\202\277\372\374!\203\251\375\376!\210\202\277\372\377!\210\375\201Q !\210\367\201R !\210\375\201S !\210\371 \210\201T \201U \201V !\201W e`\"\201X #\211 O\201Y W\203\362`\334\210`|\210\201Z O!\210\202 \201Z O\201[ \245!\210\335y\210\201Z O\211\201[ \245Z!\210)eb\210\334P\201\\ \334!.\207" [prompt2 prompt1 arg minibuffer-setup-hook current-language-environment lang 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" add-hook minibuffer-completion-help read-language-name tutorial "Language: " "English" get-language-info get-buffer get-buffer-window t buffer-modified-p nil 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 string-to-number buffer-substring-no-properties line-beginning-position line-end-position point-marker expand-file-name tutorial--display-changes search-forward "\n<<" beginning-of-line looking-at "\\[" "<<Blank lines inserted.*>>" replace-match "[Middle of page left blank for didactic purposes. Text continues below]" "<<" 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 tutorial--point-before-chkeys tutorial-directory old-point n buffer-undo-list "[" ">>" "]" - window-height selected-window count-lines 6 8 newline 2 set-buffer-modified-p] 7 (#$ . 16567) "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"))) (#$ . 20137)) #@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 (#$ . 21011)]) (provide 'tutorial)
Close
