--- loncom/html/adm/helper/course.initialization.helper 2010/02/11 01:30:52 1.29
+++ loncom/html/adm/helper/course.initialization.helper 2010/03/14 15:25:47 1.30
@@ -28,6 +28,16 @@
$helper->{DATA}->{CRS});
# Try to fix bug 1757
Apache::lonnet::coursedescription($env{'request.course.id'});
+ if ($name eq 'description') {
+ my %crsinfo = &Apache::lonnet::courseiddump($crsdom,'.',1,'.','.',$crsnum,undef,undef,'.');
+ if (ref($crsinfo{$courseid}) eq 'HASH') {
+ $crsinfo{$courseid}{'description'} = $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;