--- loncom/html/adm/helper/course.initialization.helper 2010/02/11 01:30:52 1.29
+++ loncom/html/adm/helper/course.initialization.helper 2010/03/15 22:44:40 1.31
@@ -28,6 +28,16 @@
$helper->{DATA}->{CRS});
# Try to fix bug 1757
Apache::lonnet::coursedescription($env{'request.course.id'});
+ if (($name eq 'description') || ($name eq 'cloners')) {
+ my %crsinfo = &Apache::lonnet::courseiddump($crsdom,'.',1,'.','.',$crsnum,undef,undef,'.');
+ if (ref($crsinfo{$courseid}) eq 'HASH') {
+ $crsinfo{$courseid}{$name} = $val;
+ my $crshome = &Apache::lonnet::homeserver($crsnum,$crsdom);
+ unless ($crshome eq 'no_host') {
+ my $putresult = &Apache::lonnet::courseidput($crsdom,\%crsinfo,$crshome,'notime');
+ }
+ }
+ }
return 1;
} else {
return 0;
@@ -238,7 +248,7 @@
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.
Usernames of owners of other courses permitted to clone this course:
-
+
return &{$helper->{DATA}->{GETVAL}}('cloners');