diff --git a/extra/mongodb/driver/driver.factor b/extra/mongodb/driver/driver.factor
index a972d1c380..967d4f11c5 100644
--- a/extra/mongodb/driver/driver.factor
+++ b/extra/mongodb/driver/driver.factor
@@ -178,7 +178,7 @@ M: mdb-query-msg skip
 GENERIC# sort 1 ( mdb-query-msg sort-quot -- mdb-query-msg )
 
 M: mdb-query-msg sort
-    output>array >>orderby ; inline
+    output>array [ 1array >hashtable ] map >>orderby ; inline
 
 : key-spec ( spec-quot -- spec-assoc )
     output>array >hashtable ; inline