changeset 104141:d37c3737e41f

(jdb): Set gud-jdb-classpath-string to current directory if CLASSPATH is not set.
author Nick Roberts <nickrob@snap.net.nz>
date Mon, 03 Aug 2009 22:07:50 +0000
parents a01de4859d65
children 488fbd6258f7
files lisp/progmodes/gud.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/progmodes/gud.el	Mon Aug 03 22:07:23 2009 +0000
+++ b/lisp/progmodes/gud.el	Mon Aug 03 22:07:50 2009 +0000
@@ -2269,7 +2269,7 @@
 
   ;; Set gud-jdb-classpath from the CLASSPATH environment variable,
   ;; if CLASSPATH is set.
-  (setq gud-jdb-classpath-string (getenv "CLASSPATH"))
+  (setq gud-jdb-classpath-string (or (getenv "CLASSPATH") "."))
   (if gud-jdb-classpath-string
       (setq gud-jdb-classpath
 	    (gud-jdb-parse-classpath-string gud-jdb-classpath-string)))