From: Richard M. Stallman <rms@gnu.org>
Date: Sun, 24 May 1998 17:16:20 +0000 (+0000)
Subject: (gud-jdb-class-source-alist): defvar moved up.
X-Git-Tag: emacs-20.3~862
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=500f12df892637116a998dfd7deda9a4e1ed09ae;p=emacs.git

(gud-jdb-class-source-alist): defvar moved up.
(gud-jdb-analysis-buffer): Likewise.
---

diff --git a/lisp/gud.el b/lisp/gud.el
index 66cd552c7a8..9ccd06b4639 100644
--- a/lisp/gud.el
+++ b/lisp/gud.el
@@ -1494,6 +1494,13 @@ The file names should be absolute, or relative to the current directory.")
 ;; List of the java source files for this debugging session.
 (defvar gud-jdb-source-files nil)
 
+;; Association list of fully qualified class names (package + class name) and
+;; their source files.
+(defvar gud-jdb-class-source-alist nil)
+
+;; This is used to hold a source file during analysis.
+(defvar gud-jdb-analysis-buffer nil)
+
 ;; Return a list of java source files.  PATH gives the directories in
 ;; which to search for files with extension EXTN.  Normally EXTN is
 ;; given as the regular expression "\\.java$" .
@@ -1695,13 +1702,6 @@ The file names should be absolute, or relative to the current directory.")
      (cons c file))
    (gud-jdb-analyze-source gud-jdb-analysis-buffer file)))
 
-;; Association list of fully qualified class names (package + class name) and
-;; their source files.
-(defvar gud-jdb-class-source-alist nil)
-
-;; This is used to hold a source file during analysis.
-(defvar gud-jdb-analysis-buffer nil)
-
 ;; Return an alist of fully qualified classes and the source files
 ;; holding their definitions.  SOURCES holds a list of all the source
 ;; files to examine.