--- loncom/interface/lonuserutils.pm 2011/08/05 14:46:58 1.136 +++ loncom/interface/lonuserutils.pm 2012/04/25 21:05:30 1.137 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Utility functions for managing LON-CAPA user accounts # -# $Id: lonuserutils.pm,v 1.136 2011/08/05 14:46:58 raeburn Exp $ +# $Id: lonuserutils.pm,v 1.137 2012/04/25 21:05:30 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1422,7 +1422,8 @@ sub curr_role_permissions { sub my_custom_roles { my ($crstype) = @_; my %returnhash=(); - my %rolehash=&Apache::lonnet::dump('roles'); + my $extra = &Apache::lonnet::freeze_escape({'skipcheck' => 1}); + my %rolehash=&Apache::lonnet::dump('roles',undef,undef,'.',undef,$extra); foreach my $key (keys(%rolehash)) { if ($key=~/^rolesdef\_(\w+)$/) { if ($crstype eq 'Community') {