--- loncom/interface/loncommon.pm	2006/12/28 15:49:15	1.499
+++ loncom/interface/loncommon.pm	2007/01/15 18:04:12	1.500
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # a pile of common routines
 #
-# $Id: loncommon.pm,v 1.499 2006/12/28 15:49:15 albertel Exp $
+# $Id: loncommon.pm,v 1.500 2007/01/15 18:04:12 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -3344,7 +3344,7 @@ sub bodytag {
     my ($role,$realm) = split(/\./,$env{'request.role'},2);
     if ($role  eq 'ca') {
         my ($rdom,$rname) = ($realm =~ m{^/($match_domain)/($match_username)$});
-        $realm = &plainname($rname,$rdom).':'.$rdom;
+        $realm = &plainname($rname,$rdom);
     } 
 # realm
     if ($env{'request.course.id'}) {