Commit ffc50f2a authored by Gerd Moellmann's avatar Gerd Moellmann
Browse files

(gud-jdb-build-source-files-list): Change file-exists-p

to file-directory-p.
parent c21c7262
2000-04-15 Gerd Moellmann <>
* gud.el (gud-jdb-build-source-files-list): Change file-exists-p
to file-directory-p.
2000-04-14 Gerd Moellmann <>
* gud.el (gud-jdb-build-source-files-list): Check that directory
......@@ -1562,7 +1562,7 @@ The file names should be absolute, or relative to the current directory.")
;; given as the regular expression "\\.java$" .
(defun gud-jdb-build-source-files-list (path extn)
(apply 'nconc (mapcar (lambda (d)
(when (files-exists-p d)
(when (files-directory-p d)
(directory-files d t extn nil)) path))))
;; Move point past whitespace.
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment