diff options
author | ivan <ivan> | 2004-11-11 12:13:50 +0000 |
---|---|---|
committer | ivan <ivan> | 2004-11-11 12:13:50 +0000 |
commit | c582e92888b4a5553e1b4e5214cf35217e4a0cf0 (patch) | |
tree | 3fe7cd7bf22bd356b478f0de0dd8f0b140fcee23 /rt/sbin | |
parent | 289340780927b5bac2c7604d7317c3063c6dd8cc (diff) |
import rt 3.0.12
Diffstat (limited to 'rt/sbin')
-rw-r--r-- | rt/sbin/rt-setup-database.in | 2 | ||||
-rw-r--r-- | rt/sbin/rt-test-dependencies.in | 19 |
2 files changed, 13 insertions, 8 deletions
diff --git a/rt/sbin/rt-setup-database.in b/rt/sbin/rt-setup-database.in index 9e990e5b8..a7ee86d5d 100644 --- a/rt/sbin/rt-setup-database.in +++ b/rt/sbin/rt-setup-database.in @@ -450,6 +450,8 @@ sub insert_data { $princ->LoadUserDefinedGroup( $item->{'GroupId'} ); } elsif ($item->{'GroupDomain'} eq 'SystemInternal') { $princ->LoadSystemInternalGroup( $item->{'GroupType'} ); + } elsif ($item->{'GroupDomain'} eq 'RT::System-Role') { + $princ->LoadSystemRoleGroup( $item->{'GroupType'} ); } elsif ($item->{'GroupDomain'} eq 'RT::Queue-Role' && $item->{'Queue'}) { $princ->LoadQueueRoleGroup( Type => $item->{'GroupType'}, diff --git a/rt/sbin/rt-test-dependencies.in b/rt/sbin/rt-test-dependencies.in index 7a1508010..b4cb8c044 100644 --- a/rt/sbin/rt-test-dependencies.in +++ b/rt/sbin/rt-test-dependencies.in @@ -99,7 +99,7 @@ Digest::MD5 2.27 DBI 1.37 Test::Inline Class::ReturnValue 0.40 -DBIx::SearchBuilder 0.97 +DBIx::SearchBuilder 1.01 Text::Template File::Spec 0.8 HTML::Entities @@ -191,16 +191,19 @@ DBD::Pg . print "perl:\n"; -print "\t5.8.0"; -eval {require 5.008}; +print "\t5.8.3"; +eval {require 5.008003}; if ($@) { -print "...missing.\n"; - eval {require 5.006001}; +print "...MISSING.\n"; + eval {require 5.008000}; if ($@) { - print " RT is known to be non-functional on versions of perl older than 5.6.1. Please upgrade to 5.8.0 or newer"; + print "\nRT is known to be non-functional on versions of perl older than 5.8.3.\nPlease upgrade to 5.8.3 or newer\n\n"; die; - } else { - print " RT is not supported on perl 5.6.1\n"; + } + + eval {require 5.008003}; + if ($@) { + print "\nRT is known to be non-functional on versions of perl older than 5.8.3.\nPlease upgrade to 5.8.3 or newer\n\n"; } } else { print "...found\n"; |