X-Git-Url: http://andersk.mit.edu/gitweb/sql-web.git/blobdiff_plain/377015e0d78cce3bd62af0357fcb951fe506efb4..2d13bff71f8330dcfb2fa37b2b251f5274316a15:/main.php

diff --git a/main.php b/main.php
index 775fbda..8d60aec 100644
--- a/main.php
+++ b/main.php
@@ -2,19 +2,27 @@
 
 require_once('mitsql.cfg.php');
 require_once('mitsql.lib.php');
+require_once('proc.lib.php');
 
 if (!isLoggedIn()) redirect('index');
 
+$err1 = $msg1 = array();
+
 $User = new User($Login->getUserID());
 
 if (isPost()) {
 	if (isset($i_newdb)) {
-		if ($User->addDB($User->getUsername().DELIMETER.$i_newdb)==false) {
-			$err[] = mysql_error();
-		}
+		list($msg1, $err1) = proc::newdb($User, $i_newdb);
+	}
+	if (isset($i_drop)) {
+		list($msg1, $err1) = proc::drop($User, $i_drop);
 	}
+	if (!count($err1))
+		$User->refresh();
 }
 
+$myDBs = $User->getDBList();
+
 include 'tpl/main.php';
 
 ?>