mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-24 07:20:37 +00:00
Code Issues Releases Activity

(gud-filter): Use `with-current-buffer' instead of save-excursion when

Browse Source 
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.
This commit is contained in:
Miles Bader 2000-08-10 10:54:40 +00:00
parent b59b731fa1
commit f09b5567e6
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lisp/gud.el
View 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