--- loncom/auth/lonlogin.pm 2008/02/24 23:18:37 1.101 +++ loncom/auth/lonlogin.pm 2008/03/08 02:53:25 1.102 @@ -1,7 +1,7 @@ # The LearningOnline Network # Login Screen # -# $Id: lonlogin.pm,v 1.101 2008/02/24 23:18:37 raeburn Exp $ +# $Id: lonlogin.pm,v 1.102 2008/03/08 02:53:25 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -47,6 +47,9 @@ sub handler { $ENV{'REDIRECT_QUERY_STRING'}), ['interface','username','domain','firsturl','localpath','localres', 'token']); + if (!defined($env{'form.firsturl'})) { + &Apache::lonacc::get_posted_cgi($r,['firsturl']); + } # -- check if they are a migrating user if (defined($env{'form.token'})) {