changeset 65044:96450052ed77

(gud-kill-buffer-hook): Don't kill unrelated process.
author Andreas Schwab <schwab@suse.de>
date Fri, 19 Aug 2005 15:03:28 +0000
parents 0d1f97bd87d9
children bda8af17aa82
files lisp/progmodes/gud.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/gud.el	Fri Aug 19 02:08:56 2005 +0000
+++ b/lisp/progmodes/gud.el	Fri Aug 19 15:03:28 2005 +0000
@@ -2598,7 +2598,7 @@
 (defun gud-kill-buffer-hook ()
   (setq gud-minor-mode-type gud-minor-mode)
   (condition-case nil
-      (kill-process (get-buffer-process gud-comint-buffer))
+      (kill-process (get-buffer-process (current-buffer)))
     (error nil)))
 
 (defun gud-reset ()