[Emacs-diffs] Changes to emacs/lisp/files.el,v

[Richard M. Stallman]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Richard M. Stallman <rms>       06/07/12 15:57:07

Index: files.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/files.el,v
retrieving revision 1.851
retrieving revision 1.852
diff -u -b -r1.851 -r1.852
--- files.el    6 Jul 2006 13:55:49 -0000       1.851
+++ files.el    12 Jul 2006 15:57:07 -0000      1.852
@@ -691,7 +691,7 @@
        (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)))))