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

Fixes from the 5.2.5 bugfix cycle.

Browse source
This commit is contained in:
JT Smith 2003-04-18 22:30:57 +00:00
parent 6949f42a2c
commit afbcfc7d56
17 changed files with 2422 additions and 36 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -90,6 +90,7 @@ sub _validateProfileData {
while (%field = $a->hash) {
if ($field{dataType} eq "date") {
$data{$field{fieldName}} = WebGUI::DateTime::setToEpoch($session{form}{$field{fieldName}});
$session{form}{$field{fieldName}} = $data{$field{fieldName}};
} elsif (exists $session{form}{$field{fieldName}}) {
$data{$field{fieldName}} = $session{form}{$field{fieldName}};
}
@ -582,6 +583,9 @@ sub www_viewProfile {
} else {
$value = $u->profileField($data{fieldName});
}
if ($data{dataType} eq "date") {
$value = WebGUI::DateTime::epochToHuman($value,"%z");
}
unless ($data{fieldName} eq "email" and $u->profileField("publicEmail") < 1) {
$output .= '<tr><td class="tableHeader">'.$label.'</td><td class="tableData">'.$value.'</td></tr>';
}

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

@ -130,7 +130,11 @@ sub www_editGroup {
-label=>WebGUI::International::get(863)
);
if ($session{setting}{useKarma}) {
$f->integer("karmaThreshold",WebGUI::International::get(538),$g->karmaThreshold);
$f->integer(
-name=>"karmaThreshold",
-label=>WebGUI::International::get(538),
-value=>$g->karmaThreshold
);
}
$f->textarea(
-name=>"ipFilter",

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

@ -246,7 +246,6 @@ sub www_editPage {
} else {
%page = %{$session{page}};
($childCount) = WebGUI::SQL->quickArray("select count(*) from page where parentId=$page{pageId}");
$page{hideFromNavigation} = 0;
}
$page{endDate} = (addToDate(time(),10)) if ($page{endDate} < 0);
$output = helpIcon(1);

8
lib/WebGUI/Operation/ProfileSettings.pm
View file

@ -235,6 +235,14 @@ sub www_editProfileFieldSave {
$session{form}{fieldLabel} = 'Unamed' if ($session{form}{fieldLabel} eq "" || $session{form}{fieldLabel} eq "''");
$test = eval($session{form}{fieldLabel});
$session{form}{fieldLabel} = "'".$session{form}{fieldLabel}."'" if ($test eq "");
if ($session{form}{dataDefault} ne "") {
unless ($session{form}{dataDefault} =~ /^\[/) {
$session{form}{dataDefault} = "[".$session{form}{dataDefault};
}
unless ($session{form}{dataDefault} =~ /\]$/) {
$session{form}{dataDefault} .= "]";
}
}
if ($session{form}{new}) {
($fieldName) = WebGUI::SQL->quickArray("select count(*) from userProfileField
where fieldName=".quote($session{form}{fid}));