Diff for /loncom/auth/lonroles.pm between versions 1.178 and 1.179

version 1.178, 2007/09/10 11:44:00 version 1.179, 2007/09/10 16:07:32
Line 201  sub handler { Line 201  sub handler {
  }   }
  $r->print(<<ENDENTEREDKEY);   $r->print(<<ENDENTEREDKEY);
 $start_page  $start_page
 <script>  <script type="text/javascript">
 $swinfo  $swinfo
 </script>  </script>
 <form method="post">  <form method="post">
Line 224  ENDENTEREDKEY Line 224  ENDENTEREDKEY
  my $end_page=&Apache::loncommon::end_page();   my $end_page=&Apache::loncommon::end_page();
  $r->print(<<ENDENTERKEY);   $r->print(<<ENDENTERKEY);
 $start_page  $start_page
 <script>  <script type="text/javascript">
 $swinfo  $swinfo
 </script>  </script>
 <form method="post">  <form method="post">
Line 365  ENDENTERKEY Line 365  ENDENTERKEY
     my $start_page=&Apache::loncommon::start_page('User Roles');      my $start_page=&Apache::loncommon::start_page('User Roles');
     my $standby=&mt('Role selected. Please stand by.');      my $standby=&mt('Role selected. Please stand by.');
     $standby=~s/\n/\\n/g;      $standby=~s/\n/\\n/g;
       my $noscript='<span class="LC_error">'.&mt('Use of LON-CAPA requires Javascript to be enabled in your web browser.').'<br />'.&mt('As this is not the case, most functionality in the system will ba unavailable.').'</span><br />';
   
     $r->print(<<ENDHEADER);      $r->print(<<ENDHEADER);
 $start_page  $start_page
 <br />  <br />
 <script>  <noscript>
   $noscript
   </noscript>
   <script type="text/javascript">
 $swinfo  $swinfo
 window.focus();  window.focus();
   
Line 628  ENDHEADER Line 632  ENDHEADER
 # Is there only one choice?  # Is there only one choice?
     } elsif (($countactive==1) && ($env{'request.role'} eq 'cm')) {      } elsif (($countactive==1) && ($env{'request.role'} eq 'cm')) {
  $r->print('<h3>'.&mt('Please stand by.').'</h3>'.   $r->print('<h3>'.&mt('Please stand by.').'</h3>'.
     '<input type="hidden" name="'.$possiblerole.'" value="1" />');      '<input type="hidden" name="'.$possiblerole.'" value="1" />'.
               '<noscript><br /><input type="submit" name="submit" value="'.&mt('Continue').'" /></noscript>');
  $r->print("</form>\n");   $r->print("</form>\n");
  $r->rflush();   $r->rflush();
  $r->print('<script>document.forms.rolechoice.submit();</script>');   $r->print('<script type="text/javascript">document.forms.rolechoice.submit();</script>');
  $r->print(&Apache::loncommon::end_page());   $r->print(&Apache::loncommon::end_page());
  return OK;   return OK;
     }      }
Line 926  sub courselink { Line 931  sub courselink {
   
 sub coursepick_jscript {  sub coursepick_jscript {
     my $verify_script = <<"END";      my $verify_script = <<"END";
 <script>  <script type="text/javascript">
 function verifyCoursePick(caller) {  function verifyCoursePick(caller) {
     var numbutton = getIndex(caller)      var numbutton = getIndex(caller)
     var pickedCourse = document.rolechoice.elements[numbutton+4].value      var pickedCourse = document.rolechoice.elements[numbutton+4].value
Line 962  END Line 967  END
   
 sub processpick {  sub processpick {
     my $process_pick = <<"END";      my $process_pick = <<"END";
 <script>  <script type="text/javascript">
 function process_pick(dom) {  function process_pick(dom) {
     var pickedCourse=opener.document.rolechoice.$env{'form.cnumelement'}.value;      var pickedCourse=opener.document.rolechoice.$env{'form.cnumelement'}.value;
     var pickedDomain=opener.document.rolechoice.$env{'form.cdomelement'}.value;      var pickedDomain=opener.document.rolechoice.$env{'form.cdomelement'}.value;

Removed from v.1.178  
changed lines
  Added in v.1.179


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>