Added an error message to SQLForm if we can't find the privileges of the database link

fix: Sometimes the error message for the Calendar Update Feeds is part of the content response.
fix: Serial workflows no longer get held up in the queue
This commit is contained in:
Doug Bell 2007-05-02 20:05:31 +00:00
parent 5ee03110d7
commit fe5bc93a52
5 changed files with 24 additions and 14 deletions

View file

@ -1120,7 +1120,7 @@ sub viewMonth {
my $dt = WebGUI::DateTime->new($self->session, $params->{start});
$dt->truncate( to => "month");
my $start = $dt->toMysql;
my $dtEnd = $dt->clone->add(months => 1)->add(seconds => -1);
my $dtEnd = $dt->clone->add(months => 1);
my $end = $dtEnd->toMysql;
my @events

View file

@ -662,6 +662,14 @@ sub _databaseLinkHasPrivileges {
}
}
# Check if we found any privileges at all
if (!@privileges) {
$self->session->errorHandler->warn(
"SQLForm: Could not find SQL privileges or no privileges on database '$databaseName' for user '".$dbLink->get->{username}."' with database link ID '".$dbLink->getId."' using DSN '".$dbLink->get->{dsn}."'"
);
return 0;
}
# Check if all required privs are present.
return 1 if (isIn('ALL PRIVILEGES', @privileges));