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 : doc-view.elc
;ELC ;;; Compiled by mockbuild@c6b8.bsys.dev.centos.org on Thu Feb 19 13:02:49 2015 ;;; from file /builddir/build/BUILD/emacs-23.1/lisp/doc-view.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 "`doc-view.el' was compiled for Emacs 19.29 or later")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\300\301!\210\300\302!\210\300\303!\210\304\305\306\307\310\311\312\313\314\315\314\316\317\320& \207" [require dired image-mode jka-compr custom-declare-group doc-view nil "In-buffer viewer for PDF, PostScript and DVI files." :link (function-link doc-view) :version "22.2" :group applications multimedia :prefix "doc-view-"] 14) #@45 Program to convert PS and PDF files to PNG. (custom-declare-variable 'doc-view-ghostscript-program '(executable-find "gs") '(#$ . 949) :type 'file :group 'doc-view) #@43 A list of options to give to ghostscript. (custom-declare-variable 'doc-view-ghostscript-options ''("-dSAFER" "-dNOPAUSE" "-sDEVICE=png16m" "-dTextAlphaBits=4" "-dBATCH" "-dGraphicsAlphaBits=4" "-dQUIET") '(#$ . 1120) :type '(repeat string) :group 'doc-view) #@95 Dots per inch resolution used to render the documents. Higher values result in larger images. (custom-declare-variable 'doc-view-resolution '100 '(#$ . 1385) :type 'number :group 'doc-view) #@212 Program to convert DVI files to PDF. DVI file will be converted to PDF before the resulting PDF is converted to PNG. If this and `doc-view-dvipdf-program' are set, `doc-view-dvipdf-program' will be preferred. (custom-declare-variable 'doc-view-dvipdfm-program '(executable-find "dvipdfm") '(#$ . 1582) :type 'file :group 'doc-view) #@213 Program to convert DVI files to PDF. DVI file will be converted to PDF before the resulting PDF is converted to PNG. If this and `doc-view-dvipdfm-program' are set, `doc-view-dvipdf-program' will be preferred. (custom-declare-variable 'doc-view-dvipdf-program '(executable-find "dvipdf") '(#$ . 1923) :type 'file :group 'doc-view) #@102 Program to convert PS files to PDF. PS files will be converted to PDF before searching is possible. (custom-declare-variable 'doc-view-ps2pdf-program '(executable-find "ps2pdf") '(#$ . 2263) :type 'file :group 'doc-view) #@68 Program to convert PDF files to plain text. Needed for searching. (custom-declare-variable 'doc-view-pdftotext-program '(executable-find "pdftotext") '(#$ . 2491) :type 'file :group 'doc-view) #@57 The base directory, where the PNG images will be saved. (custom-declare-variable 'doc-view-cache-directory '(expand-file-name (format "docview%d" (user-uid)) temporary-file-directory) '(#$ . 2691) :type 'directory :group 'doc-view) #@62 The buffer where messages from the converter programs go to. (defvar doc-view-conversion-buffer " *doc-view conversion output*" (#$ . 2929)) #@284 Interval in seconds between refreshes of the DocView buffer while converting. After such a refresh newly converted pages will be available for viewing. If set to nil there won't be any refreshes and the pages won't be displayed before conversion of the whole document has finished. (custom-declare-variable 'doc-view-conversion-refresh-interval '1 '(#$ . 3077) :type 'integer :group 'doc-view) (defalias 'doc-view-new-window-function #[(winprops) "\302\303\"\211\203 \304 !\202* \305e\306\"\203 \307\310\311C\"\210\312ed\313\314$\315 \316\314#\210\315 \317@#\210\320\303 #)\207" [winprops ol image-mode-window-get overlay copy-overlay get-char-property display signal cl-assertion-failed (not (get-char-property (point-min) 'display)) make-overlay nil t overlay-put doc-view window image-mode-window-put] 6]) #@23 Only used internally. (defvar doc-view-current-files nil (#$ . 3901)) (make-variable-buffer-local 'doc-view-current-files) #@23 Only used internally. (defvar doc-view-current-converter-processes nil (#$ . 4030)) (make-variable-buffer-local 'doc-view-current-converter-processes) #@23 Only used internally. (defvar doc-view-current-timer nil (#$ . 4187)) (make-variable-buffer-local 'doc-view-current-timer) #@23 Only used internally. (defvar doc-view-current-cache-dir nil (#$ . 4316)) (make-variable-buffer-local 'doc-view-current-cache-dir) #@23 Only used internally. (defvar doc-view-current-search-matches nil (#$ . 4453)) (make-variable-buffer-local 'doc-view-current-search-matches) #@23 Only used internally. (defvar doc-view-pending-cache-flush nil (#$ . 4600)) #@23 Only used internally. (defvar doc-view-previous-major-mode nil (#$ . 4682)) #@273 Only used internally. The file name used for conversion. Normally it's the same as `buffer-file-name', but for remote files, compressed files and files inside an archive it is a temporary copy of the (uncompressed, extracted) file residing in `doc-view-cache-directory'. (defvar doc-view-buffer-file-name nil (#$ . 4765)) #@75 The type of document in the current buffer. Can be `dvi', `pdf', or `ps'. (defvar doc-view-doc-type nil (#$ . 5094)) #@74 Keymap used by `doc-view-mode' when displaying a doc as a set of images. (defvar doc-view-mode-map (byte-code "\302 \303 \"\210\304\305\306#\210\304\307\310#\210\304\311\312#\210\304\313\314#\210\304\315\306#\210\304\316\310#\210\304\317\320#\210\304\321\322#\210\304\323\324#\210\304\325\326#\210\304\327\330#\210\304\331\332#\210\304\333\334#\210\304\335\336#\210\304\337\340#\210\304\341\342#\210\304\343\344#\210\304\345\346#\210\304\347\350#\210\304\351\352#\210\304\353\352#\210\304\354\355#\210\304\356\357#\210\304\360\361#\210\304\362\363#\210\304\364\365#\210\304\366\365#\210)\207" [map image-mode-map make-sparse-keymap set-keymap-parent define-key "n" doc-view-next-page "p" doc-view-previous-page [next] forward-page [prior] backward-page [remap forward-page] [remap backward-page] " " doc-view-scroll-up-or-next-page "" doc-view-scroll-down-or-previous-page [134217788] doc-view-first-page [134217790] doc-view-last-page [remap goto-line] doc-view-goto-page " " image-next-line "+" doc-view-enlarge "-" doc-view-shrink "k" doc-view-kill-proc-and-buffer "K" doc-view-kill-proc "ss" doc-view-set-slice "sm" doc-view-set-slice-using-mouse "sr" doc-view-reset-slice "" doc-view-search [find] "" doc-view-search-backward "" doc-view-show-tooltip "" doc-view-toggle-display "" doc-view-open-text "g" revert-buffer "r"] 4) (#$ . 5217)) #@25 Menu for Doc View mode. (defvar doc-view-menu nil (#$ . 6605)) (easy-menu-do-define 'doc-view-menu doc-view-mode-map "Menu for Doc View mode." '("DocView" ["Set Slice" doc-view-set-slice-using-mouse] ["Set Slice (manual)" doc-view-set-slice] ["Reset Slice" doc-view-reset-slice] "---" ["Search" doc-view-search] ["Search Backwards" doc-view-search-backward] ["Toggle display" doc-view-toggle-display])) #@39 Keymap used by `doc-minor-view-mode'. (defvar doc-view-minor-mode-map (byte-code "\301 \302\303\304#\210)\207" [map make-sparse-keymap define-key "" doc-view-toggle-display] 4) (#$ . 7014)) (defalias 'doc-view-current-page '(macro . #[(&optional win) "\301\302E\207" [win image-mode-window-get 'page] 3])) (defalias 'doc-view-current-info '(macro . #[nil "\300\207" [(image-mode-window-get 'info)] 1])) (defalias 'doc-view-current-overlay '(macro . #[nil "\300\207" [(image-mode-window-get 'overlay)] 1])) (defalias 'doc-view-current-image '(macro . #[nil "\300\207" [(image-mode-window-get 'image)] 1])) (defalias 'doc-view-current-slice '(macro . #[nil "\300\207" [(image-mode-window-get 'slice)] 1])) #@30 View the page given by PAGE. (defalias 'doc-view-goto-page #[(page) "G\306 \307W\203 \307\202 \nV\203 \f\204 \n\310\303 \311#\210\312\313\314 \n#\315\316#\f\2034 \317\2025 \320 \205p \236\205p \312\321\315\316#\322 - \236A\311 .\211 /\203k /@.-\323.\324R-/A\211/\204T *-)PQ 0\310\3250\311#\210)\326\313\327 \"\330 \" 1\3311\332\333#\210\334\335 \"\210\3361!\204\312 \f\203\312 \33721 \340\341!\340\342! 3\211 4 L\2103\335 L\210\343\344\345\346\3473D\3474D\350\257E*$\210)\351\352\353!\354\352\325!#*\207" [doc-view-current-files hscroll len page doc-view-current-converter-processes doc-view-current-search-matches window-hscroll 1 image-mode-window-put nil propertize format "Page %d of %d." face bold " (still converting...)\n" "\n" "Search matches:\n" "" " - \"" "\"\n" info expand-file-name "page-%d.png" doc-view-current-cache-dir doc-view-insert-image :pointer arrow set-window-hscroll selected-window file-exists-p doc-view-pdf->png-1 make-symbol "--page--" "--win--" lambda (&rest --cl-rest--) apply #[(#1=#:G40700 #2=#:G40701) "p\304J!=\205+ \305\306J\" J=\205+ \307 \310\311\312 \"r\313\216\314J\315\"\210\316 J!,\207" [#1# #2# save-selected-window-alist save-selected-window-window window-buffer image-mode-window-get page selected-window mapcar #[(frame) "\301!D\207" [frame frame-selected-window] 3] frame-list ((byte-code "\305\211\2030 \n@\306 @!\203) \307 \211A@)!\203) \310 @ \211A@)\311#\210\nA\211\204 *\307\f!\203< \312\f\311\"\210\305\207" [save-selected-window-alist elt #3=#:--cl-dolist-temp-- x save-selected-window-window nil frame-live-p window-live-p set-frame-selected-window norecord select-window] 5)) select-window norecord doc-view-goto-page] 4] quote --cl-rest-- overlay-put image-mode-window-get overlay help-echo contexts m #4=#:--cl-dolist-temp-- #5=#:--cl-val-- file doc-view-buffer-file-name #6=#:--cl-win-- #7=#:--cl-page--] 12 (#$ . 7730) "nPage: "]) #@27 Browse ARG pages forward. (defalias 'doc-view-next-page #[(&optional arg) "\301\302\303\304\"\206\n \305\\!\207" [arg doc-view-goto-page image-mode-window-get page nil 1] 4 (#$ . 9675) "p"]) #@28 Browse ARG pages backward. (defalias 'doc-view-previous-page #[(&optional arg) "\301\302\303\304\"\206\n \305Z!\207" [arg doc-view-goto-page image-mode-window-get page nil 1] 4 (#$ . 9873) "p"]) #@22 View the first page. (defalias 'doc-view-first-page #[nil "\300\301!\207" [doc-view-goto-page 1] 2 (#$ . 10075) nil]) #@21 View the last page. (defalias 'doc-view-last-page #[nil "\301G!\207" [doc-view-current-files doc-view-goto-page] 2 (#$ . 10199) nil]) #@50 Scroll page up if possible, else goto next page. (defalias 'doc-view-scroll-up-or-next-page #[nil "\302 \303\304\305\"\306 \307\305!U\205) \310 \210\303\304\305\"U\204$ \311 \210\312\313!\210\314\315 \"*\207" [cur-page hscroll window-hscroll image-mode-window-get page nil window-vscroll image-scroll-up doc-view-next-page image-bob image-bol 1 set-window-hscroll selected-window] 4 (#$ . 10340) nil]) #@56 Scroll page down if possible, else goto previous page. (defalias 'doc-view-scroll-down-or-previous-page #[nil "\302 \303\304\305\"\306 \307\305!U\205) \310 \210\303\304\305\"U\204$ \311 \210\312\313!\210\314\315 \"*\207" [cur-page hscroll window-hscroll image-mode-window-get page nil window-vscroll image-scroll-down doc-view-previous-page image-eob image-bol 1 set-window-hscroll selected-window] 4 (#$ . 10752) nil]) #@41 Kill the current converter process(es). (defalias 'doc-view-kill-proc #[nil "\203\f \303\304\305\217\210\202 \203 \306 !\210\303\303\211\207" [doc-view-current-converter-processes doc-view-current-timer mode-line-process nil (byte-code "\301\211A@!\207" [doc-view-current-converter-processes kill-process] 3) ((error)) cancel-timer] 3 (#$ . 11182) nil]) #@48 Kill the current converter process and buffer. (defalias 'doc-view-kill-proc-and-buffer #[nil "\301 \210\302=\205\f \303p!\207" [major-mode doc-view-kill-proc doc-view-mode kill-buffer] 2 (#$ . 11550) nil]) (defalias 'doc-view-make-safe-dir #[(dir) "\300\301\302\217\207" [nil (byte-code "\302 \303\216\304\305!\210\306 !*\207" [umask dir default-file-modes ((set-default-file-modes umask)) set-default-file-modes 448 make-directory] 2) ((file-already-exists (byte-code "\301!\203 \302\303\"\210\304\305\"\207" [dir file-symlink-p error "Danger: %s points to a symbolic link" set-file-modes 448] 3)))] 3]) #@129 Return the directory where the png files of the current doc should be saved. It's a subdirectory of `doc-view-cache-directory'. (defalias 'doc-view-current-cache-dir #[nil "\203 \207\306 !\210\307\310\311\n!\312 \313\314! r q\210\315\216\316\317!\210\320\f!\210\321p!,Q \"!\211\207" [doc-view-current-cache-dir doc-view-cache-directory buffer-file-name doc-view-buffer-file-name file #1=#:temp-buffer doc-view-make-safe-dir file-name-as-directory expand-file-name file-name-nondirectory "-" generate-new-buffer " *temp*" ((byte-code "\301!\203\n \302!\210\301\207" [#1# buffer-name kill-buffer] 2)) set-buffer-multibyte nil insert-file-contents-literally md5] 6 (#$ . 12169)]) #@60 Return LIST with all items removed that satisfy PREDICATE. (defalias 'doc-view-remove-if #[(predicate list) "\305 \305\211\203 @\f\n!\204 \nB A\211\204\n \305\237+\207" [new-list list item #1=#:--cl-dolist-temp-- predicate nil] 3 (#$ . 12859)]) #@123 Return non-nil if image type TYPE is available for `doc-view'. Image types are symbols like `dvi', `postscript' or `pdf'. (defalias 'doc-view-mode-p #[(type) "\304 \205J \305\306!\205J \307=\203) \310\311!\205J \203! \312 !\206J \n\205J \312\n!\207\313=\204A \314=\204A \315=\204A \311=\203I \205J \312 !\207\316\207" [type doc-view-dvipdf-program doc-view-dvipdfm-program doc-view-ghostscript-program display-graphic-p image-type-available-p png dvi doc-view-mode-p pdf executable-find postscript ps eps nil] 2 (#$ . 13123)]) (byte-code "\301B\302\301!\204 \303\301\304\"\210\301\207" [current-load-list doc-view-shrink-factor default-boundp set-default 1.125] 3) #@23 Enlarge the document. (defalias 'doc-view-enlarge #[(factor) "\302\301!\210 _\303 \207" [factor doc-view-resolution make-local-variable doc-view-reconvert-doc] 2 (#$ . 13804) (list doc-view-shrink-factor)]) #@22 Shrink the document. (defalias 'doc-view-shrink #[(factor) "\301\302\245!\207" [factor doc-view-enlarge 1.0] 3 (#$ . 14019) (list doc-view-shrink-factor)]) #@93 Reconvert the current document. Should be invoked when the cached images aren't up-to-date. (defalias 'doc-view-reconvert-doc #[nil "\300 \210\301\302 !\203 \303\302 \304\"\210\305 \207" [doc-view-kill-proc file-exists-p doc-view-current-cache-dir dired-delete-file always doc-view-initiate-display] 3 (#$ . 14182) nil]) #@53 Generic sentinel for doc-view conversion processes. (defalias 'doc-view-sentinel #[(proc event) "\304\305\"\204 \306\307\310 !\304\311\"\203 \312\313\"\202 #\207\314\315 \316\"!\205B r\315 \316\"q\210\317 \n\"\211\205; \320\321\n@\"\315 \322\" )\207" [event proc doc-view-current-converter-processes mode-line-process string-match "finished" message "DocView: process %s changed status to %s." process-name "\\(.+\\)\n?\\'" match-string 1 buffer-live-p process-get buffer delq format ":%s" callback] 7 (#$ . 14510)]) (defalias 'doc-view-start-process #[(name program args callback) "\306!\203\n \202 \307\310!\311\312 \n \f%\211 B\313\314 \"C\315 \316\"\210\317 \320p#\210\317 \321#*\207" [default-directory name doc-view-conversion-buffer program args proc file-readable-p expand-file-name "~/" apply start-process format ":%s" set-process-sentinel doc-view-sentinel process-put buffer callback doc-view-current-converter-processes mode-line-process] 7]) #@68 Convert DVI to PDF asynchronously and call CALLBACK when finished. (defalias 'doc-view-dvi->pdf #[(dvi pdf callback) "\203 \305!\203 \306\307 \nD $\207\306\307\f\310\n E $\207" [doc-view-dvipdf-program dvi pdf callback doc-view-dvipdfm-program executable-find doc-view-start-process "dvi->pdf" "-o"] 6 (#$ . 15493)]) #@39 Convert PDF-PS to PNG asynchronously. (defalias 'doc-view-pdf/ps->png #[(pdf-ps png) "\306\307\310 \311\312\313\n!\"\314 P\fE\"\315$\210 \205! \316\317 \320p$\211\207" [doc-view-ghostscript-program doc-view-ghostscript-options doc-view-resolution png pdf-ps doc-view-conversion-refresh-interval doc-view-start-process "pdf/ps->png" append format "-r%d" round "-sOutputFile=" #[nil "\203\n \301!\210\302\303p\304\"\207" [doc-view-current-timer cancel-timer nil doc-view-display force] 3] run-at-time "1 secs" doc-view-display doc-view-current-timer] 9 (#$ . 15821)]) #@96 Convert a PAGE of a PDF file to PNG asynchronously. Call CALLBACK with no arguments when done. (defalias 'doc-view-pdf->png-1 #[(pdf png page callback) "\306\307\310 \311\312\313\n!\"\311\314 \"\311\315 \"\316\fP \257\"$\207" [doc-view-ghostscript-program doc-view-ghostscript-options doc-view-resolution page png pdf doc-view-start-process "pdf->png-1" append format "-r%d" round "-dFirstPage=%d" "-dLastPage=%d" "-sOutputFile=" callback] 10 (#$ . 16399)]) #@89 Convert a PDF file to PNG asynchronously. Start by converting PAGES, and then the rest. (defalias 'doc-view-pdf->png #[(pdf png pages) "\204 \306 \n\"\207\307\310!\307\311!\307\312! \211 L\210\f\nL\210 AL\210\313 J\314\fJ@\"@\315\316\317\320\321 D\321\fD\321 D\322\257E$+\207" [pages pdf png #1=#:--cl-rest-- #2=#:--cl-png-- #3=#:--cl-pdf-- doc-view-pdf/ps->png make-symbol "--pdf--" "--png--" "--rest--" doc-view-pdf->png-1 format lambda (&rest --cl-rest--) apply #[(#4=#:G40702 #5=#:G40703 #6=#:G40704) "J\203 \303 J\nJJ#\207\304 \210\305 J\nJ\"\207" [#4# #6# #5# doc-view-pdf->png clear-image-cache doc-view-pdf/ps->png] 4] quote --cl-rest--] 13 (#$ . 16867)]) #@68 Convert PDF to TXT asynchronously and call CALLBACK when finished. (defalias 'doc-view-pdf->txt #[(pdf txt callback) "\204 \304\305!\210\306\307\310 \nE $\207" [doc-view-pdftotext-program pdf txt callback error "You need the `pdftotext' program to convert a PDF to text" doc-view-start-process "pdf->txt" "-raw"] 6 (#$ . 17548)]) #@67 Convert the current document to text and call CALLBACK when done. (defalias 'doc-view-doc->txt #[(txt callback) "\306\307 \310\"\210\311=\203 \312 \n #\207\313=\203O \314\315!\314\316!\314\317! \211 \320\321\307 \"L\210 \nL\210\f L\210\322 J\323\324\325\326\327\fD\327 D\327 D\330\257E#+\207\331=\203_ \312\320\321\307 \"\n #\207\332\333!\207" [doc-view-doc-type doc-view-buffer-file-name txt callback #1=#:--cl-callback-- #2=#:--cl-txt-- make-directory doc-view-current-cache-dir t pdf doc-view-pdf->txt ps make-symbol "--pdf--" "--txt--" "--callback--" expand-file-name "doc.pdf" doc-view-ps->pdf lambda (&rest --cl-rest--) apply #[(#3=#:G40705 #4=#:G40706 #5=#:G40707) "\303J J\nJ#\207" [#5# #4# #3# doc-view-pdf->txt] 4] quote --cl-rest-- dvi error "DocView doesn't know what to do" #6=#:--cl-pdf--] 12 (#$ . 17887)]) #@67 Convert PS to PDF asynchronously and call CALLBACK when finished. (defalias 'doc-view-ps->pdf #[(ps pdf callback) "\204 \304\305!\210\306\307\310 \nE $\207" [doc-view-ps2pdf-program ps pdf callback error "You need the `ps2pdf' program to convert PS to PDF" doc-view-start-process "ps->pdf" "-dSAFER"] 6 (#$ . 18726)]) (defalias 'doc-view-active-pages #[nil "\304\305p\304\306#\304\211\203( \n@\307\303 \"\211>\204 B)\nA\211\204 *)\207" [pages win #1=#:--cl-dolist-temp-- page nil get-buffer-window-list visible image-mode-window-get] 5]) #@170 Convert `doc-view-buffer-file-name' to a set of png files, one file per page. Those files are saved in the directory given by the function `doc-view-current-cache-dir'. (defalias 'doc-view-convert-current-doc #[nil "\306\307\310\311 \"\307\312\311 \"\313\311 \306\"\210 \314\315! r q\210\316\216\317\fp\"\210\320\321\211 \321\322%\210,#\323=\203g \324\325!\324\326! $\211 %\307\327 \"L\210$\nL\210\330&%J\331\332\333\334\335$D\335%D\336\257E#*\202\202 #\337=\203} \340 '\341&\n'#)\202\202 \342&\n\"*\207" [doc-view-pending-cache-flush res-file png-file doc-view-resolution res #1=#:temp-buffer t expand-file-name "page-%d.png" doc-view-current-cache-dir "resolution.el" make-directory generate-new-buffer " *temp*" ((byte-code "\301!\203\n \302!\210\301\207" [#1# buffer-name kill-buffer] 2)) princ write-region nil silently dvi make-symbol "--pdf--" "--png-file--" "doc.pdf" doc-view-dvi->pdf lambda (&rest --cl-rest--) apply #[(#2=#:G40708 #3=#:G40709) "\302J J\"\207" [#3# #2# doc-view-pdf/ps->png] 3] quote --cl-rest-- pdf doc-view-active-pages doc-view-pdf->png doc-view-pdf/ps->png doc-view-doc-type #4=#:--cl-png-file-- #5=#:--cl-pdf-- doc-view-buffer-file-name pages] 11 (#$ . 19287)]) #@362 Set the slice of the images that should be displayed. You can use this function to tell doc-view not to display the margins of the document. It prompts for the top-left corner (X and Y) of the slice to display and its WIDTH and HEIGHT. See `doc-view-set-slice-using-mouse' for a more convenient way to do that. To reset the slice use `doc-view-reset-slice'. (defalias 'doc-view-set-slice #[(x y width height) "\304\305 \n F\306#\210\307\310\311\306\"!\207" [x y width height image-mode-window-put slice nil doc-view-goto-page image-mode-window-get page] 6 (#$ . 20508) (let* ((size (image-size (doc-view-current-image) t)) (a (read-number (format "Top-left X (0..%d): " (car size)))) (b (read-number (format "Top-left Y (0..%d): " (cdr size)))) (c (read-number (format "Width (0..%d): " (- (car size) a)))) (d (read-number (format "Height (0..%d): " (- (cdr size) b))))) (list a b c d))]) #@219 Set the slice of the images that should be displayed. You set the slice by pressing mouse-1 at its top-left corner and dragging it to its bottom-right corner. See also `doc-view-set-slice' and `doc-view-reset-slice'. (defalias 'doc-view-set-slice-using-mouse #[nil "\306\211\211\211\211 \204\267 \307\310!\211 @\311=\203\263 \211 :\203( A@\202. \312 `\313\314F) \3158)@ \211 :\203G A@\202M \312 `\313\314F) \3158)A \211 :\203r \3168:\203k \316\202l \3178\202x \312 `\320\314F) \3158)@\fZ \211 :\203\237 \3168:\203\230 \316\202\231 \3178\202\245 \312 `\320\314F) \3158)A Z\321)\202\n \322\f \n $-\207" [done h w y x e nil read-event "Press mouse-1 at the top-left corner and drag it to the bottom-right corner!" drag-mouse-1 selected-window (0 . 0) 0 8 2 1 (0 . 0) t doc-view-set-slice event position] 6 (#$ . 21408) nil]) #@89 Reset the current slice. After calling this function whole pages will be visible again. (defalias 'doc-view-reset-slice #[nil "\300\301\302\211#\210\303\304\305\302\"!\207" [image-mode-window-put slice nil doc-view-goto-page image-mode-window-get page] 4 (#$ . 22276) nil]) #@65 Insert the given png FILE. ARGS is a list of image descriptors. (defalias 'doc-view-insert-image #[(file &rest args) "\203 \306 \210\307\310\311! \205 \312 !\205 \313\314 \315\307\n%\310\303! \316\304\f\307#\210\317 ed#\210\320 \321\f\203F \203B \303 B\fD\202P \f\202P \203O \322\202P \323#\210\324 \325\" \324 \321\";\203n \326 \327\"\210\330 \327\"\202\223 \310\331 \"\310\332 \" \211 \203\207 \326 \"\210\205\222 \330 \"*,\207" [doc-view-pending-cache-flush file args slice image ol clear-image-cache nil image-mode-window-get overlay file-readable-p apply create-image png image-mode-window-put move-overlay overlay-put display "Cannot display this page (yet)!" "Cannot display this page!\nMaybe because of a conversion failure!" overlay-get window set-window-hscroll 0 set-window-vscroll hscroll vscroll doc-view-current-converter-processes win] 8 (#$ . 22556)]) #@96 Return non-nil if A should be sorted before B. Predicate for sorting `doc-view-current-files'. (defalias 'doc-view-sort #[(a b) "G GW\206 G GU\205 \231\207" [a b] 2 (#$ . 23455)]) #@135 Start viewing the document in BUFFER. If FORCE is non-nil, start viewing even if the document does not have the page we want to view. (defalias 'doc-view-display #[(buffer &optional force) "rq\210 \306\307\310 \311\312\311$\313\"\314\315\311#\206 \316 C\315\211 \203t \f@\317\305 \" \320\321\322 \"\310 \" \204H \n\235\204l \235\203l \316 \323\324\325 \" r\326\216\327 \330\"\210p=\204g \331\332\333C\"\210\334 !\210,*\fA\211\204# ,\315\207" [buffer doc-view-current-files prev-pages win #1=#:--cl-dolist-temp-- page sort directory-files doc-view-current-cache-dir t "page-[0-9]+\\.png" doc-view-sort get-buffer-window-list nil selected-window image-mode-window-get expand-file-name format "page-%d.png" mapcar #[(frame) "\301!D\207" [frame frame-selected-window] 3] frame-list ((byte-code "\305\211\2030 \n@\306 @!\203) \307 \211A@)!\203) \310 @ \211A@)\311#\210\nA\211\204 *\307\f!\203< \312\f\311\"\210\305\207" [save-selected-window-alist elt #2=#:--cl-dolist-temp-- x save-selected-window-window nil frame-live-p window-live-p set-frame-selected-window norecord select-window] 5)) select-window norecord signal cl-assertion-failed (eq (current-buffer) buffer) doc-view-goto-page pagefile force save-selected-window-alist save-selected-window-window] 6 (#$ . 23648)]) (defalias 'doc-view-buffer-message #[nil "\300\301\302!\303\"?\205 \304\301\302!\303\305\306\307\310#\311\312Q#\207" [overlay-get image-mode-window-get overlay display overlay-put propertize "Welcome to DocView!" face bold "\n" "\nIf you see this buffer it means that the document you want to view is being\nconverted to PNG and the conversion of the first page hasn't finished yet or\n`doc-view-conversion-refresh-interval' is set to nil.\n\nFor now these keys are useful:\n\n`q' : Bury this buffer. Conversion will go on in background.\n`k' : Kill the conversion process and this buffer.\n`K' : Kill the conversion process.\n"] 7]) (defalias 'doc-view-show-tooltip #[nil "\300\301\302!!\207" [tooltip-show image-mode-window-get info] 3 nil nil]) #@56 Open a buffer with the current doc's contents as text. (defalias 'doc-view-open-text #[nil "\203 \302\303!\207\304\305\306 \"\307 !\203 \310 !\202 \311 \312\")\207" [doc-view-current-converter-processes txt message "DocView: please wait till conversion finished." expand-file-name "doc.txt" doc-view-current-cache-dir file-readable-p find-file doc-view-doc->txt doc-view-open-text] 3 (#$ . 25706) nil]) #@58 Toggle between editing a document as text or viewing it. (defalias 'doc-view-toggle-display #[nil "\304=\203) \305 \210\306\307ed\310\311$\210\312\302!\210\311 \203\" \210\202% \313 \210\314\315!\207\316 \2037 \317\320!\2037 \321 \210\304 \207" [major-mode buffer-read-only image-mode-winprops-alist doc-view-previous-major-mode doc-view-mode doc-view-kill-proc nil remove-overlays doc-view t make-local-variable fundamental-mode doc-view-minor-mode 1 buffer-modified-p y-or-n-p "The buffer has been modified. Save the changes? " save-buffer] 5 (#$ . 26120) nil]) #@200 Return a list of FILE's pages that contain text matching REGEXP. The value is an alist of the form (PAGE CONTEXTS) where PAGE is the pagenumber and CONTEXTS are all lines of text containing a match. (defalias 'doc-view-search-internal #[(regexp file) "\306\307!rq\210\310\216\311 !\210\312\211\313 \314\315 \316Q\313\317#\203Z \320\312!\203( \fT\320\321!\203 \f U\204B \f\322 \323 {CB\nB\202U \324\n@\206J \fC\322 \323 {C\"\nAB\f\202 \n\237.\207" [#1=#:temp-buffer file matches lastpage page regexp generate-new-buffer " *temp*" ((byte-code "\301!\203\n \302!\210\301\207" [#1# buffer-name kill-buffer] 2)) insert-file-contents 1 nil re-search-forward "\\(?:\\([\f]\\)\\|\\(" "\\)\\)" t match-string 2 line-beginning-position line-end-position append] 4 (#$ . 26697)]) #@60 Extract the number of matches from the search result LIST. (defalias 'doc-view-search-no-of-matches #[(list) "\304 \305\211\203 @\nGS\\ A\211\204\n *)\207" [no list p #1=#:--cl-dolist-temp-- 0 nil] 3 (#$ . 27485)]) #@97 Call `doc-view-search' for backward search. If prefix NEW-QUERY is given, ask for a new regexp. (defalias 'doc-view-search-backward #[(new-query) "\301\302\"\207" [new-query doc-view-search t] 3 (#$ . 27716) "P"]) #@210 Jump to the next match or initiate a new search if NEW-QUERY is given. If the current document hasn't been transformed to plain text till now do that first. If BACKWARD is non-nil, jump to the previous match. (defalias 'doc-view-search #[(new-query &optional backward) "\204 \203 \n\203 \305\306!\207\307\306!\207\310\311\312\313 \"\314 !\2032 \315\316\317! \"\320\321\322 !\"\202@ \f\203< \320\323!\202@ \324 \325\")\207" [new-query doc-view-current-search-matches backward txt doc-view-current-converter-processes doc-view-search-previous-match 1 doc-view-search-next-match nil expand-file-name "doc.txt" doc-view-current-cache-dir file-readable-p doc-view-search-internal read-from-minibuffer "Regexp: " message "DocView: search yielded %d matches." doc-view-search-no-of-matches "DocView: please wait till conversion finished." doc-view-doc->txt #[nil "\300\301!\207" [doc-view-search nil] 2]] 4 (#$ . 27938) "P"]) #@37 Go to the ARGth next matching page. (defalias 'doc-view-search-next-match #[(arg) "\305\306\"\nS 8@\211\203 \307 !\202' \205' \310\311!\205' \307\211 @@)!*\207" [doc-view-current-search-matches next-pages arg page x doc-view-remove-if #[(i) "@\301\302\303\"X\207" [i image-mode-window-get page nil] 4] doc-view-goto-page y-or-n-p "No more matches after current page. Wrap to first match? "] 4 (#$ . 28871) "p"]) #@41 Go to the ARGth previous matching page. (defalias 'doc-view-search-previous-match #[(arg) "\305\306\"\nS \2378@\211\203 \307 !\202* \205* \310\311!\205* \307\312!\211 @@)!*\207" [doc-view-current-search-matches prev-pages arg page x doc-view-remove-if #[(i) "@\301\302\303\"Y\207" [i image-mode-window-get page nil] 4] doc-view-goto-page y-or-n-p "No more matches before current page. Wrap to last match? " last] 4 (#$ . 29297) "p"]) #@58 Return non-nil if the current doc was already converted. (defalias 'doc-view-already-converted-p #[nil "\300\301 !\205 \302\301 \303\304#G\305V\207" [file-exists-p doc-view-current-cache-dir directory-files nil "\\.png$" 0] 4 (#$ . 29745)]) (defalias 'doc-view-initiate-display #[nil "\306!\203a \307 \210\310\311\312\"\206 \313\314\311 \312#\210)\315 \203W \316\317!\210\320\321\322 \"\n \323\324! r q\210\325\216\326\f!\203B \327\f!\210\330p!+ \247\203N \331\302!\210 *\332p\333\"\210\202Z \334 \210\316\335\336\337!\"\207\316\335\336\340\341)!\342\343\344=\203u \345\202v \346\347\350\260!\"\207" [doc-view-doc-type #1=#:--cl-val-- doc-view-resolution res res-file #2=#:temp-buffer doc-view-mode-p doc-view-buffer-message image-mode-window-get page nil 1 image-mode-window-put doc-view-already-converted-p message "DocView: using cached files!" expand-file-name "resolution.el" doc-view-current-cache-dir generate-new-buffer " *temp*" ((byte-code "\301!\203\n \302!\210\301\207" [#2# buffer-name kill-buffer] 2)) file-exists-p insert-file-contents read make-local-variable doc-view-display force doc-view-convert-current-doc "%s" substitute-command-keys "Type \\[doc-view-toggle-display] to toggle between editing or viewing the document." "No PNG support available or some conversion utility for " file-name-extension " files is missing. " "Type \\[doc-view-toggle-display] to switch to " ps "ps-mode" "fundamental-mode" ", \\[doc-view-open-text] to show the doc as text in a separate buffer " " or \\[doc-view-kill-proc-and-buffer] to kill this buffer." doc-view-buffer-file-name] 10]) (defalias 'doc-view-clone-buffer-hook #[nil "\301ed\302\303$\210:\205 \304\211\207" [image-mode-winprops-alist remove-overlays doc-view t nil] 5]) (defalias 'doc-view-intersection #[(l1 l2) "\305 \305\211\203 @\211\f>\203 \nB A\211\204\n *)\207" [l l1 x #1=#:--cl-dolist-temp-- l2 nil] 3]) #@290 Major mode in DocView buffers. DocView Mode is an Emacs document viewer. It displays PDF, PS and DVI files (as PNG images) in Emacs buffers. You can use \<doc-view-mode-map>\[doc-view-toggle-display] to toggle between displaying the document or editing it as text. \{doc-view-mode-map} (defalias 'doc-view-mode #[nil "edU\203 \306\307\310\"\"\311 )\207 \310=\203 \n\202 \312 \210\313\302!\210 )\f\2053 \314\315\f!\316\"A\212eb\210\317\320!\203A \321\202R \317\322!\203K \323\202R \317\324!\205R \325) =\313\326!\210\327= \"\206\200 =\203t \203t \330\331= #\206\200 =\206\200 \206\200 \330\332!@*\333>!\210\313\334!\210?\203\236 \335\336\337\f!!>\"\202\263 \340 @\341\f!)\204\262 \335\336\f!>\"\202\263 \f\211 \f\230\204\302 \342\340\211 #\210\343\344\345\340\346$\210\343\347\350\340\346$\210\343\351\352\340\346$\210\353ed\354\346$\210\343\355\356\340\346$\210\357 \210\313\360!\210\3610\313\362!\210\3402\313\363!\210\3403\364A!\210\313\365!\210\3665\313\367!\210\3707\371B\346C\310\372 \210\373\374!\207" [auto-mode-alist major-mode doc-view-previous-major-mode prev-major-mode buffer-file-name content-types remq rassq doc-view-mode normal-mode kill-all-local-variables make-local-variable assoc file-name-extension (("dvi" dvi) ("pdf" pdf) ("epdf" pdf) ("ps" ps) ("eps" ps)) looking-at "%!" (ps) "%PDF" (pdf) "\367" (dvi) doc-view-doc-type doc-view-intersection error "Conflicting types: name says %s but content says %s" "Cannot determine the document type" doc-view-make-safe-dir doc-view-buffer-file-name expand-file-name file-name-nondirectory file-name-sans-extension nil file-readable-p write-region add-hook change-major-mode-hook #[nil "\300 \210\301ed\302\303$\207" [doc-view-kill-proc remove-overlays doc-view t] 5] t clone-indirect-buffer-hook doc-view-clone-buffer-hook kill-buffer-hook doc-view-kill-proc remove-overlays doc-view image-mode-new-window-functions doc-view-new-window-function image-mode-setup-winprops mode-line-position (" P" (:eval (number-to-string (doc-view-current-page))) "/" (:eval (number-to-string (length doc-view-current-files)))) auto-hscroll-mode cursor-type use-local-map after-revert-hook doc-view-reconvert-doc bookmark-make-record-function doc-view-bookmark-make-record "DocView" doc-view-initiate-display run-mode-hooks doc-view-mode-hook name-types doc-view-cache-directory jka-compr-really-do-compress file-name-handler-alist doc-view-mode-map mode-name buffer-read-only] 6 (#$ . 31660) nil]) #@107 Non-nil if Doc-View minor mode is enabled. Use the command `doc-view-minor-mode' to change this variable. (defvar doc-view-minor-mode nil (#$ . 34150)) (make-variable-buffer-local 'doc-view-minor-mode) #@169 Toggle Doc view minor mode. With arg, turn Doc view minor mode on if arg is positive, off otherwise. See the command `doc-view-mode' for more information on this mode. (defalias 'doc-view-minor-mode #[(&optional arg) "\303 \304=\203 \n?\202( \203 \305 !\306V\202( \n\204\" \307\202( \310\311\302\"\210\312\211\203; \313\314\315\312\307$\210\310\316\317\320!\"\210\321\322\n\203E \323\202F \324\"\210\325 \203f \303 \203Y \303 \232\203f \310\326\n\203c \327\202d \330\"\210)\331 \210\n\207" [#1=#:last-message arg doc-view-minor-mode current-message toggle prefix-numeric-value 0 t message "Toggling %s off; better pass an explicit argument." nil add-hook change-major-mode-hook #[nil "\300\301!\207" [doc-view-minor-mode -1] 2] "%s" substitute-command-keys "Type \\[doc-view-toggle-display] to toggle between editing or viewing the document." run-hooks doc-view-minor-mode-hook doc-view-minor-mode-on-hook doc-view-minor-mode-off-hook called-interactively-p "Doc-View minor mode %sabled" "en" "dis" force-mode-line-update] 6 (#$ . 34359) (list (or current-prefix-arg 'toggle))]) (add-minor-mode 'doc-view-minor-mode " DocView" doc-view-minor-mode-map) #@54 Delete the whole cache (`doc-view-cache-directory'). (defalias 'doc-view-clear-cache #[nil "\301\302\"\207" [doc-view-cache-directory dired-delete-file always] 3 (#$ . 35524) nil]) #@45 Open `dired' in `doc-view-cache-directory'. (defalias 'doc-view-dired-cache #[nil "\301!\207" [doc-view-cache-directory dired] 2 (#$ . 35712) nil]) (defalias 'doc-view-bookmark-make-record #[nil "\300 \301\302\301\303\"B\304B\244\207" [bookmark-make-record-default page image-mode-window-get nil ((handler . doc-view-bookmark-jump))] 5]) (defalias 'doc-view-bookmark-jump #[(bmk) "\305!\306\301\"\n\307=\204 \310 \210\311 \312\313\314 \" r\315\216\316\317p\320\"\206' \311 \321\"\210\322 !\210-\207" [bmk page major-mode save-selected-window-alist save-selected-window-window bookmark-default-handler bookmark-prop-get doc-view-mode doc-view-toggle-display selected-window mapcar #[(frame) "\301!D\207" [frame frame-selected-window] 3] frame-list ((byte-code "\305\211\2030 \n@\306 @!\203) \307 \211A@)!\203) \310 @ \211A@)\311#\210\nA\211\204 *\307\f!\203< \312\f\311\"\210\305\207" [save-selected-window-alist elt #1=#:--cl-dolist-temp-- x save-selected-window-window nil frame-live-p window-live-p set-frame-selected-window norecord select-window] 5)) select-window get-buffer-window 0 norecord doc-view-goto-page] 5]) (provide 'doc-view)
Close
