version 1.295.2.32, 2010/04/14 19:46:56
|
version 1.295.2.33, 2010/04/23 17:51:42
|
Line 2385 sub update_user_data {
|
Line 2385 sub update_user_data {
|
} |
} |
} |
} |
foreach my $item (@requestcourses) { |
foreach my $item (@requestcourses) { |
$newcustom{$item} = $env{'form.crsreq_'.$item}; |
if ($env{'form.custom'.$item} == 1) { |
if ($env{'form.crsreq_'.$item} eq 'autolimit') { |
$newcustom{$item} = $env{'form.crsreq_'.$item}; |
$newcustom{$item} .= '='; |
if ($env{'form.crsreq_'.$item} eq 'autolimit') { |
unless ($env{'form.crsreq_'.$item.'_limit'} =~ /\D/) { |
$newcustom{$item} .= '='; |
$newcustom{$item} .= $env{'form.crsreq_'.$item.'_limit'}; |
unless ($env{'form.crsreq_'.$item.'_limit'} =~ /\D/) { |
|
$newcustom{$item} .= $env{'form.crsreq_'.$item.'_limit'}; |
|
} |
} |
} |
|
$changed{$item} = &tool_admin($item,$newcustom{$item}, |
|
\%changeHash,'requestcourses'); |
} |
} |
$changed{$item} = &tool_admin($item,$newcustom{$item}, |
|
\%changeHash,'requestcourses'); |
|
} |
} |
} |
} |
if ($canmodify_status{'inststatus'}) { |
if ($canmodify_status{'inststatus'}) { |