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

Adding karma.

Browse source
This commit is contained in:
JT Smith 2002-06-19 00:59:01 +00:00
parent 428dd45110
commit 566a62e6af
4 changed files with 27 additions and 10 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lib/WebGUI/Operation/Group.pm
View file

@ -68,6 +68,7 @@ sub www_editGroup {
if (WebGUI::Privilege::isInGroup(3)) {
if ($session{form}{gid} eq "new") {
$group{expireAfter} = 314496000;
$group{karmaThreshold} = 1000000000;
} else {
%group = WebGUI::SQL->quickHash("select * from groups where groupId=$session{form}{gid}");
}
@ -80,6 +81,7 @@ sub www_editGroup {
$f->text("groupName",WebGUI::International::get(84),$group{groupName});
$f->textarea("description",WebGUI::International::get(85),$group{description});
$f->integer("expireAfter",WebGUI::International::get(367),$group{expireAfter});
$f->integer("karmaThreshold",WebGUI::International::get(538),$group{karmaThreshold});
$f->submit;
$output .= $f->print;
unless ($session{form}{gid} eq "new") {
@ -116,7 +118,8 @@ sub www_editGroupSave {
WebGUI::SQL->write("insert into groups (groupId) values ($session{form}{gid})");
}
WebGUI::SQL->write("update groups set groupName=".quote($session{form}{groupName}).",
description=".quote($session{form}{description}).", expireAfter='$session{form}{expireAfter}'
description=".quote($session{form}{description}).", expireAfter='$session{form}{expireAfter}',
karmaThreshold='$session{form}{karmaThreshold}'
where groupId=".$session{form}{gid});
return www_listGroups();
} else {

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

@ -202,6 +202,7 @@ sub www_editUser {
$f->hidden("op","editUserSave");
$f->hidden("uid",$session{form}{uid});
$f->readOnly($session{form}{uid},WebGUI::International::get(378));
$f->readOnly($u->karma,WebGUI::International::get(537));
$f->readOnly(epochToHuman($u->dateCreated,"%z"),WebGUI::International::get(453));
$f->readOnly(epochToHuman($u->lastUpdated,"%z"),WebGUI::International::get(454));
$f->text("username",WebGUI::International::get(50),$u->username);