sequences.extras: use either?.

2014-01-05 20:28:34 -08:00 · 2014-01-05 20:28:34 -08:00 · 325d1bac2a
parent abd069c1ad
commit 325d1bac2a
1 changed files with 1 additions and 1 deletions
--- a/extra/sequences/extras/extras.factor
+++ b/extra/sequences/extras/extras.factor
@ -282,7 +282,7 @@ PRIVATE>

 : ?trim ( seq quot: ( elt -- ? ) -- seq/newseq )
    over empty? [ drop ] [
-        over [ first-unsafe ] [ last-unsafe ] bi pick bi@ or
+        over [ first-unsafe ] [ last-unsafe ] bi pick either?
        [ trim ] [ drop ] if
    ] if ; inline