[LON-CAPA-cvs] cvs: loncom /html/adm/helper course.initialization.helper

[bowersj2]

bowersj2		Wed Jun 18 16:11:21 2003 EDT

  Modified files:              
    /loncom/html/adm/helper	course.initialization.helper 
  Log:
  A voodoo fix attempt for bug 1757. (See comments on that bug entry.)
  
  
Index: loncom/html/adm/helper/course.initialization.helper
diff -u loncom/html/adm/helper/course.initialization.helper:1.5 loncom/html/adm/helper/course.initialization.helper:1.6
--- loncom/html/adm/helper/course.initialization.helper:1.5	Thu Jun  5 09:01:32 2003
+++ loncom/html/adm/helper/course.initialization.helper	Wed Jun 18 16:11:21 2003
@@ -12,6 +12,7 @@
     # Delete the 'course.initialization.not.run' course environment
     Apache::lonnet::put('environment', {'course.helper.not.run' => 0}, 
                         $crsdom, $crsnum);
+    Apache::lonnet::coursedescription($ENV{'request.course.id'});
 
     $helper->{DATA}->{GETVAL} = sub {
         my @resultlist = &Apache::lonnet::get('environment', [shift()], 
@@ -24,7 +25,9 @@
         if (&{$helper->{DATA}->{GETVAL}}($name) ne $val) {
             &Apache::lonnet::put('environment', {$name=>$val}, 
                                  $helper->{DATA}->{DOM},
-                                 $helper->{DATA}->{CRS}); 
+                                 $helper->{DATA}->{CRS});
+            # Try to fix bug 1757
+            Apache::lonnet::coursedescription($ENV{'request.course.id'});
             return 1;
         } else {
             return 0;