diff options
| author | Nick Roberts | 2009-08-03 22:07:50 +0000 |
|---|---|---|
| committer | Nick Roberts | 2009-08-03 22:07:50 +0000 |
| commit | 5c0309109e1c467465fbb8618ea05e7b4433b5e2 (patch) | |
| tree | a325e3797ee7448b7682f042a96d32a788b0e2d2 | |
| parent | 39d0296ffb6ff7972a64dc8c23b615ca8099134f (diff) | |
| download | emacs-5c0309109e1c467465fbb8618ea05e7b4433b5e2.tar.gz emacs-5c0309109e1c467465fbb8618ea05e7b4433b5e2.zip | |
(jdb): Set gud-jdb-classpath-string to current
directory if CLASSPATH is not set.
| -rw-r--r-- | lisp/progmodes/gud.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/progmodes/gud.el b/lisp/progmodes/gud.el index f2e3a54459e..c20f5adeefc 100644 --- a/lisp/progmodes/gud.el +++ b/lisp/progmodes/gud.el | |||
| @@ -2269,7 +2269,7 @@ gud, see `gud-mode'." | |||
| 2269 | 2269 | ||
| 2270 | ;; Set gud-jdb-classpath from the CLASSPATH environment variable, | 2270 | ;; Set gud-jdb-classpath from the CLASSPATH environment variable, |
| 2271 | ;; if CLASSPATH is set. | 2271 | ;; if CLASSPATH is set. |
| 2272 | (setq gud-jdb-classpath-string (getenv "CLASSPATH")) | 2272 | (setq gud-jdb-classpath-string (or (getenv "CLASSPATH") ".")) |
| 2273 | (if gud-jdb-classpath-string | 2273 | (if gud-jdb-classpath-string |
| 2274 | (setq gud-jdb-classpath | 2274 | (setq gud-jdb-classpath |
| 2275 | (gud-jdb-parse-classpath-string gud-jdb-classpath-string))) | 2275 | (gud-jdb-parse-classpath-string gud-jdb-classpath-string))) |