--- loncom/auth/lonroles.pm	2003/02/03 18:03:52	1.50
+++ loncom/auth/lonroles.pm	2003/02/04 16:25:37	1.51
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # User Roles Screen
 #
-# $Id: lonroles.pm,v 1.50 2003/02/03 18:03:52 harris41 Exp $
+# $Id: lonroles.pm,v 1.51 2003/02/04 16:25:37 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -310,8 +310,11 @@ ENDHEADER
                     my $home = &Apache::lonnet::homeserver($trest,$tdom);
                     if ($home ne $r->dir_config('lonHostID')) {
 			$button=0;
-                        $switchserver='http://'.
-                         $Apache::lonnet::hostname{$home}.'/priv/'.$trest;
+                        $switchserver=&Apache::lonnet::escape('http://'.
+                         $Apache::lonnet::hostname{$home}.
+                         '/adm/login?domain='.$ENV{'user.domain'}.
+			  '&username='.$ENV{'user.name'}.
+                          '&firsturl=/priv/'.$trest);
                     }
                     #next if ($home eq 'no_host');
                     $home = $Apache::lonnet::hostname{$home};
@@ -325,9 +328,11 @@ ENDHEADER
                         ($ENV{'user.name'},$ENV{'user.domain'});
                     if ($home ne $r->dir_config('lonHostID')) {
 			$button=0;
-                        $switchserver='http://'.
-                         $Apache::lonnet::hostname{$home}.'/priv/'.
-                         $ENV{'user.name'};
+                        $switchserver=&Apache::lonnet::escape('http://'.
+                         $Apache::lonnet::hostname{$home}.
+                          '/adm/login?domain='.$ENV{'user.domain'}.
+			   '&username='.$ENV{'user.name'}.
+                           '&firsturl=/priv/'.$ENV{'user.name'});
                     }
                     #next if ($home eq 'no_host');
                     $home = $Apache::lonnet::hostname{$home};