--- loncom/auth/lonroles.pm	2002/08/08 19:29:30	1.40
+++ loncom/auth/lonroles.pm	2002/08/21 17:18:08	1.41
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # User Roles Screen
 #
-# $Id: lonroles.pm,v 1.40 2002/08/08 19:29:30 matthew Exp $
+# $Id: lonroles.pm,v 1.41 2002/08/21 17:18:08 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -148,11 +148,13 @@ ENDREDIR
     return OK if $r->header_only;
 
     my $swinfo=&Apache::lonmenu::rawconfig($r);
+    my $bodytag=&Apache::loncommon::bodytag('User Roles');
     $r->print(<<ENDHEADER);
 <html>
 <head>
 <title>LON-CAPA User Roles</title>
-</head><body bgcolor="#FFFFFF">
+</head>
+$bodytag
 <script>
 $swinfo
 window.focus();
@@ -186,7 +188,6 @@ ENDHEADER
         $r->print("Resource: $fn\n");
         $r->print("Action  : $msg\n</pre><hr>");
     } else {
-        $r->print("<h1>LON-CAPA User Roles</h1>");
         if ($ENV{'user.error.msg'}) {
 	    $r->print(
  '<h3><font color=red>You need to choose another user role or '.
@@ -209,8 +210,6 @@ ENDHEADER
         } 
     } else {
         if ($advanced) {
-           $r->print
-               ("<h2>$ENV{'user.name'}, Please Select a Role</h2>\n");
            $r->print("Your home server is ".
                      $Apache::lonnet::hostname{&Apache::lonnet::homeserver
                      ($ENV{'user.name'},$ENV{'user.domain'})}.
