--- loncom/interface/domainprefs.pm	2016/10/05 13:59:46	1.282
+++ loncom/interface/domainprefs.pm	2016/10/25 12:45:33	1.283
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # Handler to set domain-wide configuration settings
 #
-# $Id: domainprefs.pm,v 1.282 2016/10/05 13:59:46 raeburn Exp $
+# $Id: domainprefs.pm,v 1.283 2016/10/25 12:45:33 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -11853,13 +11853,15 @@ sub modify_helpsettings {
         $rolename=~s/[^A-Za-z0-9]//gs;
         if ($rolename ne '') {
             unless(exists($existing{'rolesdef_'.$rolename})) {
-                my $errmsg;
-                my $result = &Apache::lonuserutils::store_custom_role($rolename,$prefix,
-                                                                      $confname,$dom);
+                my %newprivs = &Apache::lonuserutils::custom_role_update($rolename,$prefix);
+                my $result = &Apache::lonnet::definerole($rolename,$newprivs{'s'},$newprivs{'d'},
+                                                         $newprivs{'c'},$confname,$dom);
                 if ($result eq 'ok') {
                     $changes{'newcustomrole'} = $rolename;
                 } else {
-                    $errmsg = ': '.$result;
+                    $errors .= '<li><span class="LC_error">'.
+                               &mt('An error occurred storing the new custom role: [_1]',
+                                   $result).'</span></li>';
                 }
             }
         }