fix problem with test reporting errors on programmatically generated content on body tags
This commit is contained in:
parent
9287458443
commit
17308e72aa
1 changed files with 10 additions and 3 deletions
|
|
@ -169,13 +169,20 @@ sub getHelpLabels {
|
||||||
foreach my $topic ( keys %helpTable ) {
|
foreach my $topic ( keys %helpTable ) {
|
||||||
foreach my $entry ( keys %{ $helpTable{$topic} }) {
|
foreach my $entry ( keys %{ $helpTable{$topic} }) {
|
||||||
##Check the title and body data
|
##Check the title and body data
|
||||||
foreach my $tag ('title','body') {
|
push @helpLabels, {
|
||||||
|
topic=>$topic,
|
||||||
|
entry=>$entry,
|
||||||
|
tag=>'title',
|
||||||
|
namespace=>$topic, ##default
|
||||||
|
label=>$helpTable{$topic}{$entry}{'title'},
|
||||||
|
};
|
||||||
|
if (ref $helpTable{$topic}{$entry}{'body'} ne 'CODE') {
|
||||||
push @helpLabels, {
|
push @helpLabels, {
|
||||||
topic=>$topic,
|
topic=>$topic,
|
||||||
entry=>$entry,
|
entry=>$entry,
|
||||||
tag=>$tag,
|
tag=>'body',
|
||||||
namespace=>$topic, ##default
|
namespace=>$topic, ##default
|
||||||
label=>$helpTable{$topic}{$entry}{$tag},
|
label=>$helpTable{$topic}{$entry}{'body'},
|
||||||
};
|
};
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue