Diff for /loncom/auth/migrateuser.pm between versions 1.32 and 1.33

version 1.32, 2018/05/08 15:44:11 version 1.33, 2018/07/01 00:03:42
Line 483  sub handler { Line 483  sub handler {
  return OK;   return OK;
     }      }
   
     my $next_url='/adm/roles?selectrole=1&'.&escape($data{'role'}).'=1';      my $next_url='/adm/roles?selectrole=1&'.&escape($data{'role'}).'=1';
     if ($data{'origurl'} ne '') {      if ($data{'origurl'} ne '') {
         $next_url .= '&orgurl='.&escape($data{'origurl'});          $next_url .= '&orgurl='.&escape($data{'origurl'});
         if ($data{'lti.login'}) {          if ($data{'lti.login'}) {
             if (($data{'origurl'} =~ m{/default_\d+\.sequence$}) ||              if (($data{'origurl'} =~ m{/default_\d+\.sequence$}) ||
                 ($data{'origurl'} =~ m{^/res/.+\.sequence$})) {                  ($data{'origurl'} =~ m{^/res/.+\.sequence$})) {
                 $next_url .= '&navmap=1';                  $next_url .= '&navmap=1';
             }              }
         }          }
     }      }

Removed from v.1.32  
changed lines
  Added in v.1.33


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