sequences: change replace-slice to return type of seq again.

diff --git a/core/sequences/sequences.factor b/core/sequences/sequences.factor
index 39904abd2a9e2642e8f1c4d612fda2dd77661035..95cd2a2bc3d64dbb553cb9e66591aa570a79c03a 100644 (file)
--- a/core/sequences/sequences.factor
+++ b/core/sequences/sequences.factor
@@ -844,7 +844,7 @@ PRIVATE>
     [ swap head-slice ] [ swap tail-slice ] bi-curry bi* ; inline
 
 : replace-slice ( new from to seq -- seq' )
-    snip-slice surround ;
+    snip-slice swapd 3append ;
 
 : remove-nth ( n seq -- seq' )
     [ [ dup 1 + ] dip snip-slice ] keep append-as ;