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

Diff for /loncom/lontrans.pm between versions 1.18 and 1.19

version 1.18, 2018/01/12 13:34:08 version 1.19, 2018/01/13 18:58:33
Line 103  sub handler { Line 103  sub handler {
                                     }                                      }
                                     if ((&Apache::lonnet::EXT('resource.0.encrypturl',$symb) =~ /^yes$/i) &&                                      if ((&Apache::lonnet::EXT('resource.0.encrypturl',$symb) =~ /^yes$/i) &&
                                         (!$env{'request.role.adv'})) {                                          (!$env{'request.role.adv'})) {
                                         $realuri = &Apache::lonenc::encrypted(&Apache::lonnet::clutter($url)).                                          $realuri = &Apache::lonenc::encrypted(&Apache::lonnet::clutter($url));
                                                    '?symb='.&Apache::lonenc::encrypted($symb);                                          if (($url =~ /\.sequence$/) &&
                                               ($env{'course.'.$env{'request.course.id'}.'.type'} ne 'Placement')) {
                                               $realuri .= '?navmap=1';
                                           } else {
                                               $realuri .= '?symb='.&Apache::lonenc::encrypted($symb);
                                           }
                                     } else {                                      } else {
                                         $realuri = &Apache::lonnet::clutter($url).'?symb='.$symb;                                          $realuri = &Apache::lonnet::clutter($url);
                                           if (($url =~ /\.sequence$/) &&
                                               ($env{'course.'.$env{'request.course.id'}.'.type'} ne 'Placement')) {
                                               $realuri .= '?navmap=1'; 
                                           } else {
                                               $realuri .= '?symb='.$symb;
                                           }
                                     }                                      }
                                     my $host = $r->headers_in->get('Host');                                      my $host = $r->headers_in->get('Host');
                                     if ($host) {                                      if ($host) {
Removed from v.1.18  
changed lines
  Added in v.1.19

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