|
version 1.357, 2003/03/31 20:31:39
|
version 1.358, 2003/03/31 20:53:39
|
|
Line 2844 sub createcourse {
|
Line 2844 sub createcourse {
|
| return 'error: no such course'; |
return 'error: no such course'; |
| } |
} |
| # ----------------------------------------------------------------- Course made |
# ----------------------------------------------------------------- Course made |
| |
# log existance |
| |
&courseidput($udom,&escape($udom.'_'.$uname).'='.&escape($description), |
| |
$uhome); |
| |
&flushcourselogs(); |
| |
# set toplevel url |
| my $topurl=$url; |
my $topurl=$url; |
| unless ($nonstandard) { |
unless ($nonstandard) { |
| # ------------------------------------------ For standard courses, make top url |
# ------------------------------------------ For standard courses, make top url |
![[BACK]](/icons/back.gif){kind=icon}
Return to lonnet.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / lonnet / perl