[LON-CAPA-cvs] cvs: loncom /interface loncommon.pm

albertel lon-capa-cvs@mail.lon-capa.org
Mon, 15 Jan 2007 18:04:13 -0000


albertel		Mon Jan 15 13:04:13 2007 EDT

  Modified files:              
    /loncom/interface	loncommon.pm 
  Log:
  - bug#5145
  
  
Index: loncom/interface/loncommon.pm
diff -u loncom/interface/loncommon.pm:1.499 loncom/interface/loncommon.pm:1.500
--- loncom/interface/loncommon.pm:1.499	Thu Dec 28 10:49:15 2006
+++ loncom/interface/loncommon.pm	Mon Jan 15 13:04:12 2007
@@ -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 @@
     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'}) {