diff options
author | Eli Zaretskii <eliz@gnu.org> | 2018-12-27 18:52:30 +0200 |
---|---|---|
committer | Eli Zaretskii <eliz@gnu.org> | 2018-12-27 18:52:30 +0200 |
commit | a8576aba8fa45549985566bc8be4921dce508dd9 (patch) | |
tree | 5f18f022fe595dc8dce56ca635279a44a3721c2b /src | |
parent | 13dfe15ef4bc63ce66daffdc502a92aa9be44d92 (diff) | |
download | emacs-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.c | 3 |
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)); ) { |