changeset 85421:fbc2287ee475

Remove version keyword. (doc-view-ghostscript-program, doc-view-dvipdfm-program) (doc-view-ps2pdf-program): Use executable-find. Simplify custom type. (doc-view-ghostscript-options): Improve custom type. (doc-view-cache-directory, doc-view-conversion-buffer) (doc-view-conversion-refresh-interval): Simplify custom type.
author Reiner Steib <Reiner.Steib@gmx.de>
date Thu, 18 Oct 2007 19:46:39 +0000
parents de8f3f575afc
children 4fb8cbaeb725
files lisp/ChangeLog lisp/doc-view.el
diffstat 2 files changed, 21 insertions(+), 14 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Thu Oct 18 19:33:57 2007 +0000
+++ b/lisp/ChangeLog	Thu Oct 18 19:46:39 2007 +0000
@@ -1,3 +1,12 @@
+2007-10-18  Reiner Steib  <Reiner.Steib@gmx.de>
+
+	* doc-view.el: Remove version keyword.
+	(doc-view-ghostscript-program, doc-view-dvipdfm-program)
+	(doc-view-ps2pdf-program): Use executable-find.  Simplify custom type.
+	(doc-view-ghostscript-options): Improve custom type.
+	(doc-view-cache-directory, doc-view-conversion-buffer)
+	(doc-view-conversion-refresh-interval): Simplify custom type.
+
 2007-10-18  Tassilo Horn  <tassilo@member.fsf.org>
 
 	* doc-view.el (doc-view-dvi->pdf-sentinel, doc-view-dvi->pdf)
@@ -8,7 +17,6 @@
 	(doc-view-mode-map): Use the image-mode scrolling commands.  Don't
 	rebind C-x k.
 
-
 2007-10-18  Reiner Steib  <Reiner.Steib@gmx.de>
 
 	* doc-view.el (doc-view-ghostscript-options, doc-view-ps->pdf):
--- a/lisp/doc-view.el	Thu Oct 18 19:33:57 2007 +0000
+++ b/lisp/doc-view.el	Thu Oct 18 19:46:39 2007 +0000
@@ -5,7 +5,6 @@
 ;; Author: Tassilo Horn <tassilo@member.fsf.org>
 ;; Maintainer: Tassilo Horn <tassilo@member.fsf.org>
 ;; Keywords: files, pdf, ps, dvi
-;; Version: <2007-10-17 Wed 22:15>
 
 ;; This file is part of GNU Emacs.
 
@@ -115,9 +114,9 @@
   :group 'multimedia
   :prefix "doc-view-")
 
-(defcustom doc-view-ghostscript-program "gs"
+(defcustom doc-view-ghostscript-program (executable-find "gs")
   "Program to convert PS and PDF files to PNG."
-  :type '(file)
+  :type 'file
   :group 'doc-view)
 
 (defcustom doc-view-ghostscript-options
@@ -126,40 +125,40 @@
     "-dNOPAUSE" "-sDEVICE=png16m" "-dTextAlphaBits=4"
     "-dBATCH" "-dGraphicsAlphaBits=4" "-dQUIET" "-r100")
   "A list of options to give to ghostscript."
-  :type '(sexp)
+  :type '(repeat string)
   :group 'doc-view)
 
-(defcustom doc-view-dvipdfm-program "dvipdfm"
+(defcustom doc-view-dvipdfm-program (executable-find "dvipdfm")
   "Program to convert DVI files to PDF.
 
 DVI file will be converted to PDF before the resulting PDF is
 converted to PNG."
-  :type '(file)
+  :type 'file
   :group 'doc-view)
 
-(defcustom doc-view-ps2pdf-program "ps2pdf"
+(defcustom doc-view-ps2pdf-program (executable-find "ps2pdf")
   "Program to convert PS files to PDF.
 
 PS files will be converted to PDF before searching is possible."
-  :type '(file)
+  :type 'file
   :group 'doc-view)
 
-(defcustom doc-view-pdftotext-program "pdftotext"
+(defcustom doc-view-pdftotext-program (executable-find "pdftotext")
   "Program to convert PDF files to plain text.
 
 Needed for searching."
-  :type '(file)
+  :type 'file
   :group 'doc-view)
 
 (defcustom doc-view-cache-directory (concat temporary-file-directory
 					    "doc-view")
   "The base directory, where the PNG images will be saved."
-  :type '(directory)
+  :type 'directory
   :group 'doc-view)
 
 (defcustom doc-view-conversion-buffer "*doc-view conversion output*"
   "The buffer where messages from the converter programs go to."
-  :type '(string)
+  :type 'string
   :group 'doc-view)
 
 (defcustom doc-view-conversion-refresh-interval 3
@@ -168,7 +167,7 @@
 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."
-  :type '(string)
+  :type 'integer
   :group 'doc-view)
 
 ;;;; Internal Variables