[LON-CAPA-cvs] cvs: loncom /auth lonlogout.pm

albertel lon-capa-cvs@mail.lon-capa.org
Wed, 05 Apr 2006 22:25:47 -0000


albertel		Wed Apr  5 18:25:47 2006 EDT

  Modified files:              
    /loncom/auth	lonlogout.pm 
  Log:
  -start_page
  
  
Index: loncom/auth/lonlogout.pm
diff -u loncom/auth/lonlogout.pm:1.15 loncom/auth/lonlogout.pm:1.16
--- loncom/auth/lonlogout.pm:1.15	Tue Sep 20 03:33:54 2005
+++ loncom/auth/lonlogout.pm	Wed Apr  5 18:25:44 2006
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Logout Handler
 #
-# $Id: lonlogout.pm,v 1.15 2005/09/20 07:33:54 albertel Exp $
+# $Id: lonlogout.pm,v 1.16 2006/04/05 22:25:44 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -82,9 +82,10 @@
     if ($env{'form.handover'}) {
        $switch='<meta HTTP-EQUIV="Refresh" CONTENT="0.5; url='.
 	   $env{'form.handover'}.'">';
-       $bodytag=&Apache::loncommon::bodytag('Switching Server ...');
+       $start_page=&Apache::loncommon::start_page('Switching Server ...',
+						  $switch);
    } else {
-       $bodytag=&Apache::loncommon::bodytag('Logged Out');
+       $start_page=&Apache::loncommon::start_page('Logged Out');
        my %lt=&Apache::lonlocal::texthash('gb' => 'Goodbye',
                                           'cw' => 'close this window',
                                           'li' => 'log in again',
@@ -96,17 +97,13 @@
 <a href="/adm/login?domain=$sessionhash{'user.domain'}">$lt{'li'}</a>.
 ENDRELOG
    }
+   $end_page=&Apache::loncommon::end_page();
 # --------------------------------------------------------------- Screen Output
             $r->print(<<ENDDOCUMENT);
-<html>
-<head><title>The LearningOnline Network with CAPA Logout</title>
-$switch
-</head>
-$bodytag
+$start_page
 $windowinfo
 $relogmessage
-</body>
-</html>
+$end_page
 ENDDOCUMENT
             &Apache::lonnet::flushcourselogs();
             return OK;