(uniquify-rationalize-file-buffer-names): Undo previous change.

diff --git a/lisp/uniquify.el b/lisp/uniquify.el
index 2f02236122f89eedac2fa88fc87a6fde5ae3c804..20291d55b82613d67f871224198cf6d16fd94818 100644 (file)
--- a/lisp/uniquify.el
+++ b/lisp/uniquify.el
@@ -223,9 +223,8 @@ file name elements.  Arguments cause only a subset of buffers to be renamed."
        (setq buffers (cdr buffers))))
     ;; selects buffers whose names may need changing, and others that
     ;; may conflict.
-    (setq fix-list (sort
-                   (sort fix-list 'string-lessp) ;do a quick pre-ordering
-                   'uniquify-fix-item-filename-lessp))
+    (setq fix-list
+         (sort fix-list 'uniquify-fix-item-filename-lessp))
     ;; bringing conflicting names together
     (uniquify-rationalize-a-list fix-list uniquify-min-dir-content)
     (mapcar 'uniquify-fix-item-unrationalized-buffer fix-list)))