monnier pushed a commit to branch master
in repository elpa.
commit 48ae1207243bb6006d3ddce82659b2b2608818c5
Author: Teemu Likonen <[email protected]>
Date: Fri Mar 2 08:25:51 2012 +0200
Use COPY-SEQUENCE instead of COPY-TREE
It was always unnecessary to copy the whole tree before SORT function.
---
wcheck-mode.el | 2 +-
1 files changed, 1 insertions(+), 1 deletions(-)
diff --git a/wcheck-mode.el b/wcheck-mode.el
index 690fb31..1904848 100644
--- a/wcheck-mode.el
+++ b/wcheck-mode.el
@@ -2080,7 +2080,7 @@ ALIST is a list of (A . B) items in which A and B are
integers.
Each item denote a buffer position range from A to B. This
function returns a new list which has items in increasing order
according to A's and all overlapping A B ranges are combined."
- (let ((alist (sort (copy-tree alist)
+ (let ((alist (sort (copy-sequence alist)
(lambda (a b)
(< (car a) (car b)))))
final previous)