From 9725371adf3ac85630e9f1140e175acb384a95e2 Mon Sep 17 00:00:00 2001 From: teranisi Date: Tue, 19 Sep 2000 10:02:18 +0000 Subject: [PATCH] * elmo-imap4.el (elmo-imap4-make-number-set-list): Copy `msg-list' before `sort'. --- elmo/ChangeLog | 5 +++++ elmo/elmo-imap4.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/elmo/ChangeLog b/elmo/ChangeLog index edc780a..2d72bd4 100644 --- a/elmo/ChangeLog +++ b/elmo/ChangeLog @@ -1,3 +1,8 @@ +2000-09-19 Yuuichi Teranishi + + * elmo-imap4.el (elmo-imap4-make-number-set-list): Copy `msg-list' + before `sort'. + 2000-09-18 OKAZAKI Tetsurou * elmo-imap4.el (elmo-imap4-literal-1): Renamed from diff --git a/elmo/elmo-imap4.el b/elmo/elmo-imap4.el index 641bbc7..fe96f92 100644 --- a/elmo/elmo-imap4.el +++ b/elmo/elmo-imap4.el @@ -869,7 +869,7 @@ NUMBER is contained message number in SET-STRING. Every SET-STRING does not contain number of messages longer than CHOP-LENGTH. If CHOP-LENGTH is not specified, message set is not chopped." (let (count cont-list set-list) - (setq msg-list (sort msg-list '<)) + (setq msg-list (sort (copy-sequence msg-list) '<)) (while msg-list (setq cont-list nil) (setq count 0) -- 1.7.10.4