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 : indent.elc
;ELC ;;; Compiled by mockbuild@c6b8.bsys.dev.centos.org on Thu Feb 19 13:02:16 2015 ;;; from file /builddir/build/BUILD/emacs-23.1/lisp/indent.el ;;; in Emacs version 23.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 "`indent.el' was compiled for Emacs 19.29 or later")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (custom-declare-group 'indent nil "Indentation commands." :group 'editing) #@68 Default number of columns for margin-changing functions to indent. (custom-declare-variable 'standard-indent '4 '(#$ . 676) :group 'indent :type 'integer) #@336 Function to indent the current line. This function will be called with no arguments. If it is called somewhere where auto-indentation cannot be done (e.g. inside a string), the function should simply return `noindent'. Setting this function is all you need to make TAB indent appropriately. Don't rebind TAB unless you really need to. (defvar indent-line-function 'indent-relative (#$ . 838)) #@383 Controls the operation of the TAB key. If t, hitting TAB always just indents the current line. If nil, hitting TAB indents the current line if point is at the left margin or in the line's indentation, otherwise it inserts a "real" TAB character. Some programming language modes have their own variable to control this, e.g., `c-tab-always-indent', and do not respect this variable. (custom-declare-variable 'tab-always-indent 't '(#$ . 1238) :group 'indent :type '(choice (const nil) (const t) (const always))) #@237 Indent line in proper way for current major mode. The buffer-local variable `indent-line-function' determines how to do this, but the functions `indent-relative' and `indent-relative-maybe' are special; we don't actually use them here. (defalias 'indent-according-to-mode #[nil "\302>\203) \212\303 \210\304\305x\210\303 \210\306 )i\306 X\203\" \307 !\202' \212\307 !))\207 \207" [indent-line-function column (indent-relative indent-relative-maybe) beginning-of-line "\n " nil current-indentation indent-line-to] 2 (#$ . 1756) nil]) #@676 Indent line or region in proper way for current major mode or insert a tab. Depending on `tab-always-indent', either insert a tab or indent. If initial point was within line's indentation, position after the indentation. Else stay at same point in text. If a prefix argument is given, also rigidly indent the entire balanced expression which starts at the beginning of the current line to reflect the current line's change in indentation. If `transient-mark-mode' is turned on and the region is active, indent the region (in this case, any prefix argument is ignored). The function actually called to indent the line is determined by the value of `indent-line-function'. (defalias 'indent-for-tab-command #[(&optional arg) "\306 \203\f \307\310 \311 \"\207\312=\204# \204' i\313 V\204# \n =\203' \314\f!\207\f\2055 \212\315y\210\316 \210\317 )\313 \210\f\205c \313 Z \320!?\205b \212\321y\210`W\205a \322`#))*\207" [indent-line-function tab-always-indent this-command last-command arg old-indent use-region-p indent-region region-beginning region-end indent-to-left-margin current-indentation insert-tab 0 forward-sexp point-marker zerop 1 indent-rigidly end-marker indentation-change] 4 (#$ . 2300) "P"]) (defalias 'insert-tab #[(&optional arg) "\305!\n\203 hz\306=\203 \307 \210 \203 \310\311 \"\202% \f i\f\245\\_j)\207" [arg count abbrev-mode indent-tabs-mode tab-width prefix-numeric-value 119 expand-abbrev insert-char 9] 4]) #@209 Indent all lines starting in the region sideways by ARG columns. Called from a program, takes three arguments, START, END and ARG. You can remove all indentation from a region by giving a large negative ARG. (defalias 'indent-rigidly #[(start end arg) "\212b\210\305 b\210n\204 \306y\210`W\203@ \307 \310\212\311\310w\210l)\n\2041 \312\313 \f\\]\313\"\210`\311\310w\210`|\210*\306y\210\202 \310\211\223)\207" [end start eol-flag indent arg point-marker 1 current-indentation nil " " indent-to 0] 4 (#$ . 3765) "r\np"]) #@158 Indent current line to COLUMN. This function removes or adds spaces and tabs at beginning of line only if necessary. It leaves point at end of indentation. (defalias 'indent-line-to #[(column) "\303 \210i\211 W\203$ \n\245\n_Z\nY\203 `\304\305x\210`|\210 j\2025 V\2055 \306 \307\"\210`\303 \210`|)\207" [cur-col column tab-width back-to-indentation " " nil move-to-column t] 4 (#$ . 4302)]) #@183 Return the left margin to use for this line. This is the value of the buffer-local variable `left-margin' plus the value of the `left-margin' text-property at the start of the line. (defalias 'current-left-margin #[nil "\212\301 \210\302\303m\203 o\204 `S\202 `\300\"\206 \302\\])\207" [left-margin back-to-indentation 0 get-text-property] 5 (#$ . 4707)]) #@315 Move to the left margin of the current line. With optional argument, move forward N-1 lines first. The column moved to is the one given by the `current-left-margin' function. If the line's indentation appears to be wrong, and this command is called interactively or with optional argument FORCE, it will be fixed. (defalias 'move-to-left-margin #[(&optional n force) "\304!\210\305\306w\210\307p!\203 \212\304 \210o)\203 \310 b\207\304 \207\311 i \nV\2037 \312\n \"\nV\205C \313u\202C \205C \nW\205C \314 *\207" [n cc lm force beginning-of-line " " nil minibufferp minibuffer-prompt-end current-left-margin move-to-column -1 indent-to-left-margin] 3 (#$ . 5075) (list (prefix-numeric-value current-prefix-arg) t)]) #@67 Indent current line to the column given by `current-left-margin'. (defalias 'indent-to-left-margin #[nil "\212\300\301 !\210)\212\302\303x\210n)\205 \302\303w\207" [indent-line-to current-left-margin " " nil] 2 (#$ . 5804)]) #@208 Remove left margin indentation from a region. This deletes to the column given by `current-left-margin'. In no case will it delete non-whitespace. Args FROM and TO are optional; default is the whole buffer. (defalias 'delete-to-left-margin #[(&optional from to) "\212\206 db\210\302 \206 eb\210n\204 \303y\210`W\203. `\304\305\306\"\210`|\210\303y\210\202 \305\211\223)\207" [to from point-marker 1 move-to-left-margin nil t] 4 (#$ . 6038)]) #@234 Set the left margin of the region to WIDTH. If `auto-fill-mode' is active, re-fill the region to fit the new margin. Interactively, WIDTH is the prefix argument, if specified. Without prefix argument, the command prompts for WIDTH. (defalias 'set-left-margin #[(from to width) "\212b\210\304\305x\210n\203 ` b\210\304\305w\210\306 )\307 \"\210\310 \311\n$\210\312 \n#\210 \2039 \212\313 \305\314\211%\210) \305\211\223\207" [from to width auto-fill-function " " nil point-marker delete-to-left-margin put-text-property left-margin indent-rigidly fill-region t] 6 (#$ . 6496) "r\nNSet left margin to column: "]) #@235 Set the right margin of the region to WIDTH. If `auto-fill-mode' is active, re-fill the region to fit the new margin. Interactively, WIDTH is the prefix argument, if specified. Without prefix argument, the command prompts for WIDTH. (defalias 'set-right-margin #[(from to width) "\212b\210\304\305x\210n\203 `)\306 \307\n$\210 \205# \212\310 \305\311\211%)\207" [from to width auto-fill-function " " nil put-text-property right-margin fill-region t] 6 (#$ . 7124) "r\nNSet right margin to width: "]) #@279 Programmatically change value of a text-property. For each region between FROM and TO that has a single value for PROPERTY, apply FUNCTION to that value and sets the property to the function's result. Optional fifth argument OBJECT specifies the string or buffer to operate on. (defalias 'alter-text-property #[(from to prop func &optional object) "\306\211\307 \f #\310 \n\f %\211\203) \311 \n\f ! %\210\n\202 \nW\205; \311 \n\f ! %+\207" [from val end begin prop object nil get-text-property text-property-not-all put-text-property to func] 6 (#$ . 7638)]) #@311 Increase or decrease the left-margin of the region. With no prefix argument, this adds `standard-indent' of indentation. A prefix arg (optional third arg INC noninteractively) specifies the amount to change the margin by, in characters. If `auto-fill-mode' is active, re-fill the region to fit the new margin. (defalias 'increase-left-margin #[(from to inc) "\203\n \305!\202 \212\nb\210\306\307x\210n\203 ` b\210\310 )\311\n \312\313$\210\314\n #\210\f\203< \212\315\n \307\316\211%\210) \307\211\223\207" [inc standard-indent from to auto-fill-function prefix-numeric-value " " nil point-marker alter-text-property left-margin #[(v) "[ \n\206 \303\\]\207" [left-margin inc v 0] 3] indent-rigidly fill-region t] 6 (#$ . 8221) "*r\nP"]) #@306 Make the left margin of the region smaller. With no prefix argument, decrease the indentation by `standard-indent'. A prefix arg (optional third arg INC noninteractively) specifies the amount to change the margin by, in characters. If `auto-fill-mode' is active, re-fill the region to fit the new margin. (defalias 'decrease-left-margin #[(from to inc) "\203\n \304!\202 \305\n [#\207" [inc standard-indent from to prefix-numeric-value increase-left-margin] 4 (#$ . 8977) "*r\nP"]) #@359 Increase the right-margin of the region. With no prefix argument, increase the right margin by `standard-indent'. A prefix arg (optional third arg INC noninteractively) specifies the amount to change the margin by, in characters. A negative argument decreases the right margin width. If `auto-fill-mode' is active, re-fill the region to fit the new margin. (defalias 'increase-right-margin #[(from to inc) "\203\n \305!\202 \212\306\n \307\310$\210\f\205 \311\n \312\313\211%)\207" [inc standard-indent from to auto-fill-function prefix-numeric-value alter-text-property right-margin #[(v) " \206 \302\\\207" [inc v 0] 2] fill-region nil t] 6 (#$ . 9472) "r\nP"]) #@354 Make the right margin of the region smaller. With no prefix argument, decrease the right margin by `standard-indent'. A prefix arg (optional third arg INC noninteractively) specifies the amount of width to remove, in characters. A negative argument increases the right margin width. If `auto-fill-mode' is active, re-fills region to fit in new margin. (defalias 'decrease-right-margin #[(from to inc) "\203\n \304!\202 \305\n [#\207" [inc standard-indent from to prefix-numeric-value increase-right-margin] 4 (#$ . 10152) "*r\nP"]) #@390 Move to the beginning of the text on this line. With optional argument, move forward N-1 lines first. From the beginning of the line, moves past the left-margin indentation, the fill-prefix, and any indentation used for centering or right-justifying the line, but does not move past any whitespace that was explicitly inserted (such as a tab used to indent the first line of a paragraph). (defalias 'beginning-of-line-text #[(&optional n) "\304!\210\305\306w\210 \203& \307\230\204& `d G`\\^{\232\2038 Gu\210\2028 \n\2038 \2038 \310 !\2038 \311\225b\210\312 \313>\205B \305\306w\207" [n fill-prefix adaptive-fill-mode adaptive-fill-regexp beginning-of-line " " nil "" looking-at 0 current-justification (center right)] 5 (#$ . 10698) "p"]) #@144 Short cut function to indent region using `indent-according-to-mode'. A value of nil means really run `indent-according-to-mode' on each line. (defvar indent-region-function nil (#$ . 11451)) #@736 Indent each nonblank line in the region. A numeric prefix argument specifies a column: indent each line to that column. With no prefix argument, the command chooses one of these methods and indents all the lines with it: 1) If `fill-prefix' is non-nil, insert `fill-prefix' at the beginning of each line in the region that does not already begin with it. 2) If `indent-region-function' is non-nil, call that function to indent the region. 3) Indent each line as specified by the variable `indent-line-function'. Called from a program, START and END specify the region to indent. If the third argument COLUMN is an integer, it specifies the column to indent to; if it is nil, use one of the three methods above. (defalias 'indent-region #[(start end &optional column) "\204d \2035 \212\nb\210\306 b\210\307 ! `\nW\2053 \310\f!\204- n\203* l\204- c\210\311y\210\202 *\207 \203> \n\"\207\212\312\n! b\210`\nW\203^ n\203T l\204X \210\311y\210\202F \n\313\211\223)\207\314!\212\nb\210\306 b\210n\204y \311y\210`\nW\203\226 `\315\313w\210`|\210l\204\220 \316\317\"\210\311y\210\202y \n\313\211\223)\207" [column fill-prefix end start regexp indent-region-function point-marker regexp-quote looking-at 1 copy-marker nil prefix-numeric-value " " indent-to 0 indent-line-function] 3 (#$ . 11650) "r\nP"]) #@190 Indent a new line like previous nonblank line. If the previous nonblank line has no indent points beyond the column point starts at, this command does nothing. See also `indent-relative'. (defalias 'indent-relative-maybe #[nil "\300\301!\207" [indent-relative t] 2 (#$ . 12995) nil]) #@496 Space out to under next indent point in previous nonblank line. An indent point is a non-whitespace character following whitespace. The following line shows the indentation points in this line. ^ ^ ^ ^ ^ ^ ^ ^ ^ If the previous nonblank line has no indent points beyond the column point starts at, `tab-to-tab-stop' is done instead, unless this command is invoked with a numeric argument, in which case it does nothing. See also `indent-relative-maybe'. (defalias 'indent-relative #[(&optional unindented-ok) "\203 hz\306=\203 \307 \210i\310\212\311 \210\312\313\310\314#\203M \212\315y\210`)\316\n!\210i\nV\2032 \317u\210\320\321!\204@ \f\204@ \322 w\210\323 w\210` U\204L i)) \203k \324 \325 \326\"\210 `V\203c b\210 \310\211\223)\202m \327 *\207" [abbrev-mode indent start-column end unindented-ok opoint 119 expand-abbrev nil beginning-of-line re-search-backward "^[^\n]" t 1 move-to-column -1 looking-at "[ ]" "^ " " " point-marker indent-to 0 tab-to-tab-stop] 4 (#$ . 13287) "P"]) #@124 List of tab stop positions used by `tab-to-tab-stop'. This should be a list of integers, ordered from smallest to largest. (custom-declare-variable 'tab-stop-list ''(8 16 24 32 40 48 56 64 72 80 88 96 104 112 120) '(#$ . 14334) :group 'indent :type '(repeat integer)) (put 'tab-stop-list 'safe-local-variable 'listp) #@34 Keymap used in `edit-tab-stops'. (defvar edit-tab-stops-map (byte-code "\301 \302\303\304#\210\302\305\304#\210)\207" [map make-sparse-keymap define-key "" edit-tab-stops-note-changes ""] 4) (#$ . 14657)) #@112 Buffer whose tab stops are being edited. This matters if the variable `tab-stop-list' is local in that buffer. (defvar edit-tab-stops-buffer nil (#$ . 14877)) #@294 Edit the tab stops used by `tab-to-tab-stop'. Creates a buffer *Tab Stops* containing text describing the tab stops. A colon indicates a column where there is a tab stop. You can add or remove colons and then do \<edit-tab-stops-map>\[edit-tab-stops-note-changes] to make changes take effect. (defalias 'edit-tab-stops #[nil "p\306\307\310!!\210\311 !\210\312\302!\210\313\314\315!\210\316\317 \210\f\211 \2031 \320 @\321\"\210\322c\210 A\211\204! )\321 \323c\210\324W\203Q \325\\c\210\326c\210T\211\202: \323c\210\321V\203g \327c\210S\211\202V )\330c\210eb\207" [edit-tab-stops-buffer edit-tab-stops-map indent-tabs-mode truncate-lines tab-stop-list tabs switch-to-buffer get-buffer-create "*Tab Stops*" use-local-map make-local-variable nil overwrite-mode 1 t erase-buffer indent-to 0 58 10 8 48 " " "0123456789" "\nTo install changes, type C-c C-c" count] 4 (#$ . 15043) nil]) #@35 Put edited tab stops into effect. (defalias 'edit-tab-stops-note-changes #[nil "\303\212\304b\210\303\210\305\306\303\307#\203 iB\202 )\310p\311 !\210!\210)\312\313!\207" [tabs edit-tab-stops-buffer tab-stop-list nil 1 search-backward ":" t bury-buffer switch-to-buffer message "Tab stops installed"] 4 (#$ . 15956) nil]) #@186 Insert spaces or tabs to next defined tab-stop column. The variable `tab-stop-list' is a list of columns at which there are tab stops. Use \[edit-tab-stops] to edit them interactively. (defalias 'tab-to-tab-stop #[nil "\203 hz\304U\203 \305 \210 \211\203\" i\n@Y\203\" \nA\211\204 \n\2033 `\306\307!\210\n@j)\2025 \310c)\207" [abbrev-mode tab-stop-list tabs opoint 119 expand-abbrev delete-horizontal-space t 32] 3 (#$ . 16293) nil]) #@175 Move point to next defined tab-stop column. The variable `tab-stop-list' is a list of columns at which there are tab stops. Use \[edit-tab-stops] to edit them interactively. (defalias 'move-to-tab-stop #[nil "\211\203 i @Y\203 A\211\204 \205M `\305 @\306\"\210\212\nb\210h\307=\205L g\310=\205L i \245 _ i\fV\203H h\307=\203H \311u\210\2026 `\n|)*)\207" [tab-stop-list tabs before tab-width tabend move-to-column t 32 9 -1] 4 (#$ . 16741) nil]) (byte-code "\303\304\305#\210\303 \306\307#\210\303\n\304\310#\210\303 \311\312#\207" [global-map esc-map ctl-x-map define-key " " indent-for-tab-command " " indent-region indent-rigidly "i" tab-to-tab-stop] 4)
Close
