diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/uniquify.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/uniquify.el b/lisp/uniquify.el index 2f02236122f..20291d55b82 100644 --- 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))) |