mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-30 12:21:25 -08:00
Code Issues Projects Releases Wiki Activity

(doc-view-dvi->pdf-sentinel, doc-view-reset-slice)

Browse source 
(doc-view-insert-image): Minor aesthetical docstring changes.
This commit is contained in:
Michaël Cadilhac 2007-10-03 23:40:07 +00:00
parent 1ca678aaf7
commit e48a5bf9dd
2 changed files with 9 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

7
lisp/ChangeLog
View file

@ -1,4 +1,9 @@
2007-10-04 Tassilo Horn <tassilo@member.fsf.org>
2007-10-03 Micha,Ak(Bl Cadilhac <michael@cadilhac.name>
* doc-view.el (doc-view-dvi->pdf-sentinel, doc-view-reset-slice)
(doc-view-insert-image): Minor aesthetical docstring changes.
2007-10-03 Tassilo Horn <tassilo@member.fsf.org>
* doc-view.el (doc-view): Don't ignore pdf and dvi files when
completing filename.

7
lisp/doc-view.el
View file

@ -343,8 +343,7 @@ It'a a subdirectory of `doc-view-cache-directory'."
(md5 (current-buffer)))))))
(defun doc-view-dvi->pdf-sentinel (proc event)
"If DVI->PDF conversion was successful, convert the PDF to PNG
now."
"If DVI->PDF conversion was successful, convert the PDF to PNG now."
(if (not (string-match "finished" event))
(message "DocView: dvi->pdf process changed status to %s." event)
(set-buffer (process-get proc 'buffer))
@ -530,7 +529,7 @@ dragging it to its bottom-right corner. See also
(doc-view-set-slice x y w h)))
(defun doc-view-reset-slice ()
"Resets the current slice.
"Reset the current slice.
After calling this function the whole pages will be visible
again."
(interactive)
@ -542,7 +541,7 @@ again."
(defun doc-view-insert-image (file &rest args)
"Insert the given png FILE.
ARGs is a list of image descriptors."
ARGS is a list of image descriptors."
(let ((image (apply 'create-image file 'png nil args)))
(setq doc-view-current-image image)
(insert-image image (concat "[" file "]") nil doc-view-current-slice)))