12 my $db_user = RT->Config->Get('DatabaseUser');
15 = ( $dbh->{pg_server_version} >= 80200 )
16 ? "USAGE, SELECT, UPDATE"
19 foreach my $table (@tables) {
20 # Tables are upper-case, sequences are lowercase in @tables
21 if ( $table =~ /^[a-z]/ ) {
22 push @acls, "GRANT $sequence_right ON $table TO \"$db_user\";"
25 push @acls, "GRANT SELECT, INSERT, UPDATE, DELETE ON $table TO \"$db_user\";"