dani/lemonldap-ng
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Avoid circular references (#820)

Browse Source
This commit is contained in:
Xavier Guimard 2016-02-03 21:54:50 +00:00
parent b59b728e6a
commit 769e6f19f9
2 changed files with 28 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

31
lemonldap-ng-manager/lib/Lemonldap/NG/Manager/Attributes.pm
View File

@ -818,8 +818,15 @@ qr/^(?:(?:(?:(?:[a-zA-Z0-9][-a-zA-Z0-9]*)?[a-zA-Z0-9])[.])*(?:[a-zA-Z][-a-zA-Z0-
},
'groups' => {
'default' => {},
'test' => $VAR1->{'grantSessionRules'}{'keyTest'},
'type' => 'keyTextContainer'
'test' => sub {
my $s = eval {
do {
$_[0];
}
};
return $@ ? ( 0, "__badExpression__: $@" ) : 1;
},
'type' => 'keyTextContainer'
},
'hiddenAttributes' => {
'default' => '_password',
@ -1074,8 +1081,15 @@ qr/^(?:(?:(?:(?:[a-zA-Z0-9][-a-zA-Z0-9]*)?[a-zA-Z0-9])[.])*(?:[a-zA-Z][-a-zA-Z0-
'macros' => {
'default' => {},
'keyTest' => qr/^[_a-zA-Z][a-zA-Z0-9_]*$/,
'test' => $VAR1->{'grantSessionRules'}{'keyTest'},
'type' => 'keyTextContainer'
'test' => sub {
my $s = eval {
do {
$_[0];
}
};
return $@ ? ( 0, "__badExpression__: $@" ) : 1;
},
'type' => 'keyTextContainer'
},
'mailBody' => {
'type' => 'longtext'
@ -1668,7 +1682,14 @@ qr/^(?:(?:(?:(?:[a-zA-Z0-9][-a-zA-Z0-9]*)?[a-zA-Z0-9])[.])*(?:[a-zA-Z][-a-zA-Z0-
'type' => 'portalskinbackground'
},
'portalSkinRules' => {
'keyTest' => $VAR1->{'grantSessionRules'}{'keyTest'},
'keyTest' => sub {
my $s = eval {
do {
$_[0];
}
};
return $@ ? ( 0, "__badExpression__: $@" ) : 1;
},
'msgFail' => '__badValue__',
'test' => qr/^\w+$/,
'type' => 'keyTextContainer'

3
lemonldap-ng-manager/lib/Lemonldap/NG/Manager/Build.pm
View File

@ -56,7 +56,8 @@ $Data::Dumper::Sortkeys = sub {
];
};
$Data::Dumper::Deparse = 1;
$Data::Dumper::Deparse = 1;
$Data::Dumper::Deepcopy = 1;
sub run {
my $self = shift;