diff --git a/basis/game/input/x11/x11.factor b/basis/game/input/x11/x11.factor
index 29b7249183..612b0047bf 100644
--- a/basis/game/input/x11/x11.factor
+++ b/basis/game/input/x11/x11.factor
@@ -78,7 +78,7 @@ M: linux x>hid-bit-order
     } ; inline
 
 : x-bits>hid-bits ( bit-array -- bit-array )
-    256 <iota> [ 2array ] { } 2map-as [ first ] filter values
+    256 <iota> { } zip-as [ first ] filter values
     x>hid-bit-order [ nth ] curry map
     256 <bit-array> swap [ t swap pick set-nth ] each ;