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

Tests

Browse Source
This commit is contained in:
Xavier Guimard 2010-10-14 10:25:50 +00:00
parent 51d4c67f11
commit 038c312200
3 changed files with 7 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
modules/lemonldap-ng-portal/lib/Lemonldap/NG/Portal/_i18n.pm
View File

@ -348,7 +348,6 @@ sub error_ro {
'Problemă la încărcarea unui furnizor de servicii',
'A apărut o eroare în timpul schimbului de SAML atribute',
'Această pagină este proiectat pentru servere OpenID',
'Când încercaţi să utilizaţi o identitate OpenID care nu este a ta',
'Când încercaţi să utilizaţi o identitate OpenID care nu vă aparţine',
'Un atribut solicitate nu sunt disponibile',
'Federation forbidden by security policy',

7
modules/lemonldap-ng-portal/t/10-Lemonldap-NG-Portal-i18n.t
View File

@ -8,6 +8,8 @@
BEGIN {
our %tr_err = (
fr => 'French',
# Not yet maintained
ro => 'Romanian',
);
our %tr_msg = ( fr => 'French', );
@ -25,7 +27,7 @@ foreach ( keys %tr_err ) {
my @tmp;
ok( @tmp = @{ &{"Lemonldap::NG::Portal::_i18n::error_$_"} },
"$tr_err{$_} translation" );
ok( $#tmp == $#en, "$tr_err{$_} translation count" );
ok( $#tmp == $#en, "$tr_err{$_} translation count (" . scalar(@tmp) . ')' );
}
my $p = bless {}, 'Lemonldap::NG::Portal::Simple';
@ -43,5 +45,6 @@ foreach ( keys %tr_msg ) {
my @tmp;
ok( @tmp = @{ &{"Lemonldap::NG::Portal::_i18n::msg_$_"} },
"$tr_msg{$_} messages translation" );
ok( $#tmp == $#en, "$tr_msg{$_} messages translation count" );
ok( $#tmp == $#en,
"$tr_msg{$_} messages translation count (" . scalar(@tmp) . ')' );
}

3
modules/lemonldap-ng-portal/t/27-Lemonldap-NG-Portal-IssuerDBOpenID.t
View File

@ -1,6 +1,6 @@
package My::Portal;
use Test::More tests => 13;
use Test::More tests => 14;
use strict;
our @ISA = qw(Lemonldap::NG::Portal::IssuerDBOpenID
@ -39,6 +39,7 @@ SKIP: {
uid => 'test',
mail => 'x.x.org'
},
whatToTrace => 'uid',
},
__PACKAGE__;