From 6c4ba923ae4d693ecc83f0a9c6f7617034bed59d Mon Sep 17 00:00:00 2001
From: John Benediktsson <mrjbq7@gmail.com>
Date: Fri, 13 Aug 2010 14:23:05 -0700
Subject: [PATCH] db.sqlite.lib: fixing sqlite-row word.

---
 basis/db/sqlite/lib/lib.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/basis/db/sqlite/lib/lib.factor b/basis/db/sqlite/lib/lib.factor
index 0935fb6c91..2035137eee 100644
--- a/basis/db/sqlite/lib/lib.factor
+++ b/basis/db/sqlite/lib/lib.factor
@@ -165,7 +165,7 @@ ERROR: sqlite-sql-error < sql-error n string ;
     } case ;
 
 : sqlite-row ( handle -- seq )
-    dup sqlite-#columns [ sqlite-column ] with map ;
+    dup sqlite-#columns [ sqlite-column ] with { } map-integers ;
 
 : sqlite-step-has-more-rows? ( prepared -- ? )
     {