--- a/util/sql.lua	Mon Oct 28 23:18:54 2013 +0100
+++ b/util/sql.lua	Mon Oct 28 23:19:47 2013 +0100
@@ -262,6 +262,7 @@
 	for i,col in ipairs(table.c) do
 		sql = sql.."`"..col.name.."` "..col.type;
 		if col.nullable == false then sql = sql.." NOT NULL"; end
+		if col.primary_key == true then sql = sql.." PRIMARY KEY"; end
 		if i ~= #table.c then sql = sql..", "; end
 	end
 	sql = sql.. ");"