--- loncom/interface/Attic/lonremote.pm	2003/04/03 03:08:12	1.4
+++ loncom/interface/Attic/lonremote.pm	2003/04/03 14:44:01	1.5
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # User Authentication Module
 #
-# $Id: lonremote.pm,v 1.4 2003/04/03 03:08:12 www Exp $
+# $Id: lonremote.pm,v 1.5 2003/04/03 14:44:01 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -60,6 +60,7 @@ $startupremote
 $bodytag
 $setflags
 $windowinfo
+$maincall
 </body>
 </html>
 ENDLAUNCH
@@ -86,7 +87,8 @@ ENDCOLLAPSE
 
 sub handler {
     my $r = shift;
-    &Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},['action']);
+    &Apache::loncommon::get_unprocessed_cgi($ENV{'QUERY_STRING'},
+                                            ['action','url']);
     unless ($ENV{'form.action'}) {
 	if ($ENV{'environment.remote'} eq 'on') {
 	    $ENV{'form.action'}='collapse';
@@ -94,9 +96,9 @@ sub handler {
 	    $ENV{'form.action'}='launch';
         }
     }
-# FIXME - testurl
-    my $lowerurl='/adm/roles';
-###
+
+    my $lowerurl=$ENV{'form.url'};
+
     if ($ENV{'form.action'} eq 'launch') {
 	&launchremote($r,$lowerurl);
     } else {