1 files changed, 1 insertions, 1 deletions

diff --git a/lisp/files.el b/lisp/files.el
index 90ca58a7511..af8e3d0e889 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -691,7 +691,7 @@ PATH-AND-SUFFIXES is a pair of lists, (DIRECTORIES . SUFFIXES)."
         (when (file-directory-p dir)
           (dolist (file (file-name-all-completions
                          (file-name-nondirectory string) dir))
-            (push (if string-dir (concat string-dir file) file) names)
+            (add-to-list 'names (if string-dir (concat string-dir file) file))
             (when (string-match suffix file)
               (setq file (substring file 0 (match-beginning 0)))
               (push (if string-dir (concat string-dir file) file) names)))))