Fixes #795. But #783 is breaking. Addresses #783.

git-svn-id: file:///svn/tokudb@3861 c7de825b-a66e-492c-adef-691d508d4ae1

src/tests/test_db_current_clobbers_db.c

@@ -21,7 +21,7 @@ int main (int UU(argc), char UU(*argv[])) {
     system("rm -rf " ENVDIR);
     r=mkdir(ENVDIR, 0777);    CKERR(r);
     r=db_env_create(&env, 0); CKERR(r);
-    r=env->open(env, ENVDIR, DB_PRIVATE|DB_CREATE, 0777); CKERR(r);
+    r=env->open(env, ENVDIR, DB_PRIVATE|DB_INIT_MPOOL|DB_CREATE, 0777); CKERR(r);
     r=db_create(&db, env, 0); CKERR(r);
     r = db->open(db, null_txn, "foo.db", "main", DB_BTREE, DB_CREATE, 0666); CKERR(r);
     DBC *cursor;