From 1a597f4fffe691a158dabeefa98b5c314f633f94 Mon Sep 17 00:00:00 2001 From: John Paul Wallington Date: Tue, 25 May 2004 20:12:00 +0000 Subject: [PATCH] (gs-load-image): Use `set-process-query-on-exit-flag' instead of obsolete `process-kill-without-query'. --- lisp/ChangeLog | 8 ++++++++ lisp/gs.el | 4 ++-- 2 files changed, 10 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 9cfd96f7075..b319197bac8 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,11 @@ +2004-05-25 John Paul Wallington + + * gs.el (gs-load-image): Use `set-process-query-on-exit-flag' + instead of obsolete `process-kill-without-query'. + + * textmodes/texinfmt.el (texinfo-indexvar-alist): + Declare as variable, not constant. + 2004-05-25 Luc Teirlinck * files.el (find-file-noselect-1): Fix bug introduced by diff --git a/lisp/gs.el b/lisp/gs.el index 284b18251ec..2c38a55f6df 100644 --- a/lisp/gs.el +++ b/lisp/gs.el @@ -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 @@ the form \"WINDOW-ID PIXMAP-ID\". Value is non-nil if successful." (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)) -- 2.39.5