[LON-CAPA-cvs] cvs: loncom /interface loncreatecourse.pm

[bowersj2]

bowersj2		Tue Jun  3 10:36:03 2003 EDT

  Modified files:              
    /loncom/interface	loncreatecourse.pm 
  Log:
  When courses are created, mark that we have not yet done the course
  initialization helper.
  
  This should be the last piece of: When a CC first enters a new course,
  they will be presented with the course initialization helper, instead
  of the beginning of their course.
  
  
Index: loncom/interface/loncreatecourse.pm
diff -u loncom/interface/loncreatecourse.pm:1.22 loncom/interface/loncreatecourse.pm:1.23
--- loncom/interface/loncreatecourse.pm:1.22	Sun May  4 03:38:32 2003
+++ loncom/interface/loncreatecourse.pm	Tue Jun  3 10:36:03 2003
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Create a course
 #
-# $Id: loncreatecourse.pm,v 1.22 2003/05/04 07:38:32 albertel Exp $
+# $Id: loncreatecourse.pm,v 1.23 2003/06/03 14:36:03 bowersj2 Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -240,6 +240,9 @@
 	$envflag=1;
         $cenv{'pch.roles.denied'}='st';
     }
+
+    # Record we've not yet viewed the Course Initialization Helper for this course
+    $cenv{'course.helper.not.run'} = 1;
     #
     # Use new Randomseed
     #