diff --git a/t/i18n/label.t b/t/i18n/label.t index 8b7f26721..5775a26f8 100644 --- a/t/i18n/label.t +++ b/t/i18n/label.t @@ -19,6 +19,7 @@ use WebGUI::International; use WebGUI::Session; use Text::Balanced qw(extract_codeblock); use File::Find; +use Data::Dumper; #The goal of this test is to locate all of the international labels that it #can and verify that they exist in all loaded language models @@ -69,6 +70,7 @@ my @sqlLabels; my @libLabels; my @objLabels; + @helpLabels = getHelpLabels(); #@sqlLabels = getSQLLabels(); @@ -208,10 +210,10 @@ sub getHelpLabels { push @helpLabels, { topic=>$topic, entry=>$entry, - tag=>'fields', + tag=>'variables', namespace=>$namespace, label=>$variable->{description}, - } if exists $variable->{description}; + } if $variable->{description}; } } }