[nongnu] elpa/isl 162d0647be0 351/413: Fix side effect when setting iterator

[ELPA Syncer]

branch: elpa/isl
commit 162d0647be0e992e52a33ec5f0b8fb21cbe23c77
Author: Thierry Volpiatto <thie...@posteo.net>
Commit: Thierry Volpiatto <thie...@posteo.net>

    Fix side effect when setting iterator
---
 isl.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/isl.el b/isl.el
index ae4fc169740..e4c4600fd11 100644
--- a/isl.el
+++ b/isl.el
@@ -822,7 +822,7 @@ Provide accessors `isl-iterator--seq', 
`isl-iterator--element' and
                     ('right 'left))))
     (setf (isl-iterator--direction iterator) new-dir)
     (setf (isl-iterator--seq iterator)
-          (nconc queue (nbutlast rev (length queue))))))
+          (append queue (butlast rev (length queue))))))
 
 (defun isl-iter-next (iterator)
   "Return next elm of ITERATOR."
@@ -831,7 +831,7 @@ Provide accessors `isl-iterator--seq', 
`isl-iterator--element' and
 (defun isl-set-iterator ()
   "Build `isl--iterator' against `isl--item-overlays'."
   (let* ((lst (memql isl--last-overlay isl--item-overlays))
-         (ovs (nconc lst (nbutlast isl--item-overlays (length lst)))))
+         (ovs (append lst (butlast isl--item-overlays (length lst)))))
     (setq isl--iterator (isl-iter-circular ovs))))
 
 (defun isl-delete-overlays ()