--- loncom/interface/loncommon.pm	2006/07/18 21:55:24	1.430
+++ loncom/interface/loncommon.pm	2006/07/19 11:30:36	1.434
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.430 2006/07/18 21:55:24 albertel Exp $
+# $Id: loncommon.pm,v 1.434 2006/07/19 11:30:36 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -832,7 +832,7 @@ function writeHelp(caller) {
 // END LON-CAPA Internal -->
  </script>
 $banner_link
- <a href="$link" title="$title">$text<img src="$helpicon" border="0" alt="(Help Menu)" /></a>
+ <a href="$link" title="$title">$text</a>
 ENDTEMPLATE
     return $template;
 }
@@ -2048,6 +2048,9 @@ sub nickname {
 
 sub getnames {
     my ($uname,$udom)=@_;
+    if ($udom eq 'public' && $uname eq 'public') {
+	return ('lastname' => &mt('Public'));
+    }
     my $id=$uname.':'.$udom;
     my ($names,$cached)=&Apache::lonnet::is_cached_new('namescache',$id);
     if ($cached) {
@@ -2885,6 +2888,7 @@ sub bodytag {
     } else {
         $role = &Apache::lonnet::plaintext($role);
     }
+
     if (!$realm) { $realm='&nbsp;'; }
 # Set messages
     my $messages=&domainlogo($domain);
@@ -2913,6 +2917,11 @@ sub bodytag {
     }
 
     my $name = &plainname($env{'user.name'},$env{'user.domain'});
+    if ($env{'user.name'} eq 'public' && $env{'user.domain'} eq 'public') {
+	undef($role);
+    } else {
+	$name = &aboutmewrapper($name,$env{'user.name'},$env{'user.domain'});
+    }
     
     my $roleinfo=(<<ENDROLE);
 <td class="LC_title_bar_who">
@@ -3262,14 +3271,18 @@ table#LC_top_nav td a, div#LC_top_nav a
 }
 table#LC_top_nav td.LC_top_nav_logo {
   background: $tabbg;
-  text-align: right;
+  text-align: left;
   white-space: nowrap;
-  font-weight: bold;
+  width: 31px;
 }
 table#LC_top_nav td.LC_top_nav_logo img {
-  margin-left: 0.2em;
+  border: 0px;
   vertical-align: bottom;
 }
+table#LC_top_nav td.LC_top_nav_exit,
+table#LC_top_nav td.LC_top_nav_help {
+  width: 2.0em;
+}
 table.LC_breadcrumbs td, table.LC_docs_path td  {
   background: $tabbg;
   color: $font;