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 : indent.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\302\303\304\305%\210\306\307\310\311\312DD\313\304\301\314\315&\207" [custom-declare-group indent nil "Indentation commands." :group editing custom-declare-variable standard-indent funcall function #[0 "\300\207" [4] 1] "Default number of columns for margin-changing functions to indent." :type integer] 8) #@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 (#$ . 738)) (byte-code "\300\301\302\303\304DD\305\306\307\310\311&\207" [custom-declare-variable tab-always-indent funcall function #[0 "\300\207" [t] 1] "Controls the operation of the TAB key.\nIf t, hitting TAB always just indents the current line.\nIf nil, hitting TAB indents the current line if point is at the left margin\nor in the line's indentation, otherwise it inserts a \"real\" TAB character.\nIf `complete', TAB first tries to indent the current line, and if the line\nwas already indented, then try to complete the thing at point.\n\nSome programming language modes have their own variable to control this,\ne.g., `c-tab-always-indent', and do not respect this variable." :group indent :type (choice (const :tag "Always indent" t) (const :tag "Indent if inside indentation, else TAB" nil) (const :tag "Indent, or if already indented complete" complete))] 8) #@381 Indent line in proper way for current major mode. Normally, this is done by calling the function specified by the variable `indent-line-function'. However, if the value of that variable is `indent-relative' or `indent-relative-first-indent-point', handle it specially (since those functions are used for tabbing); in that case, indent by aligning to the previous non-blank line. (defalias 'indent-according-to-mode #[0 "\214~\210\301\302 !\210\303>\203B \212\304 \210o\203 \305\202* \304\305!\210\306\307!\203( \305\202* \310 )i\310 X\2038 \311!\202= \212\311!)\262\202D )\207" [indent-line-function syntax-propertize line-end-position (indent-relative indent-relative-maybe indent-relative-first-indent-point) beginning-of-line 0 looking-at "[ ]*$" current-indentation indent-line-to] 3 (#$ . 2001) nil]) (defalias 'indent--default-inside-comment #[0 "i\303 V\206\n =?\205A \304 \3058\205? \306\212\307y\210\310\311w\210\312`S\3138\314 #\203: \3138b\210\315\n!\203: \316\225b\210i)!\210\317\262\207" [this-command last-command comment-start-skip current-indentation syntax-ppss 4 indent-line-to -1 " " nil < 8 line-end-position looking-at 0 t] 6]) #@932 Indent the current line or region, or insert a tab, as appropriate. This function either inserts a tab, or indents the current line, or performs symbol completion, depending on `tab-always-indent'. The function called to actually indent the line or insert a tab is given by the variable `indent-line-function'. If a prefix argument is given, after this function indents the current line or inserts a tab, it also rigidly indents the entire balanced expression which starts at the beginning of the current line, to reflect the current line's indentation. In most major modes, if point was in the current line's indentation, it is moved to the first non-whitespace character after indenting; otherwise it stays at the same position relative to the text. If `transient-mark-mode' is turned on and the region is active, this function instead calls `indent-region'. In this case, any prefix argument is ignored. (fn &optional ARG) (defalias 'indent-for-tab-command #[256 "\304 \203\f \305\306 \307 \"\207\310=\204# \204' i\311 V\204# \n =\203' \312!\207\313 `\311 \314!\315=\203L \316 \204L i\311 X\204F \317=\204L \314\320\300!!\210 \317=\203d `=\203d \313 =\203d \321 \202\217 \205\217 \212\322y\210\323 \210\324 )\311 Z\212\325y\210\211\322U?\205\214 `W\205\214 \326`#)\266\202\207" [indent-line-function tab-always-indent this-command last-command use-region-p indent-region region-beginning region-end indent-to-left-margin current-indentation insert-tab buffer-chars-modified-tick indent--funcall-widened noindent indent--default-inside-comment complete default-value completion-at-point 0 forward-sexp point-marker 1 indent-rigidly] 10 (#$ . 3173) "P"]) #@13 (fn FUNC) (defalias 'indent--funcall-widened #[257 "\214~\210\211 )\207" [] 2 (#$ . 4852)]) #@22 (fn &optional ARG) (defalias 'insert-tab #[256 "\303!\203 hz\304=\203 \305 \210 \203 \306\307\"\202$ \ni\n\245\\_j\207" [abbrev-mode indent-tabs-mode tab-width prefix-numeric-value 119 expand-abbrev insert-char 9] 6 (#$ . 4952)]) #@98 Return the smallest indentation in range from BEG to END. Blank lines are ignored. (fn BEG END) (defalias 'indent-rigidly--current-indentation #[514 "\212\300 \301\302\303\304\305!\306\"\307$\216b\210\310 \311b\210\312\313\314#\203. \211\206& \315 \315 ^\262\202 \262)\262)\207" [match-data make-byte-code 0 "\301\300\302\"\207" vconcat vector [set-match-data evaporate] 3 line-beginning-position nil re-search-forward "^\\s-*[[:print:]]" t current-indentation] 9 (#$ . 5197)]) #@118 Transient keymap for adjusting indentation interactively. It is activated by calling `indent-rigidly' interactively. (defvar indent-rigidly-map (byte-code "\300 \301\302\303#\210\301\304\305#\210\301\306\307#\210\301\310\311#\210\211\207" [make-sparse-keymap define-key [left] indent-rigidly-left [right] indent-rigidly-right [S-left] indent-rigidly-left-to-tab-stop [S-right] indent-rigidly-right-to-tab-stop] 5) (#$ . 5691)) #@776 Indent all lines starting in the region. If called interactively with no prefix argument, activate a transient mode in which the indentation can be adjusted interactively by typing \<indent-rigidly-map>\[indent-rigidly-left], \[indent-rigidly-right], \[indent-rigidly-left-to-tab-stop], or \[indent-rigidly-right-to-tab-stop]. Typing any other key deactivates the transient mode. If called from a program, or interactively with prefix ARG, indent all lines starting in the region forward by ARG columns. If called from a program, START and END specify the beginning and end of the text to act on, in place of the region. Negative values of ARG indent backward, so you can remove all indentation by specifying a large negative ARG. (fn START END ARG &optional INTERACTIVE) (defalias 'indent-rigidly #[1027 "\204 \211\203 \303\304\305!!\210\306\307\302#\207\212b\210\310 \262b\210n\204& \311y\210`W\203W \312 \313\212\314\313w\210l\262)\211\204H \315\316\317!\\]\316\"\210`\314\313w\210`|\266\311y\210\202& \313\211\223\210 A@=\205g \313\211)\207" [indent-rigidly-map overriding-terminal-local-map deactivate-mark message substitute-command-keys "Indent region with \\<indent-rigidly-map>\\[indent-rigidly-left], \\[indent-rigidly-right], \\[indent-rigidly-left-to-tab-stop], or \\[indent-rigidly-right-to-tab-stop]." set-transient-map t point-marker 1 current-indentation nil " " indent-to 0 prefix-numeric-value] 11 (#$ . 6129) "r\nP\np"]) (defalias 'indent-rigidly--pop-undo #[0 "\302>\205 :\205 @\303=\205 \211A\242\207" [last-command buffer-undo-list (indent-rigidly-left indent-rigidly-right indent-rigidly-left-to-tab-stop indent-rigidly-right-to-tab-stop) nil] 2]) #@75 Indent all lines between BEG and END leftward by one space. (fn BEG END) (defalias 'indent-rigidly-left #[514 "\300 \210\301\302 \303=\203 \304\202 \305#\207" [indent-rigidly--pop-undo indent-rigidly current-bidi-paragraph-direction right-to-left 1 -1] 7 (#$ . 7834) "r"]) #@76 Indent all lines between BEG and END rightward by one space. (fn BEG END) (defalias 'indent-rigidly-right #[514 "\300 \210\301\302 \303=\203 \304\202 \305#\207" [indent-rigidly--pop-undo indent-rigidly current-bidi-paragraph-direction right-to-left -1 1] 7 (#$ . 8118) "r"]) #@76 Indent all lines between BEG and END leftward to a tab stop. (fn BEG END) (defalias 'indent-rigidly-left-to-tab-stop #[514 "\300 \210\301\"\302 \303=\304?\205 \305\"\306Z#\207" [indent-rigidly--pop-undo indent-rigidly--current-indentation current-bidi-paragraph-direction right-to-left indent-next-tab-stop prev indent-rigidly] 10 (#$ . 8404) "r"]) #@77 Indent all lines between BEG and END rightward to a tab stop. (fn BEG END) (defalias 'indent-rigidly-right-to-tab-stop #[514 "\300 \210\301\"\302 \303=\304\205 \305\"\306Z#\207" [indent-rigidly--pop-undo indent-rigidly--current-indentation current-bidi-paragraph-direction right-to-left indent-next-tab-stop prev indent-rigidly] 10 (#$ . 8770) "r"]) #@171 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. (fn COLUMN) (defalias 'indent-line-to #[257 "\301\302!\210\303\304w\210i\211W\203( \245_ZY\203# `\305\304x\210`|\210j\202> \211V\205> \306\307\"\210`\301\302!\210\303\304w\210`|\207" [tab-width beginning-of-line 1 " " nil " " move-to-column t] 5 (#$ . 9138)]) #@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 #[0 "\212\301 \210\302\303m\203 o\204 `S\202 `\300\"\206 \302\\])\207" [left-margin back-to-indentation 0 get-text-property] 5 (#$ . 9573)]) #@339 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. (fn &optional N FORCE) (defalias 'move-to-left-margin #[512 "\300!\210\301\302w\210\303p!\203 \212\300 \210o)\203 \304 b\207\300 \207\305 i\211V\2035 \306\"V\205A \307u\202A \205A \211W\205A \310 \207" [beginning-of-line " " nil minibufferp minibuffer-prompt-end current-left-margin move-to-column -1 indent-to-left-margin] 7 (#$ . 9939) (byte-code "\301!\302D\207" [current-prefix-arg prefix-numeric-value t] 2)]) #@67 Indent current line to the column given by `current-left-margin'. (defalias 'indent-to-left-margin #[0 "\212\300\301 !\210)\212\302\303x\210n)\205 \302\303w\207" [indent-line-to current-left-margin " " nil] 2 (#$ . 10686)]) #@232 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. (fn &optional FROM TO) (defalias 'delete-to-left-margin #[512 "\212\211\206 db\210\300 \262\206 eb\210n\204 \301y\210`W\203/ `\302\303\304\"\210`|\210\301y\210\202 \211\303\211\223)\207" [point-marker 1 move-to-left-margin nil t] 6 (#$ . 10919)]) #@254 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. (fn FROM TO WIDTH) (defalias 'set-left-margin #[771 "\212b\210\301\302x\210n\203 `\262b\210\301\302w\210\303 \262)\304\"\210\305\306$\210\307#\210\203; \212\310\302\311\211%\210)\302\211\223\207" [auto-fill-function " " nil point-marker delete-to-left-margin put-text-property left-margin indent-rigidly fill-region t] 9 (#$ . 11388) "r\nNSet left margin to column: "]) #@255 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. (fn FROM TO WIDTH) (defalias 'set-right-margin #[771 "\212b\210\301\302x\210n\203 `\262)\303\304$\210\205$ \212\305\302\306\211%)\207" [auto-fill-function " " nil put-text-property right-margin fill-region t] 9 (#$ . 12017) "r\nNSet right margin to width: "]) #@320 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. (fn FROM TO PROP FUNC &optional OBJECT) (defalias 'alter-text-property #[1284 "\300\211\301#\262\302%\211\262\203/ \303!%\210\262\202 W\205C \303!%\207" [nil get-text-property text-property-not-all put-text-property] 14 (#$ . 12529)]) #@329 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. (fn FROM TO INC) (defalias 'increase-left-margin #[771 "\211C\211\242\203 \302\242!\202 \240\210\212b\210\303\304x\210n\203! `\262b\210\305 \262)\306\307\310\311\312\313\314 !\315\"\316\317%$\210\320\242#\210 \203Q \212\321\304\322\211%\210)\304\211\223\207" [standard-indent auto-fill-function prefix-numeric-value " " nil point-marker alter-text-property left-margin make-byte-code 257 " [\300\242\206 \302\\]\207" vconcat vector [left-margin 0] 4 "\n\n(fn V)" indent-rigidly fill-region t] 14 (#$ . 13091) "*r\nP"]) #@324 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. (fn FROM TO INC) (defalias 'decrease-left-margin #[771 "\211\203\n \301!\202 \262\302[#\207" [standard-indent prefix-numeric-value increase-left-margin] 7 (#$ . 13949) "*r\nP"]) #@377 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. (fn FROM TO INC) (defalias 'increase-right-margin #[771 "\211C\211\242\203 \302\242!\202 \240\210\212\303\304\305\306\307\310\311 !\312\"\313\314%$\210 \2051 \315\316\317\211%)\207" [standard-indent auto-fill-function prefix-numeric-value alter-text-property right-margin make-byte-code 257 "\300\242\206 \301\\\207" vconcat vector [0] 3 "\n\n(fn V)" fill-region nil t] 14 (#$ . 14447) "r\nP"]) #@372 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. (fn FROM TO INC) (defalias 'decrease-right-margin #[771 "\211\203\n \301!\202 \262\302[#\207" [standard-indent prefix-numeric-value increase-right-margin] 7 (#$ . 15220) "*r\nP"]) #@408 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). (fn &optional N) (defalias 'beginning-of-line-text #[256 "\303!\210\304\305w\210\203& \306\230\204& `dG`\\^{\232\2038 Gu\210\2028 \2038 \n\2038 \307\n!\2038 \310\225b\210\311 \312>\205B \304\305w\207" [fill-prefix adaptive-fill-mode adaptive-fill-regexp beginning-of-line " " nil "" looking-at 0 current-justification (center right)] 6 (#$ . 15768) "p"]) #@137 Short cut function to indent region using `indent-according-to-mode'. Default is to really run `indent-according-to-mode' on each line. (defvar indent-region-function 'indent-region-line-by-line (#$ . 16528)) #@748 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 via `indent-according-to-mode'. 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. (fn START END &optional COLUMN) (defalias 'indent-region #[770 "\211\203A \303!\262\212b\210\304 \262b\210n\204 \305y\210`W\2038 `\306\307w\210`|\210l\2042 \310\311\"\210\305y\210\202 \307\211\223\210)\202\212 \203u \212b\210\304 \262b\210\312!`W\203p \313!\204j n\203g l\204j c\210\305y\210\202S \210)\202\212 \203\205 \214~\210 \"\210)\202\212 \314\"\210\315\211\207" [fill-prefix indent-region-function deactivate-mark prefix-numeric-value point-marker 1 " " nil indent-to 0 regexp-quote looking-at indent-region-line-by-line t] 6 (#$ . 16744) "r\nP"]) #@18 (fn START END) (defalias 'indent-region-line-by-line #[514 "\212\300!\262b\210\301 ?\205 \302\303`#`W\203F n\203\" l\204% \304 \210\305y\210\211\203 \211`\306\247\203; @Y\203A \307#\210\266\202 \211\203N \310!\210\306\211\223\262)\207" [copy-marker minibufferp make-progress-reporter "Indenting region..." indent-according-to-mode 1 nil progress-reporter-do-update progress-reporter-done] 10 (#$ . 18046)]) (byte-code "\300\301\302\303#\210\304\301\302\305#\207" [defalias indent-relative-maybe indent-relative-first-indent-point nil make-obsolete "26.1"] 4) #@211 Indent the current line like the previous nonblank line. Indent to the first indentation position in the previous nonblank line if that position is greater than the current column. See also `indent-relative'. (defalias 'indent-relative-first-indent-point #[0 "\300\301!\207" [indent-relative t] 2 (#$ . 18632) nil]) #@698 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 FIRST-ONLY is non-nil, then only the first indent point is considered. If the previous nonblank line has no indent points beyond the column point starts at, then `tab-to-tab-stop' is done, if both FIRST-ONLY and UNINDENTED-OK are nil, otherwise nothing is done. If there isn't a previous nonblank line and UNINDENTED-OK is nil, call `tab-to-tab-stop'. See also `indent-relative-first-indent-point'. (fn &optional FIRST-ONLY UNINDENTED-OK) (defalias 'indent-relative #[512 "\203 hz\301=\203 \302 \210i\303\212\304 \210\305\306\303\307#\203K \212\310y\210`)\311!\210iV\203/ \312u\210\313\314!\204= \204= \315w\210\316w\210`U\204J i\262\210)\211\203i \317 \320\321\"\210\211`V\203` \211b\210\211\303\211\223\262\202s \203q \303\202s \322 \207" [abbrev-mode 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] 8 (#$ . 18956) "P"]) (byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313\314\315& \207" [custom-declare-variable tab-stop-list funcall function #[0 "\300\207" [nil] 1] "List of tab stop positions used by `tab-to-tab-stop'.\nThis should be nil, or a list of integers, ordered from smallest to largest.\nIt implicitly extends to infinity through repetition of the last step.\nFor example, (1 2 5) is equivalent to (1 2 5 8 11 ...). If the list has\nfewer than 2 elements, `tab-width' is used as the \"last step\".\nA value of nil means a tab stop every `tab-width' columns." :group indent :version "24.4" :safe listp :type (repeat integer)] 12) #@34 Keymap used in `edit-tab-stops'. (defvar edit-tab-stops-map (byte-code "\300 \301\302\303#\210\301\304\303#\210\211\207" [make-sparse-keymap define-key "" edit-tab-stops-note-changes ""] 5) (#$ . 20803)) #@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 (#$ . 21020)) #@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 #[0 "p\305\306\307!!\210\310 !\210\311\302!\210\312\313\314!\210\315\316 \210\f\211\2030 \317@\320\"\210\321c\210\211A\262\202 \210\320\322c\210\211\323W\203J \211\324\\c\210\325c\210\211T\262\2025 \322c\210\211\320V\203] \326c\210\211S\262\202M \210\327c\210eb\207" [edit-tab-stops-buffer edit-tab-stops-map indent-tabs-mode truncate-lines tab-stop-list 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"] 4 (#$ . 21186) nil]) #@35 Put edited tab stops into effect. (defalias 'edit-tab-stops-note-changes #[0 "\302\212\303b\210\302\210\304\305\302\306#\203 iB\262\202 )\307p\310!\210!\210\311\312!\207" [edit-tab-stops-buffer tab-stop-list nil 1 search-backward ":" t bury-buffer switch-to-buffer message "Tab stops installed"] 5 (#$ . 22100) nil]) #@121 Return the next tab stop after COLUMN. If PREV is non-nil, return the previous one instead. (fn COLUMN &optional PREV) (defalias 'indent-next-tab-stop #[513 "\211\203 @Y\203 \211A\262\202 \211\203G \204 \211@\202\216 \211@\302!>A\211\204/ \303\202B @U\203@ \211A@\206B \303\202B \211@\262\202\216 \304\305\"\211A\203Y \211A@@Z\202Z A@\206f @\206f \303\211\203\203 X\203x \306\202\212 \307\310#\245\202\212 Z\245T_\\\266\203\207" [tab-stop-list tab-width reverse 0 last 2 -1 - 1] 12 (#$ . 22431)]) #@63 Get a list of tab stops before LIMIT (inclusive). (fn LIMIT) (defalias 'indent-accumulate-tab-stops #[257 "\300\301\302!\211\262X\203 B\262\202 \211\237\207" [0 nil indent-next-tab-stop] 5 (#$ . 22967)]) #@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 #[0 "\203 hz\301U\203 \302 \210\303i!\304\305!\210\211j\207" [abbrev-mode 119 expand-abbrev indent-next-tab-stop delete-horizontal-space t] 3 (#$ . 23187) 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 #[0 "\301i!`\302\303\"\210\212\211b\210h\304=\2055 g\305=\2055 i\245_iV\2030 h\304=\2030 \306u\210\202 `|\262)\262\207" [tab-width indent-next-tab-stop move-to-column t 32 9 -1] 5 (#$ . 23570) 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
