[LON-CAPA-cvs] cvs: loncom /interface loncreatecourse.pm
bowersj2
lon-capa-cvs@mail.lon-capa.org
Thu, 07 Aug 2003 14:28:49 -0000
bowersj2 Thu Aug 7 10:28:49 2003 EDT
Modified files:
/loncom/interface loncreatecourse.pm
Log:
Add a comment for future maintainers.
Index: loncom/interface/loncreatecourse.pm
diff -u loncom/interface/loncreatecourse.pm:1.26 loncom/interface/loncreatecourse.pm:1.27
--- loncom/interface/loncreatecourse.pm:1.26 Thu Jul 24 13:53:59 2003
+++ loncom/interface/loncreatecourse.pm Thu Aug 7 10:28:49 2003
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Create a course
#
-# $Id: loncreatecourse.pm,v 1.26 2003/07/24 17:53:59 matthew Exp $
+# $Id: loncreatecourse.pm,v 1.27 2003/08/07 14:28:49 bowersj2 Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -208,6 +208,10 @@
$ENV{'form.course_home'},
$ENV{'form.nonstandard'});
+ # Note: The testing routines depend on this being output; see
+ # Utils::Course. This needs to at least be output as a comment
+ # if anyone ever decides to not show this, and Utils::Course::new
+ # will need to be suitably modified.
$r->print('New LON-CAPA Course ID: '.$courseid.'<br>');
#
# Check if created correctly