diff options
| author | Eli Zaretskii | 2018-12-27 18:52:30 +0200 |
|---|---|---|
| committer | Eli Zaretskii | 2018-12-27 18:52:30 +0200 |
| commit | a8576aba8fa45549985566bc8be4921dce508dd9 (patch) | |
| tree | 5f18f022fe595dc8dce56ca635279a44a3721c2b /src | |
| parent | 13dfe15ef4bc63ce66daffdc502a92aa9be44d92 (diff) | |
| download | emacs-a8576aba8fa45549985566bc8be4921dce508dd9.tar.gz emacs-a8576aba8fa45549985566bc8be4921dce508dd9.zip | |
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, | |||
| 236 | #endif | 236 | #endif |
| 237 | ; | 237 | ; |
| 238 | 238 | ||
| 239 | if (!NILP (match)) | ||
| 240 | CHECK_STRING (match); | ||
| 241 | |||
| 239 | /* Loop reading directory entries. */ | 242 | /* Loop reading directory entries. */ |
| 240 | for (struct dirent *dp; (dp = read_dirent (d, directory)); ) | 243 | for (struct dirent *dp; (dp = read_dirent (d, directory)); ) |
| 241 | { | 244 | { |