From 2d84475c47dad00c513976838ca667f1e8c2b662 Mon Sep 17 00:00:00 2001 From: yamaoka Date: Wed, 24 Nov 1999 13:37:19 +0000 Subject: [PATCH] (gnus-article-setup-highlight-words): Use `copy-sequence' instead of `copy-list'. --- lisp/gnus-art.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el index b904596..5415f97 100644 --- a/lisp/gnus-art.el +++ b/lisp/gnus-art.el @@ -2272,12 +2272,12 @@ This format is defined by the `gnus-article-time-format' variable." (while (setq elem (pop alist)) (when (and name (string-match (car elem) name)) (setq alist nil - highlight (copy-list (cdr elem))))) + highlight (copy-sequence (cdr elem))))) highlight) - (copy-list highlight-words) + (copy-sequence highlight-words) (if gnus-newsgroup-name - (copy-list (gnus-group-find-parameter - gnus-newsgroup-name 'highlight-words t))) + (copy-sequence (gnus-group-find-parameter + gnus-newsgroup-name 'highlight-words t))) gnus-emphasis-alist))))) (defvar gnus-summary-article-menu) -- 1.7.10.4