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

make tidy

Browse Source
This commit is contained in:
Xavier Guimard 2010-10-04 17:27:32 +00:00
parent 030da0ee57
commit cc2fbdf7d1
2 changed files with 19 additions and 19 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
modules/lemonldap-ng-manager/lib/Lemonldap/NG/Manager/Uploader.pm
View File

@ -361,19 +361,19 @@ s/^(samlSPMetaDataXML|samlSPMetaDataExportedAttributes|samlSPMetaDataOptions)\/(
{
my $tests = $self->globalTests($newConf);
while ( my ( $name, $sub ) = each %$tests ) {
my ( $res, $msg );
eval {
( $res, $msg ) = $sub->();
if ($res) {
if ($msg) {
my ( $res, $msg );
eval {
( $res, $msg ) = $sub->();
if ($res) {
if ($msg) {
$errors->{warnings}->{$name} = $msg;
}
}
}
else {
$errors->{error}->{$name} = $msg;
}
};
$errors->{warnings}->{$name} = "Test $name failed: $@" if($@);
else {
$errors->{error}->{$name} = $msg;
}
};
$errors->{warnings}->{$name} = "Test $name failed: $@" if ($@);
}
}

16
modules/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/OpenID/SREG.pm
View File

@ -235,16 +235,16 @@ sub sregfilter {
}
# Warn if some parameters are rejected
if (@rej) {
$self->lmLog(
"Requested parameter(s) "
. join( ',', @rej )
. "is(are) not valid OpenID SREG parameter(s)",
if (@rej) {
$self->lmLog(
"Requested parameter(s) "
. join( ',', @rej )
. "is(are) not valid OpenID SREG parameter(s)",
'warn'
);
}
);
}
# Return valid SREG parameters
return @ret;
return @ret;
}
1;