Diff for /rat/lonuserstate.pm between versions 1.40 and 1.44

version 1.40, 2002/09/02 15:27:08 version 1.44, 2002/10/07 13:50:36
Line 68  my @cond;    # Array with all of the con Line 68  my @cond;    # Array with all of the con
 my $errtext; # variable with all errors  my $errtext; # variable with all errors
 my $retfurl; # variable with the very first URL in the course  my $retfurl; # variable with the very first URL in the course
 my %randompick; # randomly picked resources  my %randompick; # randomly picked resources
   my %actualversion # version of resource as loaded now
   my %setversion # forced version of resource
   my %lastversion # version when CC came in last
   my $versionmode # how versioning is handled in this course
   my $hasversionpriv # user has versioning privileges
 # --------------------------------------------------------- Loads map from disk  # --------------------------------------------------------- Loads map from disk
   
 sub loadmap {   sub loadmap { 
Line 124  sub loadmap { Line 129  sub loadmap {
     if (($embstyle eq 'img') || ($embstyle eq 'emb')      if (($embstyle eq 'img') || ($embstyle eq 'emb')
                              || ($embstyle eq 'ssi')) {                               || ($embstyle eq 'ssi')) {
                                 $turi='/adm/wrapper'.$turi;                                  $turi='/adm/wrapper'.$turi;
                             } else {                              } elsif ($turi!~/\.(sequence|page)$/) {
  $turi='/adm/coursedocs?showdoc='.$turi;   $turi='/adm/coursedocs/showdoc'.$turi;
                             }                              }
                         } else { # normal internal resource                          } else { # normal internal resource
                            if (($embstyle eq 'img') || ($embstyle eq 'emb')                             if (($embstyle eq 'img') || ($embstyle eq 'emb')
                           || ($turi=~/\/syllabus$/) || ($turi=~/\/aboutme$/)               || ($turi=~/\/(syllabus|aboutme|navmaps|smppg|bulletinboard)$/)) {
                           || ($turi=~/\/navmaps$/)) {  
        $turi='/adm/wrapper'.$turi;         $turi='/adm/wrapper'.$turi;
                            }                             }
                         }                          }

Removed from v.1.40  
changed lines
  Added in v.1.44


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