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 : man.elc
;ELC ;;; Compiled by mockbuild@c6b8.bsys.dev.centos.org on Thu Feb 19 13:04:24 2015 ;;; from file /builddir/build/BUILD/emacs-23.1/lisp/man.el ;;; in Emacs version 23.1.1 ;;; with all optimizations. ;;; This file contains utf-8 non-ASCII characters ;;; and therefore cannot be loaded into Emacs 21 or earlier. (if (and (boundp 'emacs-version) (< (aref emacs-version (1- (length emacs-version))) ?A) (or (and (boundp 'epoch::version) epoch::version) (string-lessp emacs-version "23"))) (error "`man.el' was compiled for Emacs 23 or later")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\300\301!\210\300\302!\210\303\304\305\306\307\310\311\312&\207" [require assoc button custom-declare-group man nil "Browse UNIX manual pages." :prefix "Man-" :group help] 8) #@432 Manpage cleaning filter command phrases. This variable contains a list of the following form: '((command-string phrase-string*)*) Each phrase-string is concatenated onto the command-string to form a command filter. The (standard) output (and standard error) of the Un*x man command is piped through each command filter in the order the commands appear in the association list. The final output is placed in the manpage buffer. (custom-declare-variable 'Man-filter-list 'nil '(#$ . 786) :type '(repeat (list (string :tag "Command String") (repeat :inline t (string :tag "Phrase String")))) :group 'man) #@65 Non-nil means use `untabify' instead of `Man-untabify-command'. (defvar Man-uses-untabify-flag t (#$ . 1398)) #@65 Script for sed to nuke backspaces and ANSI codes from manpages. (defvar Man-sed-script nil (#$ . 1514)) #@47 Non-nil means make up the manpage with fonts. (custom-declare-variable 'Man-fontify-manpage-flag 't '(#$ . 1624) :type 'boolean :group 'man) #@41 Face to use when fontifying overstrike. (custom-declare-variable 'Man-overstrike-face ''bold '(#$ . 1771) :type 'face :group 'man) #@42 Face to use when fontifying underlining. (custom-declare-variable 'Man-underline-face ''underline '(#$ . 1908) :type 'face :group 'man) #@44 Face to use when fontifying reverse video. (custom-declare-variable 'Man-reverse-face ''highlight '(#$ . 2050) :type 'face :group 'man) #@841 Selects the behavior when manpage is ready. This variable may have one of the following values, where (sf) means that the frames are switched, so the manpage is displayed in the frame where the man command was called from: newframe -- put the manpage in its own frame (see `Man-frame-parameters') pushy -- make the manpage the current buffer in the current window bully -- make the manpage the current buffer and only window (sf) aggressive -- make the manpage the current buffer in the other window (sf) friendly -- display manpage in the other window but don't make current (sf) polite -- don't display manpage, but prints message and beep when ready quiet -- like `polite', but don't beep meek -- make no indication that the manpage is ready Any other value of `Man-notify-method' is equivalent to `meek'. (custom-declare-variable 'Man-notify-method '(if (boundp 'Man-notify) Man-notify 'friendly) '(#$ . 2193) :type '(radio (const newframe) (const pushy) (const bully) (const aggressive) (const friendly) (const polite) (const quiet) (const meek)) :group 'man) #@274 Number of columns for which manual pages should be formatted. If nil, the width of the window selected at the moment of man invocation is used. If non-nil, the width of the frame selected at the moment of man invocation is used. The value also can be a positive integer. (custom-declare-variable 'Man-width 'nil '(#$ . 3296) :type '(choice (const :tag "Window width" nil) (const :tag "Frame width" t) (integer :tag "Specific width" :value 65)) :group 'man) #@66 Frame parameter list for creating a new frame for a manual page. (custom-declare-variable 'Man-frame-parameters 'nil '(#$ . 3761) :type 'sexp :group 'man) #@377 Non-nil means letters in sections are converted to lower case. Some Un*x man commands can't handle uppercase letters in sections, for example "man 2V chmod", but they are often displayed in the manpage with the upper case letter. When this variable is t, the section letter (e.g., "2V") is converted to lowercase (e.g., "2v") before being sent to the man background process. (custom-declare-variable 'Man-downcase-section-letters-flag 't '(#$ . 3923) :type 'boolean :group 'man) #@70 Non-nil means the manpage list is treated as circular for traversal. (custom-declare-variable 'Man-circular-pages-flag 't '(#$ . 4409) :type 'boolean :group 'man) #@291 Association list of bogus sections to real section numbers. Some manpages (e.g. the Sun C++ 2.1 manpages) have section numbers in their references which Un*x `man' does not recognize. This association list is used to translate those sections, when found, to the associated section number. (custom-declare-variable 'Man-section-translations-alist '(list '("3C++" . "3") '("3X11" . "3") '("1-UCB" . "")) '(#$ . 4579) :type '(repeat (cons (string :tag "Bogus Section") (string :tag "Real Section"))) :group 'man) #@40 C Header file search path used in Man. (custom-declare-variable 'Man-header-file-path ''("/usr/include" "/usr/local/include") '(#$ . 5096) :type '(repeat string) :group 'man) #@50 The name of the program that produces man pages. (defvar manual-program "man" (#$ . 5277)) #@31 Command used for untabifying. (defvar Man-untabify-command "pr" (#$ . 5374)) #@71 List of arguments to be passed to `Man-untabify-command' (which see). (defvar Man-untabify-command-args (list "-t" "-e") (#$ . 5457)) #@42 Command used for processing sed scripts. (defvar Man-sed-command "sed" (#$ . 5597)) #@42 Command used for processing awk scripts. (defvar Man-awk-command "awk" (#$ . 5687)) #@36 Hook run when Man mode is enabled. (defvar Man-mode-hook nil (#$ . 5777)) #@70 Hook run after removing backspaces but before `Man-mode' processing. (defvar Man-cooked-hook nil (#$ . 5857)) #@72 Regular expression describing the name of a manpage (without section). (defvar Man-name-regexp "[-a-zA-Z0-9_+][-a-zA-Z0-9_.:+]*" (#$ . 5973)) #@69 Regular expression describing a manpage section within parentheses. (defvar Man-section-regexp "[0-9][a-zA-Z0-9+]*\\|[LNln]" (#$ . 6125)) #@54 Regular expression describing the heading of a page. (defvar Man-page-header-regexp (byte-code "\303\304\"\203 \303\305\"\204 \306 \307\n\310\260\207\311 \307\n\312\260\207" [system-configuration Man-name-regexp Man-section-regexp string-match "-solaris2\\." "-solaris2\\.[123435]$" "^[-A-Za-z0-9_].*[ ]\\(" "(\\(" "\\))\\)$" "^[ ]*\\(" "\\))\\).*\\1"] 5) (#$ . 6269)) #@56 Regular expression describing a manpage heading entry. (defvar Man-heading-regexp "^\\([A-Z][A-Z0-9 /-]+\\)$" (#$ . 6652)) #@114 Regular expression for SEE ALSO heading (or your equivalent). This regexp should not start with a `^' character. (defvar Man-see-also-regexp "SEE ALSO" (#$ . 6782)) #@118 Regular expression describing first heading on a manpage. This regular expression should start with a `^' character. (defvar Man-first-heading-regexp "^NAME$\\|^[ ]*No manual entry fo.*$" (#$ . 6954)) #@63 Regular expression describing a reference to another manpage. (defvar Man-reference-regexp (concat "\\(" Man-name-regexp "\\)[ ]*(\\(" Man-section-regexp "\\))") (#$ . 7162)) #@75 Regular expression describing a reference to manpages in "man -k output". (defvar Man-apropos-regexp (concat "\\[\\(" Man-name-regexp "\\)\\][ ]*(\\(" Man-section-regexp "\\))") (#$ . 7344)) #@114 Regular expression for SYNOPSIS heading (or your equivalent). This regexp should not start with a `^' character. (defvar Man-synopsis-regexp "SYNOPSIS" (#$ . 7543)) #@111 Regular expression for FILES heading (or your equivalent). This regexp should not start with a `^' character. (defvar Man-files-regexp "FILES" (#$ . 7715)) #@64 Regular expression describing the #include (directive of cpp). (defvar Man-include-regexp "#[ ]*include[ ]*" (#$ . 7877)) #@71 Regular expression describing <> in #include line (directive of cpp). (defvar Man-file-name-regexp "[^<>\", \n]+" (#$ . 8007)) #@70 Regular expression describing a file path appeared in FILES section. (defvar Man-normal-file-prefix-regexp "[/~$]" (#$ . 8141)) #@59 Regular expression describing references to header files. (defvar Man-header-regexp (concat #1="\\(" Man-include-regexp #2="\\)" "[<\"]" #1# Man-file-name-regexp #2# "[>\"]") (#$ . 8275)) #@59 Regular expression describing references to normal files. (defvar Man-normal-file-regexp (concat Man-normal-file-prefix-regexp Man-file-name-regexp) (#$ . 8469)) #@68 Regular expression describing a reference in the SEE ALSO section. (defvar Man-hyphenated-reference-regexp (concat "\\(" Man-name-regexp "\\)\\((\\(" Man-section-regexp "\\))\\)?") (#$ . 8637)) #@193 Switches passed to the man command, as a single string. If you want to be able to see all the manpages for a subject you type, make -a one of the switches, if your `man' program supports it. (defvar Man-switches "" (#$ . 8838)) #@58 Option that indicates a specified a manual section name. (defvar Man-specified-section-option (byte-code "\301\302\"\203 \303\207\304\207" [system-configuration string-match "-solaris[0-9.]*$" "-s" ""] 3) (#$ . 9073)) #@221 Internal cache for the value of the function `Man-support-local-filenames'. `auto-detect' means the value is not yet determined. Otherwise, the value is whatever the function `Man-support-local-filenames' should return. (defvar Man-support-local-filenames 'auto-detect (#$ . 9300)) (byte-code "\301\302!\210\301\303!\210\304\303\305\306#\210\307B\310\307!\204 \311\307\312\"\210\301\307!\210\313B\310\313!\2040 \311\313\312\"\210\301\313!\210\314B\310\314!\204C \311\314\312\"\210\301\314!\210\315B\310\315!\204V \311\315\316\"\210\301\315!\210\317B\310\317!\204i \311\317\320\"\210\301\317!\207" [current-load-list make-variable-buffer-local Man-original-frame Man-arguments put permanent-local t Man-sections-alist default-boundp set-default nil Man-refpages-alist Man-page-list Man-current-page 0 Man-page-mode-string "1 of 1"] 4) #@75 Script for sysV-like sed to nuke backspaces and ANSI codes from manpages. (defconst Man-sysv-sed-script "// { s/_//g\n s/_//g\n s/o+/o/g\n s/+o/o/g\n :ovstrk\n s/\\(.\\)\\1/\\1/g\n t ovstrk\n }\n/\\[[0-9][0-9]*m/ s///g" (#$ . 10151)) #@79 Script for berkeley-like sed to nuke backspaces and ANSI codes from manpages. (defconst Man-berkeley-sed-script "// { s/_//g\\\n s/_//g\\\n s/o+/o/g\\\n s/+o/o/g\\\n :ovstrk\\\n s/\\(.\\)\\1/\\1/g\\\n t ovstrk\\\n }\\\n/\\[[0-9][0-9]*m/ s///g" (#$ . 10412)) #@21 Topic read history. (defvar Man-topic-history nil (#$ . 10697)) #@40 Syntax table used in Man mode buffers. (defvar man-mode-syntax-table (byte-code "\301\302 !\303\304\305#\210\303\306\305#\210\303\307\305#\210)\207" [table copy-syntax-table standard-syntax-table modify-syntax-entry 46 "w" 95 58] 4) (#$ . 10767)) #@22 Keymap for Man mode. (defvar Man-mode-map (byte-code "\302 \303!\210\304 \"\210\305\306\307#\210\305\310\311#\210\305\312\313#\210\305\314\315#\210\305\316\317#\210\305\320\321#\210\305\322\323#\210\305\324\325#\210\305\326\325#\210\305\327\330#\210\305\331\332#\210\305\333\334#\210\305\335\336#\210\305\337\340#\210\305\341\342#\210\305\343\344#\210\305\345\346#\210)\207" [map button-buffer-map make-sparse-keymap suppress-keymap set-keymap-parent define-key " " scroll-up "" scroll-down "n" Man-next-section "p" Man-previous-section "n" Man-next-manpage "p" Man-previous-manpage ">" end-of-buffer "<" beginning-of-buffer "." "r" Man-follow-manual-reference "g" Man-goto-section "s" Man-goto-see-also-section "k" Man-kill "q" Man-quit "m" man " " man-follow "?" describe-mode] 4) (#$ . 11025)) (define-button-type 'Man-abstract-xref-man-page 'follow-link t 'help-echo "mouse-2, RET: display this man page" 'func nil 'action 'Man-xref-button-action) (defalias 'Man-xref-button-action #[(button) "\302\303\"\302\304\" \204 \305!\202\" \306 !\203! \307!!\202\" !)\207" [button target button-get Man-target-string func button-label functionp button-start] 4]) (byte-code "\300\301\302\303\304\305%\210\300\306\307\310\311\312\313\314&\210\300\315\307\316\311\312\313\317&\207" [define-button-type Man-xref-man-page :supertype Man-abstract-xref-man-page func man-follow Man-xref-header-file action #[(button) "\302\303\"\304 !?\205 \305\306 \")\207" [button w button-get Man-target-string Man-view-header-file error "Cannot find header file: %s"] 3] follow-link t help-echo "mouse-2: display this header file" Man-xref-normal-file #[(button) "\302\303\304\"!\305 !\203 \306 !\203 \307 !\202$ \310\311 \"\202$ \310\312 \")\207" [button f substitute-in-file-name button-get Man-target-string file-exists-p file-readable-p view-file error "Cannot read a file: %s" "Cannot find a file: %s"] 4] "mouse-2: display this file"] 8) #@125 Used for initializing variables based on display's color support. This is necessary if one wants to dump man.el with Emacs. (defalias 'Man-init-defvars #[nil "\306 \203\n \307\202+ \310\n\307\211\211 %\311=\203 \202+ \310\n\307\211\211\f%\311=\203* \f\202+ \307)\312\313\n-\314=\203E \315\316\317\320\321\322\323\324\325\257 \202a \203P \326 \327Q\202Q \330\331\332\333\334\335\336\337\340\341\342\343\344\345\346\257B-\314=?\205v .\347\350\351\352\353\354\327\257B/?\205\202 01BC$\2112\207" [default-directory Man-fontify-manpage-flag Man-sed-command Man-sysv-sed-script Man-berkeley-sed-script Man-sed-script "/" nil call-process 0 apply list windows-nt "-e \"/Reformatting page. Wait/d\"" "-e \"/Reformatting entry. Wait/d\"" "-e \"/^[ ][ ]*-[ ][0-9]*[ ]-[ ]*Formatted:.*[0-9]$/d\"" "-e \"/^[ ]*Page[ ][0-9]*.*(printed[ ][0-9\\/]*)$/d\"" "-e \"/^Printed[ ][0-9].*[0-9]$/d\"" "-e \"/^[ ]*X[ ]Version[ ]1[01].*Release[ ][0-9]/d\"" "-e \"/^[A-Za-z].*Last[ ]change:/d\"" "-e \"/[ ]*Copyright [0-9]* UNIX System Laboratories, Inc.$/d\"" "-e \"/^[ ]*Rev\\..*Page [0-9][0-9]*$/d\"" "-e '" "'" "" "-e '/^[-][-]*$/d'" "-e '/[789]/s///g'" "-e '/Reformatting page. Wait/d'" "-e '/Reformatting entry. Wait/d'" "-e '/^[ ]*Hewlett-Packard[ ]Company[ ]*-[ ][0-9]*[ ]-/d'" "-e '/^[ ]*Hewlett-Packard[ ]*-[ ][0-9]*[ ]-.*$/d'" "-e '/^[ ][ ]*-[ ][0-9]*[ ]-[ ]*Formatted:.*[0-9]$/d'" "-e '/^[ ]*Page[ ][0-9]*.*(printed[ ][0-9\\/]*)$/d'" "-e '/^Printed[ ][0-9].*[0-9]$/d'" "-e '/^[ ]*X[ ]Version[ ]1[01].*Release[ ][0-9]/d'" "-e '/^[A-Za-z].*Last[ ]change:/d'" "-e '/^Sun[ ]Release[ ][0-9].*[0-9]$/d'" "-e '/[ ]*Copyright [0-9]* UNIX System Laboratories, Inc.$/d'" "-e '/^[ ]*Rev\\..*Page [0-9][0-9]*$/d'" "'\n" "BEGIN { blankline=0; anonblank=0; }\n" "/^$/ { if (anonblank==0) next; }\n" "{ anonblank=1; }\n" "/^$/ { blankline++; next; }\n" "{ if (blankline>0) { print \"\"; blankline=0; } print $0; }\n" system-type Man-awk-command Man-uses-untabify-flag Man-untabify-command Man-untabify-command-args Man-filter-list] 18 (#$ . 12994)]) #@45 Formats part of the mode line for Man mode. (defalias 'Man-make-page-mode-string #[nil "\302\303\304S 88\206\f \305 G$\207" [Man-current-page Man-page-list format "%s page %d of %d" 2 ""] 5 (#$ . 15087)]) (put 'Man-make-page-mode-string 'byte-optimizer 'byte-compile-inline-expand) #@60 Builds the entire background manpage and cleaning command. (defalias 'Man-build-man-command #[nil "\306 \307\310\"\203 \311\202 \312\313!\204 \314\202 \315\nPR \f\203G \f@\203G \f@@\f@A \316\306\317\320\306#\260\fA*\202 *\207" [manual-program Man-switches null-device Man-filter-list flist command " " string-match "%s" "" fboundp start-process " %s" " %s 2>" " | " mapconcat #[(phrase) ";\204 \301\302!\210\207" [phrase error "Malformed Man-filter-list"] 2] pargs pcom] 8 (#$ . 15377)]) (put 'Man-build-man-command 'byte-optimizer 'byte-compile-inline-expand) #@44 Strip leading, trailing and middle spaces. (defalias 'Man-translate-cleanup #[(string) ";\205 \301\302\"\203 \303\304\"\305\306\307#\305\310\307#\211\207" [string string-match "^[ \f \n]*\\(.+[^ \f \n]\\)" match-string 1 replace-regexp-in-string "[ \n]" " " " +"] 5 (#$ . 15968)]) #@238 Translates REF from "chmod(2V)" to "2v chmod" style. Leave it as is if already in that style. Possibly downcase and translate the section (see the `Man-downcase-section-letters-flag' and the `Man-section-translations-alist' variables). (defalias 'Man-translate-references #[(ref) "\306\211\307\f!\310\311 \312Q\f\"\203! \313\314\f\"\313\315\f\"\202: \310\316\317\320\260\f\"\203: \313\315\f\"\313\314\f\" \306\230\203D \f\202\210 \203L \n\227 \203\202 @@ @A A\203g \227\n\230\203~ \203y \227\202{ \321*\202L \n\322 R+\207" [Man-section-translations-alist slist section name ref Man-reference-regexp "" Man-translate-cleanup string-match "^" "$" match-string 1 2 "^\\(" "\\) +\\(" "\\)$" nil " " Man-section-regexp Man-name-regexp Man-downcase-section-letters-flag s2 s1 Man-specified-section-option] 6 (#$ . 16270)]) #@512 Check the availability of `-l' option of the man command. This option allows `man' to interpret command line arguments as local filenames. Return the value of the variable `Man-support-local-filenames' if it was set to nil or t before the call of this function. If t, the man command supports `-l' option. If nil, it doesn't. Otherwise, if the value of `Man-support-local-filenames' is neither t nor nil, then determine a new value, set it to the variable `Man-support-local-filenames' and return a new value. (defalias 'Man-support-local-filenames #[nil "\203\n \302=\203\f \207\303\304!r q\210\305\216\306\307\310\217\311\232\205+ eb\210\312\313\306\302#\205+ \302+\211\207" [Man-support-local-filenames #1=#:temp-buffer t generate-new-buffer " *temp*" ((byte-code "\301!\203\n \302!\210\301\207" [#1# buffer-name kill-buffer] 2)) nil (byte-code "\302!\203 \303!\203 \202 \304\305!\306 \307\310\307\311%)\207" [default-directory manual-program file-directory-p file-readable-p expand-file-name "~/" call-process nil t "--help"] 6) ((error)) 0 search-forward "--local-file"] 4 (#$ . 17136)]) #@90 Guess default manual entry based on the text near position POS. POS defaults to `point'. (defalias 'Man-default-man-entry #[(&optional pos) "\306\211\211\211\211 \212\n\203 \nb\210`\307\306x\203E \310\311\306x!\204E \312\313 \314Q!\203E \315\306x\2039 \310\316\306x!\203@ \317\225\211\204E `\202\245 \nb\210\310\316\306x!\204U `\202\245 i\315\306x\210 iZ\320\321 \314Q!\203p \317\224b\210\322\306x\210\310\316\306x!\204\234 `\nb\210\315\306w\203\226 i ZW\203\226 \312\323!\203\226 `\202\245 b\210\202\245 \nb\210\315\306w\210`\316\306w\210\324 `\"\312\325!\203\276 \f\326\327!P\327\225b\210\330\331\f\"\203\313 \f\317\211\224O\f\211\332\230?\205\342 \312\333 \314Q!\205\342 \334\335\326\327!\"P.\207" [distance column pos start word Man-section-regexp nil " a-zA-Z0-9+" zerop "(" looking-at "([ ]*\\(" "\\)[ ]*)" ",; " "-a-zA-Z0-9._+:" 0 looking-back "([ ]*\\(?:" " " "[-a-zA-Z0-9._+:]" buffer-substring-no-properties "[ \n]+\\([-a-zA-Z0-9._+:]+\\)([0-9])" match-string-no-properties 1 string-match "[._]+$" "" "[ ]*([ ]*\\(" format "(%s)"] 5 (#$ . 18250)]) (defalias 'manual-entry 'man) #@646 Get a Un*x manual page and put it in a buffer. This command is the top-level command in the man package. It runs a Un*x command to retrieve and clean a manpage in the background and places the results in a Man mode (manpage browsing) buffer. See variable `Man-notify-method' for what happens when the buffer is ready. If a buffer already exists for this man page, it will display immediately. To specify a man page from a certain section, type SUBJECT(SECTION) or SECTION SUBJECT when prompted for a manual entry. To see manpages from all sections related to a subject, put something appropriate into the `Man-switches' variable, which see. (defalias 'man #[(man-args) "\301!\302!\207" [man-args Man-translate-references Man-getpage-in-background] 2 (#$ . 19375) (list (let* ((default-entry (Man-default-man-entry)) (input (read-string (format "Manual entry%s" (if (string= default-entry #1="") ": " (format " (default %s): " default-entry))) nil 'Man-topic-history default-entry))) (if (string= input #1#) (error "No man args given") input)))]) #@72 Get a Un*x manual page of the item under point and put it in a buffer. (defalias 'man-follow #[(man-args) "\203\n \301\230\203 \302\303!\207\304!\207" [man-args "" error "No item under point" man] 2 (#$ . 20434) (list (Man-default-man-entry))]) #@67 Use TOPIC to build and fire off the manpage and cleaning command. (defalias 'Man-getpage-in-background #[(topic) "\306 \307Q\310\n!\211\203 \311 !\202\251\312\313!\210\314\315\f #\210\316\n!r q\210\317\320 6 7)\3218!\3229\203@ :\202A \322\323;!\203U \324;\323\"\204U ;\202V \325 ; < = 8\326\327\330\"\210\331\332!\204\223 \331\333!\204\223 \326\333\334>\250\203\204 >\335V\203\204 >\202\220 >\203\216 \336 \202\220 \337 !\"\210\326\340\341\"\210\326\342\341\"\210\343\344!\203\345\344\f ?\346>\203\263 @\202\264 \347A\350\f\351B\352\353\f\"\203\306 \354\202\324 \343\344!\204\320 \355\202\324 \356CPRD E FE\203 E@\203 E@@E@A G HF\357H\351\360\361G\351#\260FEAE*\202\333 F* \"%\362\"\202\250\363@\364 \364D\364A\350\f\351B\352\353\f\"\2030\354\202>\343\344!\204:\355\202>\356CPRD E FE\203uE@\203uE@@E@A G HF\357H\351\360\361G\351#\260FEAE*\202EF* \"&\354 I\211 J\247\203\215J\335U\204\242J\247\203\236\350\365J\"\211I\204\242JI\362\nI\"*,+\207" [topic man-args bufname buffer manual-program buffer-undo-list "*Man " "*" get-buffer Man-notify-when-ready require env message "Invoking %s %s in the background" generate-new-buffer t selected-frame copy-sequence raw-text-unix file-directory-p find-file-name-handler "/" setenv "TERM" "dumb" getenv "MANWIDTH" "COLUMNS" number-to-string 0 frame-width window-width "GROFF_NO_SGR" "1" "MAN_KEEP_FORMATTING" fboundp start-process set-process-sentinel (cygwin windows-nt) "sh" format " " string-match "%s" "" " %s" " %s 2>" " | " mapconcat #[(phrase) ";\204 \301\302!\210\207" [phrase error "Malformed Man-filter-list"] 2] Man-bgproc-sentinel call-process nil "exited abnormally with code %d" Man-original-frame Man-arguments process-environment default-enable-multibyte-characters locale-coding-system default-directory coding-system-for-read coding-system-for-write Man-width system-type shell-file-name shell-command-switch Man-switches null-device Man-filter-list flist command pargs pcom msg exit-status] 16 (#$ . 20689)]) #@122 Notify the user when MAN-BUFFER is ready. See the variable `Man-notify-method' for the different notification behaviors. (defalias 'Man-notify-when-ready #[(man-buffer) "rq\210 ) \306=\203- \212\307\f! \310\311 !\"\210\312\311 !\313\"\210\314 !\206) \315 !*\202\245 \316=\2039 \317!\202\245 \320=\203R \321\n!\203I \315\n!\210\322!\210\323 \202\245 \324=\203h \321\n!\203b \315\n!\210\322!\202\245 \325=\203 \321\n!\203x \315\n!\210\326\327\"\202\245 \330=\203\221 \331 \210\332\333\334!\"\202\245 \335=\203\240 \332\333\334!\"\202\245 \210\332\336!)\207" [man-buffer Man-original-frame saved-frame Man-notify-method Man-frame-parameters frame newframe make-frame set-window-buffer frame-selected-window set-window-dedicated-p t display-multi-frame-p select-frame pushy switch-to-buffer bully frame-live-p pop-to-buffer delete-other-windows aggressive friendly display-buffer not-this-window polite beep message "Manual buffer %s is ready" buffer-name quiet ""] 4 (#$ . 22747)]) (defalias 'Man-softhyphen-to-minus #[nil "\303\304\305\306\305\307\310&\310=?\205- eb\210\311\n\203 \312 !\313 \306\310#\205, \314\315!\210\202 )\207" [current-language-environment str enable-multibyte-characters compare-strings "latin-" 0 nil 6 t "\255" string-as-multibyte search-forward replace-match "-"] 8]) #@112 Convert overstriking and underlining to the correct fonts. Same for the ANSI bold and normal escape sequences. (defalias 'Man-fontify-manpage #[nil "\306\307\"\210eb\210\310\311`\312\313\310\311#\203\230 \203, \314 \315\224\316 A\203( \202* @$\210\317\224\203Y \320\317\224f\211 \321=\203@ \202S \f\322=\203K +\202S \f\323=\205S ,) \"\202\214 \324\224f\325=\203e \310\202\214 \324\224f\211 -\326=\203t \202\211 -\322=\203\200 +\202\211 -\323=\205\211 ,) B\315\224\315\225|\210`\202 +\311\327 \330d!W\203\332 eb\210\331\332\310\311#\203\277 \333\334!\210\314``T\316+$\210\202\247 eb\210\331\335\310\311#\203\332 \333\334!\210\314`S`\316+$\210\202\302 eb\210\331\336\310\311#\203\365 \333\317!\210\314``T\316+$\210\202\335 eb\210\331\337\310\311#\203\333\317!\210\314`S`\316+$\210\202\370 eb\210\312\340\310\311#\203*\341\342!\210\314`S`\316 $\210\202eb\210\312\343\310\311#\203D\341\344!\210\314`S`\316\345$\210\202-eb\210\312\346\310\311#\203^\341\347!\210\314`S`\316\345$\210\202Geb\210\350 \210\351 \210eb\210\312.\310\311#\203\314\315\224\315\225\316 $\210\202j)\306\352\"\207" [Man-arguments start buffer-undo-list faces #1=#:--cl-var-- Man-overstrike-face message "Please wait: formatting the %s man page..." nil t re-search-forward "\\[0?\\([1470]\\|2\\([247]\\)\\)m" put-text-property 0 face 2 delq 50 52 55 1 48 49 buffer-size position-bytes search-forward "__" backward-delete-char 4 "__" "_" "_" "\\(.\\)\\(+\\1\\)+" replace-match "\\1" "o\\+\\|\\+o" "o" bold "[-|]\\([-|]\\)+" "+" Man-highlight-references Man-softhyphen-to-minus "%s man page formatted" Man-underline-face Man-reverse-face #2=#:--cl-var-- Man-heading-regexp] 6 (#$ . 24069) nil]) #@326 Highlight the references on mouse-over. References include items in the SEE ALSO section, header file (#include <foo.h>), and files in FILES. If optional argument XREF-MAN-TYPE is non-nil, it used as the button type for items in SEE ALSO section. If it is nil, the default type, `Man-xref-man-page' is used for the buttons. (defalias 'Man-highlight-references #[(&optional xref-man-type) "\204 \306\307\310\"\203% \311\312 \313\314\n\206 \315%\210\311\312 \313\314\n\206# \315%\207\311\f \313\314\n\206/ \315%\210\311 \316\317\320%\210\311\316\211\321%\207" [Man-arguments Man-reference-regexp xref-man-type Man-apropos-regexp Man-see-also-regexp Man-synopsis-regexp "" string-match "-k " Man-highlight-references0 nil 1 Man-default-man-entry Man-xref-man-page 0 2 Man-xref-header-file Man-xref-normal-file Man-header-regexp Man-files-regexp Man-normal-file-regexp] 6 (#$ . 25782)]) (defalias 'Man-highlight-references0 #[(start-section regexp button-pos target type) "\203\n \306!\205P \203 \307y\210\310 \210\212\311\307!\210`)\202\" eb\210\312\313\n \314#\205O \315 \224 \225\304\f\316 \247\203> \317 !\202I \320 !\203H \202I \312&\210\202# )\207" [start-section end regexp button-pos type target Man-find-section 1 back-to-indentation Man-next-section nil re-search-forward t make-text-button Man-target-string match-string functionp] 8]) #@221 Remove overstriking and underlining from the current buffer. Normally skip any jobs that should have been done by the sed script, but when called interactively, do those jobs even if the sed script would have done them. (defalias 'Man-cleanup-manpage #[(&optional interactive) "\303\304\"\210 \204 \n\204g eb\210\305\306\307\310#\203 \311\312!\210\202 eb\210\305\313\307\310#\2031 \311\312!\210\202\" eb\210\314\315\307\310#\203C \316\317!\210\2024 eb\210\314\320\307\310#\203U \316\321!\210\202F eb\210\314\322\307\310#\203g \316\323!\210\202X eb\210\314\324\307\310#\203y \316\325!\210\202j \326 \210\303\327\"\207" [Man-arguments interactive Man-sed-script message "Please wait: cleaning up the %s man page..." search-forward "_" nil t backward-delete-char 2 "_" re-search-forward "\\(.\\)\\(\\1\\)+" replace-match "\\1" "\\[[0-9]+m" "" "o\\+\\|\\+o" "o" "[-|]\\([-|]\\)+" "+" Man-softhyphen-to-minus "%s man page cleaned up"] 4 (#$ . 27151) "p"]) #@313 Manpage background process sentinel. When manpage command is run asynchronously, PROCESS is the process object for the manpage command; when manpage command is run synchronously, PROCESS is the name of the buffer where the manpage command is run. Second argument MSG is the exit message of the manpage command. (defalias 'Man-bgproc-sentinel #[(process msg) ";\203 \306!\202 \307!\310\211\311 !\204% ;\206\323 \312\310\"\202\323 r q\210\310 eb\210\313\314!\204: \313\315!\203F `\310\210`{\316\202\211 ;\204[ \317!\320=\203[ \321!\322U\204\211 \323 G!\204\211 \311 !\324 GS # #H\325U\203| \322#O\202} )Qdb\210\326\327 \"c\210\n\203\224 \330 !\210\202\301 $\203\237 \331 \210\202\242 \332 \210\333\334!\210\335 \210%\204\275 & '\330p!\210\336\337'\"\210)\340\310!\210)\n\204\312 \341 !\210 \205\322 \336\342 \")+\207" [process err-mess delete-buff Man-buffer case-fold-search msg get-buffer process-buffer nil buffer-name set-process-buffer looking-at "No \\(manual \\)*entry for" "[^\n]*: nothing appropriate$" t process-status exit process-exit-status 0 zerop ": process " 10 format "\nprocess %s" kill-buffer Man-fontify-manpage Man-cleanup-manpage run-hooks Man-cooked-hook Man-mode error "Can't find the %s manpage" set-buffer-modified-p Man-notify-when-ready "%s" eos Man-fontify-manpage-flag Man-page-list Man-arguments args] 5 (#$ . 28121)]) (put 'Man-mode 'mode-class 'special) #@1848 A mode for browsing Un*x manual pages. The following man commands are available in the buffer. Try "\[describe-key] <key> RET" for more information: \[man] Prompt to retrieve a new manpage. \[Man-follow-manual-reference] Retrieve reference in SEE ALSO section. \[Man-next-manpage] Jump to next manpage in circular list. \[Man-previous-manpage] Jump to previous manpage in circular list. \[Man-next-section] Jump to next manpage section. \[Man-previous-section] Jump to previous manpage section. \[Man-goto-section] Go to a manpage section. \[Man-goto-see-also-section] Jumps to the SEE ALSO manpage section. \[Man-quit] Deletes the manpage window, bury its buffer. \[Man-kill] Deletes the manpage window, kill its buffer. \[describe-mode] Prints this help text. The following variables may be of some use. Try "\[describe-variable] <variable-name> RET" for more information: `Man-notify-method' What happens when manpage formatting is done. `Man-downcase-section-letters-flag' Force section letters to lower case. `Man-circular-pages-flag' Treat multiple manpage list as circular. `Man-section-translations-alist' List of section numbers and their Un*x equiv. `Man-filter-list' Background manpage filter command. `Man-mode-map' Keymap bindings for Man mode buffers. `Man-mode-hook' Normal hook run on entry to Man mode. `Man-section-regexp' Regexp describing manpage section letters. `Man-heading-regexp' Regexp describing section headers. `Man-see-also-regexp' Regexp for SEE ALSO section (or your equiv). `Man-first-heading-regexp' Regexp for first heading on a manpage. `Man-reference-regexp' Regexp matching a references in SEE ALSO. `Man-switches' Background `man' command switches. The following key bindings are currently in effect in the buffer: \{Man-mode-map} (defalias 'Man-mode #[nil "\306 \210\307\310\311\312\303!\313\314\315F\316\211\317 \210\320\321!\210\322 !\210\323!!\210\311\"\324EC#\325\326!\210\"\325\327!\210\330\331 \210\332 \210\333 \210\334\335\316\"\210\336\337!\207" [major-mode mode-name buffer-auto-save-file-name mode-line-buffer-identification truncate-lines buffer-read-only kill-all-local-variables Man-mode "Man" nil default-value " {" Man-page-mode-string "}" t buffer-disable-undo auto-fill-mode -1 use-local-map set-syntax-table 0 make-local-variable outline-regexp outline-level #[nil "\300\207" [1] 1] Man-build-page-list Man-strip-page-headers Man-unindent Man-goto-page 1 run-mode-hooks Man-mode-hook Man-mode-map man-mode-syntax-table Man-heading-regexp imenu-generic-expression] 5 (#$ . 29540) nil]) #@49 Build the association list of manpage sections. (defalias 'Man-build-section-alist #[nil "\303eb\210\303\304\nd\305#\205 \306\300\307\310!\"\210\310y\210\202 )\207" [Man-sections-alist case-fold-search Man-heading-regexp nil re-search-forward t aput match-string 1] 4 (#$ . 32182)]) (put 'Man-build-section-alist 'byte-optimizer 'byte-compile-inline-expand) #@69 Build the association list of references (in the SEE ALSO section). (defalias 'Man-build-references-alist #[nil "\306\212\307 !\203} \310y\210`\311\310!\210`\306\312 \214 \f}\210eb\210\313 \210m\204| `\nU\204| `\314\f\315#\203u \316\317!\211 GS \203T P\306GSH\320>\203e \317O\321\"\203t \322\300\"\210*\323\306w\210\202# -)\237\211\207" [Man-refpages-alist Man-see-also-regexp runningpoint hyphenated end start nil Man-find-section 1 Man-next-section -1 back-to-indentation re-search-forward t match-string 0 (45 173) string-match aput " \n," Man-hyphenated-reference-regexp word len Man-reference-regexp] 5 (#$ . 32550)]) (put 'Man-build-references-alist 'byte-optimizer 'byte-compile-inline-expand) #@52 Build the list of separate manpages in the buffer. (defalias 'Man-build-page-list #[nil "\306ed\307\211b\210m?\205Q \310\f!\205 \311\312!\313 \306\314\315$\203= \316 \210` \317\320\306\321\322$\210\313\f\314#\203< \316 \210)`\323\324 !\324\n! EC\"\n\202 +\207" [Man-page-list header page-end page-start Man-page-header-regexp Man-first-heading-regexp nil "" looking-at match-string 1 re-search-forward move 2 beginning-of-line search-backward "\n\n" t 3 append copy-marker p] 6 (#$ . 33295)]) #@60 Strip all the page headers but the first from the manpage. (defalias 'Man-strip-page-headers #[nil "\306\307\310 \307 \211 \203H @\311\f8\203A \f@b\203A \312\307\306#\203A \f@\313\224{\211\203A \314\fA@\306#\203A \315\310!\210\2020 A\211\204 -\307\207" [header case-fold-search inhibit-read-only Man-page-list page #1=#:--cl-dolist-temp-- t nil "" 2 re-search-forward 0 search-forward replace-match Man-first-heading-regexp] 5 (#$ . 33808)]) #@52 Delete the leading spaces that indent the manpage. (defalias 'Man-unindent #[nil "\306\307\n\307\211 \203E \f@\310\311 @ A@}\210\203% \312ed\"\210\313\314\215\203= m\204= l\2047 \315 !\210\316y\210\202+ *\fA\211\204\f ,\307\207" [case-fold-search inhibit-read-only Man-page-list page #1=#:--cl-dolist-temp-- nindent t nil "" 0 untabify unindent (byte-code "eb\210\303\304\305#\204 \306\307\304\"\210\310 \210`\311\304w\210`{\211G\312\n!\203) \306\307\304\"\210 \313Peb\210m\204H \314 !\203@ \315y\210\2020 \306\307\304\"\210\2020 eb\207" [Man-first-heading-regexp indent nindent re-search-forward nil t throw unindent beginning-of-line " " zerop "\\|$" looking-at 1] 5) delete-char 1 indent Man-uses-untabify-flag] 4 (#$ . 34268)]) #@45 Move point to Nth next section (default 1). (defalias 'Man-next-section #[(n) "\304`\305\n!\203 \306y\210\307\nd\310 $\203 \311 \210\202\" db\210\312y\210`W\205* b*\207" [start case-fold-search Man-heading-regexp n nil looking-at 1 re-search-forward t beginning-of-line -1] 5 (#$ . 35021) "p"]) #@49 Move point to Nth previous section (default 1). (defalias 'Man-previous-section #[(n) "\303\304 !\203 \305y\210\306 e\307\n$\203 \310 \202 eb)\207" [case-fold-search Man-heading-regexp n nil looking-at -1 re-search-backward t beginning-of-line] 5 (#$ . 35328) "p"]) #@111 Move point to SECTION if it exists, otherwise don't move point. Returns t if section is found, nil otherwise. (defalias 'Man-find-section #[(section) "`\303eb\210\304\305\nPd\306#\203 \307 \210\306\202 b\210\303*\207" [case-fold-search curpos section nil re-search-forward "^" t beginning-of-line] 4 (#$ . 35605)]) #@37 Query for section to move point to. (defalias 'Man-goto-section #[nil "\305\300\306!\307\310\311 \312Q \313\f\"\211\203 \314\230\203\" \202# ,\"\210\315\306!!\207" [Man-sections-alist default completion-ignore-case chosen prompt aput aheadsym t nil "Go to section (default " "): " completing-read "" Man-find-section] 6 (#$ . 35931) nil]) #@108 Move point to the "SEE ALSO" section. Actually the section moved to is described by `Man-see-also-regexp'. (defalias 'Man-goto-see-also-section #[nil "\301!?\205 \302\303\304\305Q\"\207" [Man-see-also-regexp Man-find-section error "%s" "No " " section found in the current manpage"] 5 (#$ . 36288) nil]) #@334 Return a possibly hyphenated word at point. If the word starts at the first non-whitespace column, and the previous line ends with a hyphen, return the last word on the previous line instead. Thus, if a reference to "tcgetpgrp(3V)" is hyphenated as "tcgetp-grp(3V)", and point is at "grp(3V)", we return "tcgetp-" instead of "grp". (defalias 'Man-possibly-hyphenated-word #[nil "\212\302\303!\210\304\305w\210`\306 \211\212\307 \210`)=\203' \310\210`Sf\311=\203' \306 +\207" [word beg skip-syntax-backward "w()" " " nil current-word back-to-indentation 0 45] 3 (#$ . 36602)]) #@131 Get one of the manpages referred to in the "SEE ALSO" section. Specify which REFERENCE to use; default is based on word at point. (defalias 'Man-follow-manual-reference #[(reference) "\204 \302\303!\207\304\300 \"\210\305\306\307!!!\207" [Man-refpages-alist reference error "Can't find any references in the current manpage" aput Man-getpage-in-background Man-translate-references aheadsym] 4 (#$ . 37192) (byte-code "\204 \306\307!\207\310\311 \206 \312\313\314 \"\203 \315\211\224O\202 )\"@\206* \316!\317\320\321\322\323\n\317\324\"B\"!\"\323 \325\n\326Q \327 \323\211\211\211 &\211\203V \f\312\230\203Z \n\202[ \f,C\207" [Man-refpages-alist word default defaults chosen prompt error "There are no references in the current man page" all-completions Man-possibly-hyphenated-word "" string-match "-$" 0 aheadsym mapcar substring-no-properties delete-dups delq nil car "Refer to (default " "): " completing-read] 10)]) #@41 Kill the buffer containing the manpage. (defalias 'Man-kill #[nil "\300\301!\207" [quit-window t] 2 (#$ . 38137) nil]) #@41 Bury the buffer containing the manpage. (defalias 'Man-quit #[nil "\300 \207" [quit-window] 1 (#$ . 38262) nil]) #@37 Go to the manual page on page PAGE. (defalias 'Man-goto-page #[(page &optional noerror) "\204\f \204\f \306\307!\210\205\n\310W\204 \nGV\203\" \306\311\n\"\210\nS8\211@ A@ \n \312\313\314 S88\206> \315 G$ ~\210\fb\210\f }\210\316eb\210\316 \317 d\320#\205m \321\322\323\310!\"\210\310y\210\202W )\210\316\212\324!!\203\373 \310y\210`\325\310!\210`\316\326 \" # $ %\214%$}\210eb\210\327 \210m\204\372 `\"U\204\372 `\"\317&$\320#\203\363 \323\330!\211 'GS (#\203\321 #'P'\316#'GS('(H\331>\203\343 '\330(O#\332)'\"\203\362 \321\333'\"\210*\334\316w\210\202\232 -)\237eb+\207" [Man-page-list noerror page page-range page-start page-end error "Not a man page buffer" 1 "No manpage %d found" format "%s page %d of %d" 2 "" nil re-search-forward t aput Man-sections-alist match-string Man-find-section Man-next-section -1 back-to-indentation 0 (45 173) string-match Man-refpages-alist " \n," Man-current-page Man-page-mode-string case-fold-search Man-heading-regexp Man-see-also-regexp runningpoint hyphenated end start Man-hyphenated-reference-regexp word len Man-reference-regexp] 6 (#$ . 38381) (byte-code "\204 \301\302!\207G\303U\203 \301\304!\207\305\306\307G\"!C\207" [Man-page-list error "Not a man page buffer" 1 "You're looking at the only manpage in the buffer" read-minibuffer format "Go to manpage [1-%d]: "] 4)]) #@44 Find the next manpage entry in the buffer. (defalias 'Man-next-manpage #[nil "G\303U\203 \304\305!\210 GW\203 \306 T!\207\n\203 \306\303!\207\304\307!\207" [Man-page-list Man-current-page Man-circular-pages-flag 1 error "This is the only manpage in the buffer" Man-goto-page "You're looking at the last manpage in the buffer"] 2 (#$ . 39761) nil]) #@48 Find the previous manpage entry in the buffer. (defalias 'Man-previous-manpage #[nil "G\303U\203 \304\305!\210 \303V\203 \306 S!\207\n\203 \306G!\207\304\307!\207" [Man-page-list Man-current-page Man-circular-pages-flag 1 error "This is the only manpage in the buffer" Man-goto-page "You're looking at the first manpage in the buffer"] 2 (#$ . 40120) nil]) #@67 View a header file specified by FILE from `Man-header-file-path'. (defalias 'Man-view-header-file #[(file) "\304\n\203& \305 \n@\"\nA\306 !\203! \307 !\210\304\211\202 \304\202 *\207" [Man-header-file-path complete-path path file nil expand-file-name file-readable-p view-file] 4 (#$ . 40488)]) (byte-code "\300 \210\301\302\303\"\210\301\302\304\"\210\305\306!\207" [Man-init-defvars add-to-list debug-ignored-errors "^No manpage [0-9]* found$" "^Can't find the .* manpage$" provide man] 3)
Close
