Update LocalAuth.pm

Bug-fix in getUsersWithRoleForGroup .
dmwm · Feb 20, 2019 · ef06058 · ef06058
1 parent 625a1be
commit ef06058
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/perl_lib/PHEDEX/Web/LocalAuth.pm b/perl_lib/PHEDEX/Web/LocalAuth.pm
@@ -499,6 +499,7 @@ sub getUsersWithRoleForGroup {
     local $/ = undef;
     $json_people = <F>;
   }
+  $people = decode_json($json_people);
   foreach my $entry (@{$grouproles->{'result'}}) {
     if ( $group eq ${$entry}[1]  &&  $role eq ${$entry}[2] ) {
       # look up user, assuming login name is unique: