]> code.delx.au - gnu-emacs/blobdiff - lisp/gud.el
(gud-jdb-build-source-files-list): Fix typo.
[gnu-emacs] / lisp / gud.el
index 719f2f6b0aae5bfdf650998188b57f906052c9ad..1e869565cb415db0c2d55c53c291682518365f0d 100644 (file)
@@ -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-directory-p d)
+                         (when (file-directory-p d)
                            (directory-files d t extn nil)) path))))
 
 ;; Move point past whitespace.