From 36e5f11acd3d22d4ef63055e46dc8897b7a851ba Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Tue, 17 Oct 2006 09:03:49 +0000
Subject: commiting rt 3.4.5 to HEAD

---
 rt/sbin/rt-setup-database.in | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'rt/sbin/rt-setup-database.in')

diff --git a/rt/sbin/rt-setup-database.in b/rt/sbin/rt-setup-database.in
index 49feba845..06c04dcf1 100644
--- a/rt/sbin/rt-setup-database.in
+++ b/rt/sbin/rt-setup-database.in
@@ -130,7 +130,14 @@ if ( $args{'action'} eq 'init' ) {
     unless ($RT::DatabaseType eq 'SQLite') {
 
         $dbh->disconnect;
+
+	if ($RT::DatabaseType eq "Oracle") {
+        $RT::DatabasePassword = $RT::DatabasePassword; #Warning avidance
+        $dbh = DBI->connect( $Handle->DSN, ${RT::DatabaseUser}, ${RT::DatabasePassword} ) || die $DBI::errstr;
+	} else {
+	
         $dbh = DBI->connect( $Handle->DSN, $args{'dba'}, $args{'dba-password'} ) || die $DBI::errstr;
+	}
     }
     print "Now populating database schema.\n";
     insert_schema();
-- 
cgit v1.2.1