From 92d54db84f792a70054ac43c65ccf613397ed30d Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Mon, 21 Apr 2008 17:02:12 -0500
Subject: [PATCH] add primary key to modifiers slot in sqlite table

---
 extra/db/sqlite/sqlite.factor | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/extra/db/sqlite/sqlite.factor b/extra/db/sqlite/sqlite.factor
index 2175b69f35..9ec8892add 100755
--- a/extra/db/sqlite/sqlite.factor
+++ b/extra/db/sqlite/sqlite.factor
@@ -163,9 +163,9 @@ M: sqlite-db bind% ( spec -- )
 
 M: sqlite-db persistent-table ( -- assoc )
     H{
-        { +native-id+ { "integer primary key" "integer primary key" f } }
+        { +native-id+ { "integer primary key" "integer primary key" "primary key" } }
         { +assigned-id+ { f f "primary key" } }
-        { +random-id+ { "integer primary key" "integer primary key" f } }
+        { +random-id+ { "integer primary key" "integer primary key" "primary key" } }
         { INTEGER { "integer" "integer" "primary key" } }
         { BIG-INTEGER { "bigint" "bigint" } }
         { SIGNED-BIG-INTEGER { "bigint" "bigint" } }