version 1.487, 2006/12/05 02:55:51
|
version 1.489, 2006/12/08 20:09:29
|
Line 3503 sub standard_css {
|
Line 3503 sub standard_css {
|
my $mail_other = '#99BBBB'; |
my $mail_other = '#99BBBB'; |
my $mail_other_hover = '#669999'; |
my $mail_other_hover = '#669999'; |
my $table_header = '#DDDDDD'; |
my $table_header = '#DDDDDD'; |
|
my $feedback_link_bg = '#BBBBBB'; |
|
|
my $border = ($env{'browser.type'} eq 'explorer') ? '0px 2px 0px 2px' |
my $border = ($env{'browser.type'} eq 'explorer') ? '0px 2px 0px 2px' |
: '0px 3px 0px 4px'; |
: '0px 3px 0px 4px'; |
Line 4034 table.LC_descriptive_input td.LC_descrip
|
Line 4035 table.LC_descriptive_input td.LC_descrip
|
text-align: right; |
text-align: right; |
font-weight: bold; |
font-weight: bold; |
} |
} |
|
table.LC_feedback_link { |
|
background: $feedback_link_bg; |
|
} |
|
span.LC_feedback_link { |
|
background: $feedback_link_bg; |
|
font-size: larger; |
|
} |
|
|
END |
END |
} |
} |
Line 6292 sub construct_course {
|
Line 6300 sub construct_course {
|
my ($user,$domain) = split(':',$args->{'keyauth'}); |
my ($user,$domain) = split(':',$args->{'keyauth'}); |
$user = &LONCAPA::clean_username($user); |
$user = &LONCAPA::clean_username($user); |
$domain = &LONCAPA::clean_username($domain); |
$domain = &LONCAPA::clean_username($domain); |
if ($user ne '' && $domain ne ''); |
if ($user ne '' && $domain ne '') { |
$cenv{'keyauth'}=$user.':'.$domain; |
$cenv{'keyauth'}=$user.':'.$domain; |
} |
} |
} |
} |