[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[AUCTeX-diffs] Changes to auctex/preview/preview.el,v
From: |
David Kastrup |
Subject: |
[AUCTeX-diffs] Changes to auctex/preview/preview.el,v |
Date: |
Fri, 29 Sep 2006 00:16:29 +0000 |
CVSROOT: /sources/auctex
Module name: auctex
Changes by: David Kastrup <dak> 06/09/29 00:16:29
Index: preview.el
===================================================================
RCS file: /sources/auctex/auctex/preview/preview.el,v
retrieving revision 1.271
retrieving revision 1.272
diff -u -b -r1.271 -r1.272
--- preview.el 21 Sep 2006 11:19:20 -0000 1.271
+++ preview.el 29 Sep 2006 00:16:29 -0000 1.272
@@ -22,7 +22,7 @@
;;; Commentary:
-;; $Id: preview.el,v 1.271 2006/09/21 11:19:20 dak Exp $
+;; $Id: preview.el,v 1.272 2006/09/29 00:16:29 dak Exp $
;;
;; This style is for the "seamless" embedding of generated images
;; into LaTeX source code. Please see the README and INSTALL files
@@ -347,7 +347,9 @@
(dotimes (i 4 box)
(aset box i (+ (aref box i) (aref border i)))))))
-(defcustom preview-gs-command "gs"
+(defcustom preview-gs-command (if (eq system-type 'windows-nt)
+ "GSWIN32C.EXE"
+ "gs")
"*How to call gs for conversion from EPS. See also `preview-gs-options'."
:group 'preview-gs
:type 'string)
@@ -3505,7 +3507,7 @@
(defconst preview-version (eval-when-compile
(let ((name "$Name: $")
- (rev "$Revision: 1.271 $"))
+ (rev "$Revision: 1.272 $"))
(or (when (string-match "\\`[$]Name: *release_\\([^ ]+\\) *[$]\\'" name)
(setq name (match-string 1 name))
(while (string-match "_" name)
@@ -3519,7 +3521,7 @@
(defconst preview-release-date
(eval-when-compile
- (let ((date "$Date: 2006/09/21 11:19:20 $"))
+ (let ((date "$Date: 2006/09/29 00:16:29 $"))
(string-match
"\\`[$]Date: *\\([0-9]+\\)/\\([0-9]+\\)/\\([0-9]+\\)"
date)