changeset 28599:a348ff133401

(gud-jdb-build-source-files-list): Change file-exists-p to file-directory-p.
author Gerd Moellmann <gerd@gnu.org>
date Sat, 15 Apr 2000 11:32:12 +0000
parents a4353b351702
children f3497be4e865
files lisp/gud.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/gud.el	Fri Apr 14 19:45:47 2000 +0000
+++ b/lisp/gud.el	Sat Apr 15 11:32:12 2000 +0000
@@ -1562,7 +1562,7 @@
 ;; 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.