version 1.30, 2010/03/14 15:25:47
|
version 1.31, 2010/03/15 22:44:40
|
Line 28
|
Line 28
|
$helper->{DATA}->{CRS}); |
$helper->{DATA}->{CRS}); |
# Try to fix bug 1757 |
# Try to fix bug 1757 |
Apache::lonnet::coursedescription($env{'request.course.id'}); |
Apache::lonnet::coursedescription($env{'request.course.id'}); |
if ($name eq 'description') { |
if (($name eq 'description') || ($name eq 'cloners')) { |
my %crsinfo = &Apache::lonnet::courseiddump($crsdom,'.',1,'.','.',$crsnum,undef,undef,'.'); |
my %crsinfo = &Apache::lonnet::courseiddump($crsdom,'.',1,'.','.',$crsnum,undef,undef,'.'); |
if (ref($crsinfo{$courseid}) eq 'HASH') { |
if (ref($crsinfo{$courseid}) eq 'HASH') { |
$crsinfo{$courseid}{'description'} = $val; |
$crsinfo{$courseid}{$name} = $val; |
my $crshome = &Apache::lonnet::homeserver($crsnum,$crsdom); |
my $crshome = &Apache::lonnet::homeserver($crsnum,$crsdom); |
unless ($crshome eq 'no_host') { |
unless ($crshome eq 'no_host') { |
my $putresult = &Apache::lonnet::courseidput($crsdom,\%crsinfo,$crshome,'notime'); |
my $putresult = &Apache::lonnet::courseidput($crsdom,\%crsinfo,$crshome,'notime'); |
Line 248
|
Line 248
|
Cloning will copy the course structure, contents, and most settings. For dates (open dates, due dates etc.) a choice is provided to: (a) omit, (b) copy as-is or (c) shift by a specified number of days.<br /><br /> |
Cloning will copy the course structure, contents, and most settings. For dates (open dates, due dates etc.) a choice is provided to: (a) omit, (b) copy as-is or (c) shift by a specified number of days.<br /><br /> |
Usernames of owners of other courses permitted to clone this course:<br /> |
Usernames of owners of other courses permitted to clone this course:<br /> |
</message> |
</message> |
<string variable='can_clone' size='60' > |
<string variable='cloners' size='60' > |
<defaultvalue> |
<defaultvalue> |
return &{$helper->{DATA}->{GETVAL}}('cloners'); |
return &{$helper->{DATA}->{GETVAL}}('cloners'); |
</defaultvalue> |
</defaultvalue> |