--- loncom/html/adm/helper/course.initialization.helper	2003/09/05 16:16:17	1.13
+++ loncom/html/adm/helper/course.initialization.helper	2005/08/01 18:04:09	1.16
@@ -1,18 +1,18 @@
 <helper title="Course Initialization Helper" requiredpriv='opa'>
 
   <exec>
-    my $courseid = $ENV{'request.course.id'};
-    my $crsdom = $ENV{'course.'.$courseid.'.domain'};
-    my $crsnum = $ENV{'course.'.$courseid.'.num'};
+    my $courseid = $env{'request.course.id'};
+    my $crsdom = $env{'course.'.$courseid.'.domain'};
+    my $crsnum = $env{'course.'.$courseid.'.num'};
     $helper->{DATA}->{DOM} = $crsdom;
     $helper->{DATA}->{CRS} = $crsnum;
 
-    $helper->{DATA}->{FIRST_RUN} = $ENV{'course.'.$crsnum.
+    $helper->{DATA}->{FIRST_RUN} = $env{'course.'.$crsnum.
                                         '.course.intialization.not.run'};
     # 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'});
+    Apache::lonnet::coursedescription($env{'request.course.id'});
 
     $helper->{DATA}->{GETVAL} = sub {
         my @resultlist = &Apache::lonnet::get('environment', [shift()], 
@@ -27,7 +27,7 @@
                                  $helper->{DATA}->{DOM},
                                  $helper->{DATA}->{CRS});
             # Try to fix bug 1757
-            Apache::lonnet::coursedescription($ENV{'request.course.id'});
+            Apache::lonnet::coursedescription($env{'request.course.id'});
             return 1;
         } else {
             return 0;
@@ -37,7 +37,7 @@
 
   <state name="START" title="Welcome to Your New LON-CAPA Course">
     <eval>
-      return $helper->{DATA}->{FIRST_RUN} ?
+      return $helper->{DATA}->{FIRST_RUN} ? 
         'This Helper will set up your new LON-CAPA course and choose '.
         'which features will be active. You can '.
         're-visit it later to change settings in your course.' .
@@ -45,8 +45,7 @@
         '<p>If you have previous experience with coordinating LON-CAPA courses and '.
         'prefer not to use the helper, <a href="/adm/menu">click here</a> to leave.'
         :
-        'This helper will set up your LON-CAPA course and choose ' .
-        'which features will be active.';
+        &mt('This helper will set up your LON-CAPA course and choose which features will be active.');
       </eval>
     <message nextstate="COURSE_DESCRIPTION">
       <p>All settings which you can change with this Helper can also be changed
@@ -88,7 +87,7 @@
       <choice computer="ta"><b>Teaching Assistants</b> - teaching assistants will not be able use or view the chat room</choice>
       <choice computer="in"><b>Instructor</b> - instructors will not be able to use or view the chat room</choice>
       <defaultvalue>
-        my $denied = &{$helper->{DATA}->{GETVAL}}('plch.roles.denied');
+        my $denied = &{$helper->{DATA}->{GETVAL}}('plc.roles.denied');
         $denied =~ s/,/\|\|\|/g;
         return $denied;
       </defaultvalue>
@@ -201,9 +200,7 @@
       are both the LON-CAPA username and LON-CAPA domain, not an email
       address.</p> 
       </message>
-    <eval>return '<p>Your current LON-CAPA domain is &quot;<b>' 
-                 . $helper->{DATA}->{DOM} .
-                 '</b>&quot;.</p>';
+    <eval>return &mt('<p>Your current LON-CAPA domain is &quot;<b>[_1]</b>&quot;.</p>',"$helper->{DATA}->{DOM}"); 
       </eval>
     <string variable='feedback_addresses' size='60' >
       <defaultvalue>
@@ -245,7 +242,7 @@
          screen, by pushing the <b>Course Environment</b> button.</p>
       </message>
     <condition>
-      <clause>$ENV{'course.'.$ENV{'request.course.id'}.'.clonedfrom'}</clause>
+      <clause>$env{'course.'.$env{'request.course.id'}.'.clonedfrom'}</clause>
       <message>After you select <b>Finish Course Initialization</b>,
                you will be taken to the Parameter Overview screen to
                update the dates for this cloned course.</message>