default values in blacklist table

git-svn-id: svn://svn.r-forge.r-project.org/svnroot/cran2deb@251 edb9625f-4e0d-4859-8d74-9fd3b1da38cb

diff --git a/trunk/R/db.R b/trunk/R/db.R
index 2ebd75696bdeafba6af9adc59bed08bb20e1de34..a1c47cb118bbf8b1f75118401977037979a99c21 100644 (file)
--- a/trunk/R/db.R
+++ b/trunk/R/db.R
@@ -70,11 +70,11 @@ db_start <- function() {
     if (!dbExistsTable(con,'blacklist_packages')) {
         dbGetQuery(con,paste('CREATE TABLE blacklist_packages ('
                   ,' package TEXT PRIMARY KEY NOT NULL '
-                  ,',nonfree INTEGER NOT NULL '
-                  ,',obsolete INTEGER NOT NULL '
-                  ,',broken_dependency INTEGER NOT NULL '
-                  ,',unsatisfied_dependency INTEGER NOT NULL '
-                  ,',breaks_cran2deb INTEGER NOT NULL '
+                  ,',nonfree INTEGER NOT NULL DEFAULT 0'
+                  ,',obsolete INTEGER NOT NULL DEFAULT 0'
+                  ,',broken_dependency INTEGER NOT NULL DEFAULT 0'
+                  ,',unsatisfied_dependency INTEGER NOT NULL DEFAULT 0'
+                  ,',breaks_cran2deb INTEGER NOT NULL DEFAULT 0'
                   ,',explanation TEXT NOT NULL '
                   ,')'))
     }