oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Postgres fixes.

Browse source
This commit is contained in:
JT Smith 2002-12-13 05:32:27 +00:00
parent 9d52dc7576
commit a8ad826c76
4 changed files with 4 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lib/WebGUI/Operation/Account.pm
View file

@ -399,7 +399,7 @@ sub www_login {
_logLogin($uid,"success");
return "";
} else {
_logLogin($uid, $success);
_logLogin($uid, "failure");
WebGUI::ErrorHandler::security("login to account ".$session{form}{username}." with invalid information.");
return "<h1>".WebGUI::International::get(70)."</h1>".$success.www_displayLogin();
}

1
lib/WebGUI/Operation/Page.pm
View file

@ -208,6 +208,7 @@ sub www_deletePageConfirm {
sub www_editPage {
my ($f, $endDate, $output, $subtext, $childCount, %hash, %page);
tie %hash, "Tie::IxHash";
tie %page, "Tie::CPHash";
if (WebGUI::Privilege::canEditPage($session{form}{npp})) {
$f = WebGUI::HTMLForm->new;
if ($session{form}{npp} ne "") {

2
lib/WebGUI/Wobject/Survey.pm
View file

@ -690,7 +690,7 @@ sub www_viewGradebook {
$output = '<h1>'.WebGUI::International::get(71,$namespace).'</h1>';
$p = WebGUI::Paginator->new('func=viewGradebook&wid='.$_[0]->get("wobjectId"));
$p->setDataByQuery("select userId,username,ipAddress from Survey_response
group by userId,ipAddress order by username,ipAddress");
group by userId,username,ipAddress order by username,ipAddress");
$users = $p->getPageData;
my ($questionCount) = WebGUI::SQL->quickArray("select count(*) from Survey_question
where Survey_id=".$_[0]->get("Survey_id"));