--- interfaces/xmaxima/Tkmaxima/Constants.tcl~	2006-10-02 00:42:48.000000000 +0200
+++ interfaces/xmaxima/Tkmaxima/Constants.tcl	2007-01-05 16:55:37.000000000 +0100
@@ -143,7 +143,7 @@
     image/gif  netmath
     image/png  netmath
     image/jpeg netmath
-    application/postscript "ghostview -safer %s"
+    application/postscript "gv --safer %s"
     application/pdf "acroread %s"
     application/x-dvi "xdvi %s"
 }
--- interfaces/emacs/misc/bookmode.el~	2000-05-08 08:09:44.000000000 +0200
+++ interfaces/emacs/misc/bookmode.el	2007-01-05 16:57:59.000000000 +0100
@@ -680,7 +680,7 @@
 		
 		  (and tem
 		       (list (concat "View "(nth 1 tem))
-			     'call-process  "ghostview" nil nil nil
+			     'call-process  "gv" nil nil nil
 			     (expand-file-name(nth 1 tem))
 			     ))
 		  (list "Cancel")
@@ -705,7 +705,7 @@
 			 (concat
 			  (cond ((looking-at "%PS") "")
 				(t "gzip -dc | "))
-			  "ghostview -")
+			  "gv -")
 			 
 	)))
 	 
--- src/plot.lisp~	2006-10-10 23:13:17.000000000 +0200
+++ src/plot.lisp	2007-01-05 16:58:42.000000000 +0100
@@ -75,7 +75,7 @@
                         ((mlist) $plot_realpart nil)
                         ))
 
-(defvar $viewps_command  "(ghostview \"~a\")")
+(defvar $viewps_command  "(gv \"~a\")")
 
 ;; $plot_realpart option is false by default but *plot-realpart* is true because coerce-float-fun
 ;; is used outside of plot package too.