--- loncom/auth/switchserver.pm 2005/12/28 16:46:47 1.6
+++ loncom/auth/switchserver.pm 2006/04/05 22:39:55 1.7
@@ -1,7 +1,7 @@
# The LearningOnline Network
# Switch Servers Handler
#
-# $Id: switchserver.pm,v 1.6 2005/12/28 16:46:47 albertel Exp $
+# $Id: switchserver.pm,v 1.7 2006/04/05 22:39:55 albertel Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -105,18 +105,11 @@ sub handler {
'server' => $r->dir_config('lonHostID'));
my $token = &Apache::lonnet::tmpput(\%info,$env{'form.otherserver'});
my $switch='';
- my $bodytag=&Apache::loncommon::bodytag('Switching Server ...');
+ my $start_page = &Apache::loncommon::start_page('Switching Server ...',
+ $switch);
+ my $end_page = &Apache::loncommon::end_page();
# --------------------------------------------------------------- Screen Output
- $r->print(<
- The LearningOnline Network with CAPA Logout
- $switch
-
- $bodytag
- $windowinfo
-
-