projects / chise / ids.git / commitdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: 2c39662)
(ids-insert-chars-including-components): Must use `copy-tree' for the
authortomo <tomo>
Fri, 24 Feb 2006 11:02:11 +0000 (11:02 +0000)
committertomo <tomo>
Fri, 24 Feb 2006 11:02:11 +0000 (11:02 +0000)
result of `ideographic-products-find'.

ids-find.el patch | blob | history

diff --git a/ids-find.el b/ids-find.el
index 0e0e7be..c3c6cbc 100644 (file)
--- a/ids-find.el
+++ b/ids-find.el
@@ -280,7 +280,7 @@
   (unless level
     (setq level 0))
   (let (is dis i as bs)
-    (dolist (c (sort (ideographic-products-find components)
+    (dolist (c (sort (copy-tree (ideographic-products-find components))
                     (lambda (a b)
                       (if (setq as (char-total-strokes a))
                           (if (setq bs (char-total-strokes b))