(gud-filter): Remove unneeded progn.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c777d056d9813d816617f47a2292d64c58c1c9c3..97b25eb35a0a88dfb7906593eaf0462520b8d112 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2005-06-30  Andreas Schwab  <schwab@suse.de>
+
+       * progmodes/gud.el (gud-filter): Remove unneeded progn.
+
 2005-06-30  Glenn Morris  <gmorris@ast.cam.ac.uk>
 
        * progmodes/sh-script.el (sh-get-kw): `&' also separates words.

diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el
index dc7e64e6e354ecdb9e0c48eb710ac510bb271225..fd8bfeb5d725fbe56b6e4954c7e768309e07ef61 100644 (file)
--- a/lisp/progmodes/gud.el
+++ b/lisp/progmodes/gud.el
@@ -4,7 +4,7 @@
 ;; Maintainer: FSF
 ;; Keywords: unix, tools
 
-;; Copyright (C) 1992,93,94,95,96,1998,2000,02,03,04 Free Software Foundation, Inc.
+;; Copyright (C) 1992,93,94,95,96,1998,2000,02,03,04,05 Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
 
@@ -2534,9 +2534,8 @@ It is saved for when this flag is not set.")
            ;; This must be outside of the save-excursion
            ;; in case the source file is our current buffer.
            (if process-window
-               (progn
                (with-selected-window process-window
-                 (gud-display-frame)))
+                 (gud-display-frame))
              ;; We have to be in the proper buffer, (process-buffer proc),
              ;; but not in a save-excursion, because that would restore point.
              (with-current-buffer (process-buffer proc)