--- loncom/interface/loncommon.pm	2006/07/19 10:52:27	1.432
+++ loncom/interface/loncommon.pm	2006/07/19 10:58:31	1.433
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.432 2006/07/19 10:52:27 albertel Exp $
+# $Id: loncommon.pm,v 1.433 2006/07/19 10:58:31 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -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=' '; }
 # Set messages
     my $messages=&domainlogo($domain);
@@ -2913,6 +2917,9 @@ sub bodytag {
     }
 
     my $name = &plainname($env{'user.name'},$env{'user.domain'});
+    if ($env{'user.name'} eq 'public' && $env{'user.domain'} eq 'public') {
+	undef($role);
+    }
     
     my $roleinfo=(<<ENDROLE);
 <td class="LC_title_bar_who">