blob: c284008f6ce4328fa86f2f05e5ed584e2d690ad2 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
use 5.006;
use strict;
use warnings FATAL => 'all';
use Test::More;
BEGIN {
use_ok( 'ManaTools::Shared::Locales' ) || print "Locales failed!\n";
}
ok( my $o = ManaTools::Shared::Locales->new({domain_name => 'manatools'}), 'create');
is( $o->N_("test"), 'test', 'N_' );
ok(my $cr = $o->N("Copyright (C) %s Mageia community", '2012-2015'), 'N');
diag "Copyright string is: < " . ($cr ? $cr : "none") . " >";
done_testing;
|
