|
version 1.635, 2008/01/16 20:42:48
|
version 1.636.2.1, 2008/02/02 21:45:47
|
|
Line 782 sub helpLatexCheatsheet {
|
Line 782 sub helpLatexCheatsheet {
|
| } |
} |
| return '<table><tr><td>'. |
return '<table><tr><td>'. |
| $addOther . |
$addOther . |
| &Apache::loncommon::help_open_topic("Greek_Symbols",'Greek Symbols', |
&Apache::loncommon::help_open_topic("Greek_Symbols",&mt('Greek Symbols'), |
| undef,undef,600) |
undef,undef,600) |
| .'</td><td>'. |
.'</td><td>'. |
| &Apache::loncommon::help_open_topic("Other_Symbols",'Other Symbols', |
&Apache::loncommon::help_open_topic("Other_Symbols",&mt('Other Symbols'), |
| undef,undef,600) |
undef,undef,600) |
| .'</td></tr></table>'; |
.'</td></tr></table>'; |
| } |
} |
|
Line 8088 sub construct_course {
|
Line 8088 sub construct_course {
|
| $cenv{'url'}=$oldcenv{'url'}; |
$cenv{'url'}=$oldcenv{'url'}; |
| # Restore title |
# Restore title |
| $cenv{'description'}=$oldcenv{'description'}; |
$cenv{'description'}=$oldcenv{'description'}; |
| # restore grading mode |
|
| if (defined($oldcenv{'grading'})) { |
|
| $cenv{'grading'}=$oldcenv{'grading'}; |
|
| } |
|
| # Mark as cloned |
# Mark as cloned |
| $cenv{'clonedfrom'}=$cloneid; |
$cenv{'clonedfrom'}=$cloneid; |
| delete($cenv{'default_enrollment_start_date'}); |
# Need to clone grading mode |
| delete($cenv{'default_enrollment_end_date'}); |
my %newenv=&Apache::lonnet::get('environment',['grading'],$$crsudom,$$crsunum); |
| |
$cenv{'grading'}=$newenv{'grading'}; |
| |
# Do not clone these environment entries |
| |
&Apache::lonnet::del('environment', |
| |
['default_enrollment_start_date', |
| |
'default_enrollment_end_date', |
| |
'question.email', |
| |
'policy.email', |
| |
'comment.email', |
| |
'pch.users.denied', |
| |
'plc.users.denied'], |
| |
$$crsudom,$$crsunum); |
| } |
} |
| |
|
| # |
# |
![[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