|
version 1.532, 2007/05/02 01:33:48
|
version 1.535, 2007/05/15 20:05:13
|
|
Line 1467 sub home_server_option_list {
|
Line 1467 sub home_server_option_list {
|
| |
|
| =pod |
=pod |
| |
|
| |
=back |
| |
|
| =cut |
=cut |
| |
|
| ############################################################### |
############################################################### |
|
Line 2912 sub blockcheck {
|
Line 2914 sub blockcheck {
|
| } |
} |
| my $no_ownblock = 0; |
my $no_ownblock = 0; |
| my $no_userblock = 0; |
my $no_userblock = 0; |
| if ($otheruser) { |
if ($otheruser && $activity ne 'com') { |
| # Check if current user has 'evb' priv for this |
# Check if current user has 'evb' priv for this |
| if (defined($own_courses{$course})) { |
if (defined($own_courses{$course})) { |
| foreach my $sec (keys(%{$own_courses{$course}})) { |
foreach my $sec (keys(%{$own_courses{$course}})) { |
|
Line 3375 sub bodytag {
|
Line 3377 sub bodytag {
|
| my $pgbg = $bgcolor || &designparm($function.'.pgbg',$domain); |
my $pgbg = $bgcolor || &designparm($function.'.pgbg',$domain); |
| |
|
| my %design = ( 'style' => 'margin-top: 0px', |
my %design = ( 'style' => 'margin-top: 0px', |
| 'bgcolor' => '#ffffff', |
'bgcolor' => $pgbg, |
| 'text' => $font, |
'text' => $font, |
| 'alink' => &designparm($function.'.alink',$domain), |
'alink' => &designparm($function.'.alink',$domain), |
| 'vlink' => &designparm($function.'.vlink',$domain), |
'vlink' => &designparm($function.'.vlink',$domain), |
![[BACK]](/icons/back.gif){kind=icon}
Return to loncommon.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / interface