version 1.58, 2006/11/14 18:27:57
|
version 1.60.2.1, 2006/12/11 21:41:40
|
Line 79 sub handler {
|
Line 79 sub handler {
|
|
|
my $onlyown = 0; |
my $onlyown = 0; |
# if called to assign course-based portfolio access control |
# if called to assign course-based portfolio access control |
if ((($env{'form.form'} eq 'portform') && ($env{'user.adv'}))) { |
if ((($env{'form.form'} eq 'portform') && (!$env{'user.adv'}))) { |
$onlyown = 1; |
$onlyown = 1; |
} |
} |
|
|
Line 339 $name_input
|
Line 339 $name_input
|
$roleelement |
$roleelement |
$multelement |
$multelement |
|; |
|; |
|
if ($formname eq 'portform') { |
|
$output .= '<input type="hidden" name="setroles" value="'.$env{'form.setroles'}.'" />'; |
|
} |
} |
} |
if ($sincefilterform) { |
if ($sincefilterform) { |
$output .= $lt{'cac'}.': '.$sincefilterform.'<br />'."\n"; |
$output .= $lt{'cac'}.': '.$sincefilterform.'<br />'."\n"; |
Line 346 $multelement
|
Line 349 $multelement
|
if ($domainselectform) { |
if ($domainselectform) { |
$output .= $lt{'cdo'}.': '.$domainselectform.'<br />'."\n"; |
$output .= $lt{'cdo'}.': '.$domainselectform.'<br />'."\n"; |
} |
} |
if ($typeselectform) { |
# if ($typeselectform) { |
$output .= $lt{'cog'}.': '.$typeselectform.'<br />'."\n"; |
# $output .= $lt{'cog'}.': '.$typeselectform.'<br />'."\n"; |
} |
# } |
if ($instcodeform) { |
if ($instcodeform) { |
$output .= $lt{'cin'}.': '.$instcodeform.'<br />'."\n"; |
$output .= $lt{'cin'}.': '.$instcodeform.'<br />'."\n"; |
} |
} |
Line 406 sub search_courses {
|
Line 409 sub search_courses {
|
undef,undef,$type); |
undef,undef,$type); |
} else { |
} else { |
$r->print('<br />'); |
$r->print('<br />'); |
foreach my $cid (sort(&Apache::loncommon::findallcourses())) { |
my %coursehash = &Apache::loncommon::findallcourses(); |
|
foreach my $cid (sort(keys(%coursehash))) { |
$courses{$cid} = $env{'course.'.$cid.'.description'}; |
$courses{$cid} = $env{'course.'.$cid.'.description'}; |
} |
} |
} |
} |