[BACK]Return to lonroles.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / loncom / auth

Diff for /loncom/auth/lonroles.pm between versions 1.123 and 1.124

version 1.123, 2005/06/07 00:24:08 version 1.124, 2005/06/16 22:25:34
Line 260  ENDENTERKEY Line 260  ENDENTERKEY
     if ($role eq 'cc' && $env{'course.' . $courseid .       if ($role eq 'cc' && $env{'course.' . $courseid . 
   '.course.helper.not.run'}) {    '.course.helper.not.run'}) {
  $furl = "/adm/helper/course.initialization.helper";   $furl = "/adm/helper/course.initialization.helper";
    # Send the user to the course they selected
       } elsif (($env{'request.course.fn'}) 
        && ($role eq 'cc' && ($env{'environment.course_init_display'} ne 'firstres')))  {
    $msg = &mt('Entering course ....');
    &redirect_user($r,&mt('New in course'),
          '/adm/whatsnew',$msg,
          $env{'environment.remotenavmap'});
    return OK;
     }      }
                             # Send the user to the course they selected      &redirect_user($r,&mt('Entering Course'),
                             if (($env{'request.course.fn'})   
  && ($role eq 'cc' && ($env{'environment.course_init_display'} ne 'firstres')))  {  
                                 $msg = &mt('Entering course ....');  
                                 &redirect_user($r,&mt('New in course'),  
                                       '/adm/whatsnew',$msg,  
                                       $env{'environment.remotenavmap'});  
                             } else {  
                                 &redirect_user($r,&mt('Entering Course'),  
                                            $furl,$msg,                                             $furl,$msg,
    $env{'environment.remotenavmap'});     $env{'environment.remotenavmap'});
                             }      return OK;
                             return OK;  
  }   }
     }      }
                     #                      #
Removed from v.1.123  
changed lines
  Added in v.1.124

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