# HG changeset patch
# User Miles Bader <miles@gnu.org>
# Date 965904880 0
# Node ID 48d749ce74e4755504de9abf4f925c928e9c135f
# Parent  7960e7b84348779391d2d004b7f6212e3ed48369
(gud-filter): Use `with-current-buffer' instead of save-excursion when
inserting the output, so that point gets updated correctly; the old
method relied on a rather dodgy side-effect of comint-output-filter to
avoid the effect of save-excursion.

diff -r 7960e7b84348 -r 48d749ce74e4 lisp/gud.el
--- a/lisp/gud.el	Thu Aug 10 10:52:29 2000 +0000
+++ b/lisp/gud.el	Thu Aug 10 10:54:40 2000 +0000
@@ -4,7 +4,7 @@
 ;; Maintainer: FSF
 ;; Keywords: unix, tools
 
-;; Copyright (C) 1992, 93, 94, 95, 96, 1998 Free Software Foundation, Inc.
+;; Copyright (C) 1992, 93, 94, 95, 96, 1998, 2000 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
 
@@ -2181,8 +2181,8 @@
 	    (if gud-filter-pending-text
 		(setq string (concat gud-filter-pending-text string)
 		      gud-filter-pending-text nil))
-	    (save-excursion
-	      (set-buffer (process-buffer proc))
+
+	    (with-current-buffer (process-buffer proc)
 	      ;; If we have been so requested, delete the debugger prompt.
 	      (if (marker-buffer gud-delete-prompt-marker)
 		  (progn