(file_name_completion): Pass dp->d_name to

Fstring_match, not elt, which is alays nil here.

diff --git a/src/ChangeLog b/src/ChangeLog
index 599d997b2ef841221df34dbd92237e9010b7f574..77f7b87175b85dbc00cb04640898d183d22c5f11 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,8 @@
+2001-07-12  Eli Zaretskii  <eliz@is.elta.co.il>
+
+       * dired.c (file_name_completion): Pass dp->d_name to
+       Fstring_match, not elt, which is always nil here.
+
 2001-07-12  Gerd Moellmann  <gerd@gnu.org>
 
        * xselect.c (x_decline_selection_request): Handle errors

diff --git a/src/dired.c b/src/dired.c
index 9deb44d39141cde5fe182b9df7399f4659abb720..191509675607d52d46a96d0be158598505d4c8ae 100644 (file)
--- a/src/dired.c
+++ b/src/dired.c
@@ -595,7 +595,8 @@ file_name_completion (file, dirname, all_flag, ver_flag)
              for (regexps = Vcompletion_regexp_list; CONSP (regexps);
                   regexps = XCDR (regexps))
                {
-                 tem = Fstring_match (XCAR (regexps), elt, zero);
+                 tem = Fstring_match (XCAR (regexps),
+                                      make_string (dp->d_name, len), zero);
                  if (NILP (tem))
                    break;
                }