# HG changeset patch
# User John Paul Wallington <jpw@pobox.com>
# Date 1085515759 0
# Node ID 4b9c2c0fbfe1daa65a8eb7518bb8a1ff649af67d
# Parent  f813d67d717acdb428ec0b5be74a5584bf81a768
(gs-load-image): Use `set-process-query-on-exit-flag' instead of
obsolete `process-kill-without-query'.

diff -r f813d67d717a -r 4b9c2c0fbfe1 lisp/gs.el
--- a/lisp/gs.el	Tue May 25 20:06:06 2004 +0000
+++ b/lisp/gs.el	Tue May 25 20:09:19 2004 +0000
@@ -1,6 +1,6 @@
 ;;; gs.el --- interface to Ghostscript
 
-;; Copyright (C) 1998, 2001 Free Software Foundation, Inc.
+;; Copyright (C) 1998, 2001, 2004 Free Software Foundation, Inc.
 
 ;; Maintainer: FSF
 ;; Keywords: internal
@@ -197,7 +197,7 @@
 	(setenv "GHOSTVIEW" window-and-pixmap-id)
 	(setq gs (apply 'start-process "gs" "*GS*" gs-program
 			(gs-options gs-device file)))
-	(process-kill-without-query gs)
+	(set-process-query-on-exit-flag gs nil)
 	gs)
     nil))