(uniquify-rationalize-a-list): Beware of side-effects.

This commit is contained in:
Stefan Monnier 2008-04-29 07:11:36 +00:00
parent dc9b613eef
commit 3e9db557b8
2 changed files with 5 additions and 1 deletions

View file

@ -1,3 +1,7 @@
2008-04-29 Stefan Monnier <monnier@iro.umontreal.ca>
* uniquify.el (uniquify-rationalize-a-list): Beware of side-effects.
2008-04-29 Daiki Ueno <ueno@unixuser.org>
* epa.el (epa-key-list-mode-map): Add menu.

View file

@ -329,7 +329,7 @@ in `uniquify-list-buffers-directory-modes', otherwise returns nil."
proposed)
;; Divide fix-list into items with same proposed names and pass them
;; to uniquify-rationalize-conflicting-sublist.
(dolist (item (sort fix-list 'uniquify-item-greaterp))
(dolist (item (sort (copy-sequence fix-list) 'uniquify-item-greaterp))
(setq proposed (uniquify-item-proposed item))
(unless (equal proposed old-proposed)
(uniquify-rationalize-conflicting-sublist conflicting-sublist