Diff for /loncom/homework/lonhomework.pm between versions 1.36 and 1.37

version 1.36, 2001/02/07 00:29:30 version 1.37, 2001/02/13 18:42:06
Line 130  sub check_date { Line 130  sub check_date {
   
 sub handler {  sub handler {
   my $request=$_[0];    my $request=$_[0];
     
   if ( $ENV{'user.name'} eq 'albertel' ) {$Apache::lonxml::debug=1;} else {$Apache::lonxml::debug=0;}   if ( $ENV{'user.name'} eq 'albertel' ) {$Apache::lonxml::debug=1;} else {$Apache::lonxml::debug=0;}
       
   my (@targets) = &get_target();    my (@targets) = &get_target();
   
Line 144  sub handler { Line 144  sub handler {
   return OK if $request->header_only;    return OK if $request->header_only;
   
   #setup permissions    #setup permissions
   $Apache::lonhomework::browse= &Apache::lonnet::allowed('bre');    $Apache::lonhomework::browse= &Apache::lonnet::allowed('bre',$ENV{'request.filename'});
   $Apache::lonhomework::viewgrades=&Apache::lonnet::allowed('vgr');    $Apache::lonhomework::viewgrades=&Apache::lonnet::allowed('vgr',$ENV{'request.course.id'});
   &Apache::lonxml::debug("Permissions:$Apache::lonhomework::browse:$Apache::lonhomework::viewgrades:");    &Apache::lonxml::debug("Permissions:$Apache::lonhomework::browse:$Apache::lonhomework::viewgrades:");
   
   #check if we know where we are    #check if we know where we are

Removed from v.1.36  
changed lines
  Added in v.1.37


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