[BACK]Return to lonsequence.pm CVS log [TXT] [DIR] Up to [LON-CAPA] / rat

Diff for /rat/lonsequence.pm between versions 1.54 and 1.57

version 1.54, 2021/04/19 18:21:13 version 1.57, 2022/10/19 00:03:12
Line 234  sub handler { Line 234  sub handler {
                $r->send_http_header;                 $r->send_http_header;
                $r->print(&Apache::loncommon::check_release_result(@reinit));                 $r->print(&Apache::loncommon::check_release_result(@reinit));
                return OK;                 return OK;
            } elsif ($result eq 'update') {             } elsif (($result eq 'main') || ($result eq 'both')) {
                my $cnum = $env{'course.'.$env{'request.course.id'}.'.num'};                 my $cnum = $env{'course.'.$env{'request.course.id'}.'.num'};
                my $cdom = $env{'course.'.$env{'request.course.id'}.'.domain'};                 my $cdom = $env{'course.'.$env{'request.course.id'}.'.domain'};
                my ($furl,$ferr) = &Apache::lonuserstate::readmap("$cdom/$cnum");                 my ($furl,$ferr) = &Apache::lonuserstate::readmap("$cdom/$cnum");
Line 291  sub handler { Line 291  sub handler {
                    }                     }
                    push(@crumbs,{text => $maptitle, no_mt => 1});                     push(@crumbs,{text => $maptitle, no_mt => 1});
                    $args = {'bread_crumbs' => \@crumbs,                     $args = {'bread_crumbs' => \@crumbs,
                             'bread_crumbs_nomenu' => 1};                              'bread_crumbs_nomenu' => 1,
                               'no_auto_mt_title' => 1};
                    $r->print(&Apache::loncommon::start_page($maptitle,undef,$args));                     $r->print(&Apache::loncommon::start_page($maptitle,undef,$args));
   
                    my $renderArgs = { 'cols'                    => [0,1,2,3],                     my $renderArgs = { 'cols'                    => [0,1,2,3],
Line 374  sub handler { Line 375  sub handler {
                $dismapid=(split(/\./,$disid))[1];                 $dismapid=(split(/\./,$disid))[1];
        if (!$env{'request.role.adv'}) {         if (!$env{'request.role.adv'}) {
    $randomout = $bighash{'randomout_'.$disid};     $randomout = $bighash{'randomout_'.$disid};
        }  
                if (!$env{'request.role.adv'}) {  
                    $is_encrypted = $bighash{'encrypted_'.$disid};                     $is_encrypted = $bighash{'encrypted_'.$disid};
                }                 }
            } elsif (tie(%hash,'GDBM_File',$env{'request.course.fn'}.'_symb.db',             } elsif (tie(%hash,'GDBM_File',$env{'request.course.fn'}.'_symb.db',
Line 396  sub handler { Line 395  sub handler {
                    $dismapid=(split(/\./,$disid))[1];                     $dismapid=(split(/\./,$disid))[1];
    if (!$env{'request.role.adv'}) {     if (!$env{'request.role.adv'}) {
        $randomout = $bighash{'randomout_'.$disid};         $randomout = $bighash{'randomout_'.$disid};
    }  
                    if (!$env{'request.role.adv'}) {  
                        $is_encrypted = $bighash{'encrypted_'.$disid};                         $is_encrypted = $bighash{'encrypted_'.$disid};
                    }                     }
                }                 }
Removed from v.1.54  
changed lines
  Added in v.1.57

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