Rename vars to be more consistent

environments/ppa-mbqj77/deployments/741^2
Christophe Maudoux 6 years ago
parent 05cd4d4a58
commit 95c08b89e7
  1. 14
      lemonldap-ng-manager/lib/Lemonldap/NG/Manager/Viewer.pm

@ -25,9 +25,9 @@ sub addRoutes {
my ( $self, $conf ) = @_;
$self->ua( Lemonldap::NG::Common::UserAgent->new($conf) );
my $hiddenPK = '';
$hiddenPK = $self->{viewerHiddenKeys};
my @enabledPK = ();
my $hiddenKeys = '';
$hiddenKeys = $self->{viewerHiddenKeys};
my @enabledKeys = ();
my @keys = qw(virtualHosts samlIDPMetaDataNodes samlSPMetaDataNodes
applicationList oidcOPMetaDataNodes oidcRPMetaDataNodes
casSrvMetaDataNodes casAppMetaDataNodes
@ -37,12 +37,12 @@ sub addRoutes {
foreach (@keys) {
# Ignore hidden ConfTree Primary Keys
push @enabledPK, $_
unless ( $hiddenPK =~ /\b$_\b/ );
push @enabledKeys, $_
unless ( $hiddenKeys =~ /\b$_\b/ );
}
# Forbid hidden keys
foreach ( split /\s+/, $hiddenPK ) {
foreach ( split /\s+/, $hiddenKeys ) {
$self->addRoute(
view => { ':cfgNum' => { $_ => 'rejectKey' } },
['GET']
@ -57,7 +57,7 @@ sub addRoutes {
# Special keys
->addRoute(
view => {
':cfgNum' => \@enabledPK
':cfgNum' => \@enabledKeys
},
['GET']
)

Loading…
Cancel
Save