diff --git a/extra/sequences/extras/extras.factor b/extra/sequences/extras/extras.factor
index 2e32021846..92eb6ec7fc 100644
--- 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