1 files changed, 1 insertions, 1 deletions

diff --git a/lisp/gud.el b/lisp/gud.el
index 719f2f6b0aa..1e869565cb4 100644
--- a/lisp/gud.el
+++ b/lisp/gud.el
@@ -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.