summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorEli Zaretskii <eliz@gnu.org>2018-12-27 18:52:30 +0200
committerEli Zaretskii <eliz@gnu.org>2018-12-27 18:52:30 +0200
commita8576aba8fa45549985566bc8be4921dce508dd9 (patch)
tree5f18f022fe595dc8dce56ca635279a44a3721c2b /src
parent13dfe15ef4bc63ce66daffdc502a92aa9be44d92 (diff)
downloademacs-a8576aba8fa45549985566bc8be4921dce508dd9.tar.gz
Avoid assertion violation in directory-files
* src/dired.c (directory_files_internal): Make sure MATCH is either nil or a string. (Bug#33889)
Diffstat (limited to 'src')
-rw-r--r--src/dired.c3
1 files changed, 3 insertions, 0 deletions
diff --git a/src/dired.c b/src/dired.c
index b81e35384ea..3f5c93b5732 100644
--- a/src/dired.c
+++ b/src/dired.c
@@ -236,6 +236,9 @@ directory_files_internal (Lisp_Object directory, Lisp_Object full,
#endif
;
+ if (!NILP (match))
+ CHECK_STRING (match);
+
/* Loop reading directory entries. */
for (struct dirent *dp; (dp = read_dirent (d, directory)); )
{