--- loncom/auth/migrateuser.pm 2008/09/15 19:08:44 1.14 +++ loncom/auth/migrateuser.pm 2009/04/14 23:52:07 1.15 @@ -1,7 +1,7 @@ # The LearningOnline Network # Starts a user off based of an existing token. # -# $Id: migrateuser.pm,v 1.14 2008/09/15 19:08:44 raeburn Exp $ +# $Id: migrateuser.pm,v 1.15 2009/04/14 23:52:07 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -115,7 +115,12 @@ sub handler { } my $next_url='/adm/roles?selectrole=1&'.&escape($data{'role'}).'=1'; - + if ($data{'origurl'} ne '') { + $next_url .= '&orgurl='.&escape($data{'origurl'}); + } + if ($data{'symb'} ne '') { + $next_url .= '&symb='.&escape($data{'symb'}); + } &Apache::lonauth::success($r,$data{'username'},$data{'domain'},$home, $next_url,$extra_env);