--- db/prgsrc/mkdb.pl	2000/10/17 01:31:27	1.2
+++ db/prgsrc/mkdb.pl	2002/01/07 01:31:00	1.13
@@ -23,7 +23,7 @@ The database, user and password are hard
 
 Dmitry Rubinstein
 
-=head1 $Id: mkdb.pl,v 1.2 2000/10/17 01:31:27 boris Exp $
+=head1 $Id: mkdb.pl,v 1.13 2002/01/07 01:31:00 boris Exp $
 
 =cut
 
@@ -65,16 +65,18 @@ print "Connected successfully\n";
 			KEY QuestionIdKey (QuestionId),
 		ParentId 	SMALLINT UNSIGNED NOT NULL,
 			KEY ParentIdKey (ParentId),
-		Number 		TINYINT UNSIGNED NOT NULL,
+		Number 	       SMALLINT UNSIGNED NOT NULL,
 			KEY NumberKey (Number),
-		# Currently there are 2 types of questions: 'Chto? Gde? Kogda?'
-		# and 'Brain ring'.
-		Type 			ENUM('þ','â') NOT NULL,
+		Type 		CHAR(5),
+		        KEY TypeKey (Type),
 		Question 	TEXT,
-		Answer 		TINYTEXT,
-		Authors 		TINYTEXT,
-		Sources 		TINYTEXT,
-		Comments 	TEXT
+		Answer 		TEXT,
+		Authors 	TEXT,
+		Sources 	TEXT,
+		Comments 	TEXT,
+                Rating          TEXT,
+                Topic           TEXT,
+                ProcessedBySearch  INT
 	)")
 	or die "Can't create Questions table: $!\n";
 	
@@ -86,13 +88,15 @@ print "Connected successfully\n";
 		ParentId 	INT UNSIGNED NOT NULL,
 			KEY ParentIdKey (ParentId),
 		Title 		TINYTEXT NOT NULL,
+                Number    SMALLINT UNSIGNED,
 		QuestionsNum INT UNSIGNED DEFAULT 0,
-		Type 			ENUM('ç','ô','þ'),
-		MetaId 		INT UNSIGNED,
+		Type 		ENUM('ç','ô','þ'),
 		Copyright 	TEXT,
 		Info 			TEXT,
 		URL 			TINYTEXT,
 		FileName 	CHAR(25),
+                Editors         TEXT,
+                EnteredBy       TEXT,
 		PlayedAt 	DATE,
 		CreatedAt 	DATE NOT NULL
 	)")