]> git.eshelyaron.com Git - emacs.git/commitdiff
(gud-filter): Use `with-current-buffer' instead of save-excursion when
authorMiles Bader <miles@gnu.org>
Thu, 10 Aug 2000 10:54:40 +0000 (10:54 +0000)
committerMiles Bader <miles@gnu.org>
Thu, 10 Aug 2000 10:54:40 +0000 (10:54 +0000)
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.

lisp/gud.el

index 598aa036d1e49d98d04e707281fa08d1072c3310..688346f195346280485627ece4f56fba003f31a1 100644 (file)
@@ -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 @@ It is saved for when this flag is not set.")
            (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