diff options
| author | Richard M. Stallman | 2006-12-17 20:11:16 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 2006-12-17 20:11:16 +0000 |
| commit | aaf469fc3d293981e8ed3d50f558cb31b1614c97 (patch) | |
| tree | 6c4099e767aab94b421f616673ac4908c278cce3 /src | |
| parent | abfb193276ec1a414afdfa9dd129933bf8d8c9f6 (diff) | |
| download | emacs-aaf469fc3d293981e8ed3d50f558cb31b1614c97.tar.gz emacs-aaf469fc3d293981e8ed3d50f558cb31b1614c97.zip | |
(Fread_file_name_internal): Pass Vread_file_name_predicate
to Ffile_name_completion.
Diffstat (limited to 'src')
| -rw-r--r-- | src/fileio.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/fileio.c b/src/fileio.c index 50c5a40e6b2..3392a47be09 100644 --- a/src/fileio.c +++ b/src/fileio.c | |||
| @@ -6159,7 +6159,7 @@ DEFUN ("read-file-name-internal", Fread_file_name_internal, Sread_file_name_inte | |||
| 6159 | if (NILP (action)) | 6159 | if (NILP (action)) |
| 6160 | { | 6160 | { |
| 6161 | specdir = Ffile_name_directory (string); | 6161 | specdir = Ffile_name_directory (string); |
| 6162 | val = Ffile_name_completion (name, realdir); | 6162 | val = Ffile_name_completion (name, realdir, Vread_file_name_predicate); |
| 6163 | UNGCPRO; | 6163 | UNGCPRO; |
| 6164 | if (!STRINGP (val)) | 6164 | if (!STRINGP (val)) |
| 6165 | { | 6165 | { |