Give the different kinds of labels (subroutine i18n vs object i18n) different textual labels

for better diagnostics.
This commit is contained in:
Colin Kuskie 2008-05-20 18:58:13 +00:00
parent b6b23a4163
commit 5640ea4079

View file

@ -84,12 +84,12 @@ my $i18n = WebGUI::International->new($session);
foreach my $label ( @libLabels ) {
ok(0,
sprintf "label: %s->%s inside %s", @{ $label }{'namespace', 'label', 'file', });
sprintf "sub label: %s->%s inside %s", @{ $label }{'namespace', 'label', 'file', });
}
foreach my $label ( @objLabels ) {
ok($i18n->get(@{ $label }{qw(label namespace )} ),
sprintf "label: %s->%s inside %s", @{ $label }{'namespace', 'label', 'file', });
sprintf "obj label: %s->%s inside %s", @{ $label }{'namespace', 'label', 'file', });
}
sub label_finder_pm {