version 1.97.2.2, 2009/09/07 13:49:49
|
version 1.98, 2009/08/28 22:47:07
|
Line 2230 END
|
Line 2230 END
|
END |
END |
if ($actionselect) { |
if ($actionselect) { |
$output .= <<"END"; |
$output .= <<"END"; |
<div class="LC_left_float"><fieldset><legend><b>$lt{'ac'}</b></legend> |
<div class="LC_left_float"><fieldset><legend>$lt{'ac'}</legend> |
$actionselect |
$actionselect |
<br/><br /><input type="button" value="$lt{'ca'}" onclick="javascript:checkAll(document.$formname.actionlist)" /> |
<br/><br /><input type="button" value="$lt{'ca'}" onclick="javascript:checkAll(document.$formname.actionlist)" /> |
<input type="button" value="$lt{'ua'}" onclick="javascript:uncheckAll(document.$formname.actionlist)" /><br /><input type="button" value="$lt{'pr'}" onclick="javascript:verify_action('actionlist')" /></fieldset></div> |
<input type="button" value="$lt{'ua'}" onclick="javascript:uncheckAll(document.$formname.actionlist)" /><br /><input type="button" value="$lt{'pr'}" onclick="javascript:verify_action('actionlist')" /></fieldset></div> |
Line 2275 END
|
Line 2275 END
|
} |
} |
} |
} |
} |
} |
$output .= '<div class="LC_left_float"><fieldset><legend><b>'.$lt{'link'}.'</b></legend>'. |
$output .= '<div class="LC_left_float"><fieldset><legend>'.$lt{'link'}.'</legend>'. |
'<table><tr>'; |
'<table><tr>'; |
my @linkdests = ('aboutme'); |
my @linkdests = ('aboutme'); |
if ($permission->{'cusr'}) { |
if ($permission->{'cusr'}) { |
Line 2286 END
|
Line 2286 END
|
$env{'request.course.sec'})) { |
$env{'request.course.sec'})) { |
push(@linkdests,'track'); |
push(@linkdests,'track'); |
} |
} |
|
|
$output .= '<td>'; |
$output .= '<td>'; |
my $usernamelink = $env{'form.usernamelink'}; |
my $usernamelink = $env{'form.usernamelink'}; |
if ($usernamelink eq '') { |
if ($usernamelink eq '') { |
Line 4845 sub roles_by_context {
|
Line 4846 sub roles_by_context {
|
my ($context,$custom) = @_; |
my ($context,$custom) = @_; |
my @allroles; |
my @allroles; |
if ($context eq 'course') { |
if ($context eq 'course') { |
@allroles = ('st'); |
@allroles = ('st','ad','ta','ep','in','cc'); |
if ($env{'request.role'} =~ m{^dc\./}) { |
|
push(@allroles,'ad'); |
|
} |
|
push(@allroles,('ta','ep','in','cc')); |
|
if ($custom) { |
if ($custom) { |
push(@allroles,'cr'); |
push(@allroles,'cr'); |
} |
} |
} elsif ($context eq 'author') { |
} elsif ($context eq 'author') { |
@allroles = ('ca','aa'); |
@allroles = ('ca','aa'); |
} elsif ($context eq 'domain') { |
} elsif ($context eq 'domain') { |
@allroles = ('li','ad','dg','sc','au','dc'); |
@allroles = ('li','dg','sc','au','dc'); |
} |
} |
return @allroles; |
return @allroles; |
} |
} |