--- loncom/lonnet/perl/lonnet.pm 2023/11/17 17:02:22 1.1518 +++ loncom/lonnet/perl/lonnet.pm 2023/11/18 14:33:07 1.1519 @@ -1,7 +1,7 @@ # The LearningOnline Network # TCP networking package # -# $Id: lonnet.pm,v 1.1518 2023/11/17 17:02:22 raeburn Exp $ +# $Id: lonnet.pm,v 1.1519 2023/11/18 14:33:07 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -7053,7 +7053,11 @@ sub rolesinit { $gotcoauconfig{$area} = 1; foreach my $item (@ca_settings) { if (exists($info{$item})) { - $coauthorenv{"environment.internal.$item.$area"} = $info{$item}; + my $name = $item; + if ($item eq 'authoreditors') { + $name = 'editors'; + } + $coauthorenv{"environment.internal.$name.$area"} = $info{$item}; } } }