--- loncom/auth/lonlogin.pm	2006/02/28 16:44:19	1.73
+++ loncom/auth/lonlogin.pm	2006/04/05 22:39:55	1.74
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # Login Screen
 #
-# $Id: lonlogin.pm,v 1.73 2006/02/28 16:44:19 albertel Exp $
+# $Id: lonlogin.pm,v 1.74 2006/04/05 22:39:55 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -80,20 +80,18 @@ sub handler {
 		unlink("$lonidsdir/$handle.id");
 	    } elsif ($handle ne '') {
 # Indeed, a valid token is found
-		my $bodytag=&Apache::loncommon::bodytag('Already logged in');
+		my $start_page = 
+		    &Apache::loncommon::start_page('Already logged in');
+		my $end_page = 
+		    &Apache::loncommon::end_page();
 		$r->print(<<ENDFAILED);
-<html>
-<head>
-<title>Already logged in</title>
-</head>
-$bodytag
+$start_page
 <h1>You are already logged in</h1>
 <p>Please either <a href="/adm/roles">continue the current session</a> or
 <a href="/adm/logout">logout</a>.</p>
 <p>
 <a href="/adm/loginproblems.html">Problems?</a></p>
-</body>
-</html>
+$end_page
 ENDFAILED
                 return OK;
  	    }  
