--- loncom/lonnet/perl/lonnet.pm 2022/01/03 04:56:27 1.1477 +++ loncom/lonnet/perl/lonnet.pm 2022/02/01 19:10:54 1.1478 @@ -1,7 +1,7 @@ # The LearningOnline Network # TCP networking package # -# $Id: lonnet.pm,v 1.1477 2022/01/03 04:56:27 raeburn Exp $ +# $Id: lonnet.pm,v 1.1478 2022/02/01 19:10:54 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -8155,7 +8155,7 @@ sub allowed { $uri=&declutter($uri); if ($priv eq 'evb') { -# Evade communication block restrictions for specified role in a course +# Evade communication block restrictions for specified role in a course or domain if ($env{'user.priv.'.$role} =~/evb\&([^\:]*)/) { return $1; } else {