Commit 90757bb3 authored by Gerd Moellmann's avatar Gerd Moellmann
Browse files

(gud-jdb-build-source-files-list): Check that directory

exists before calling directory-files.
parent c1355e1f
......@@ -1561,7 +1561,9 @@ The file names should be absolute, or relative to the current directory.")
;; which to search for files with extension EXTN. Normally EXTN is
;; given as the regular expression "\\.java$" .
(defun gud-jdb-build-source-files-list (path extn)
(apply 'nconc (mapcar (lambda (d) (directory-files d t extn nil)) path)))
(apply 'nconc (mapcar (lambda (d)
(when (files-exists-p d)
(directory-files d t extn nil)) path))))
;; Move point past whitespace.
(defun gud-jdb-skip-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