188 |
|
|
189 |
require Whatpm::ContentChecker; |
require Whatpm::ContentChecker; |
190 |
my $onerror = sub { |
my $onerror = sub { |
191 |
$result->add_error (@_, layer => 'structure'); |
$result->add_error (layer => 'structure', @_); |
192 |
}; |
}; |
193 |
|
|
194 |
my $onsubdoc = $self->onsubdoc; |
my $onsubdoc = $self->onsubdoc; |
253 |
$index = $index ? $index . '.' . $i : $i; |
$index = $index ? $index . '.' . $i : $i; |
254 |
$out->start_section (id => 'table-' . $i, |
$out->start_section (id => 'table-' . $i, |
255 |
title => 'Table #', |
title => 'Table #', |
256 |
text => $index); |
text => $index, |
257 |
|
notab => 1); |
258 |
|
|
259 |
$out->start_tag ('dl'); |
$out->start_tag ('dl'); |
260 |
$out->dt ('Table Element'); |
$out->dt ('Table Element'); |
377 |
$out->start_tag ('dt'); |
$out->start_tag ('dt'); |
378 |
$out->node_link ($triple->[0]); |
$out->node_link ($triple->[0]); |
379 |
$out->start_tag ('dd'); |
$out->start_tag ('dd'); |
380 |
$out->text ('Subject: '); |
$out->nl_text ('Subject'); |
381 |
|
$out->text (': '); |
382 |
$generate_rdf_resource_html->($triple->[1] => $out); |
$generate_rdf_resource_html->($triple->[1] => $out); |
383 |
$out->start_tag ('dd'); |
$out->start_tag ('dd'); |
384 |
$out->text ('Predicate: '); |
$out->nl_text ('Predicate'); |
385 |
|
$out->text (': '); |
386 |
$generate_rdf_resource_html->($triple->[2] => $out); |
$generate_rdf_resource_html->($triple->[2] => $out); |
387 |
$out->start_tag ('dd'); |
$out->start_tag ('dd'); |
388 |
$out->text ('Object: '); |
$out->nl_text ('Object'); |
389 |
|
$out->text (': '); |
390 |
$generate_rdf_resource_html->($triple->[3] => $out); |
$generate_rdf_resource_html->($triple->[3] => $out); |
391 |
} |
} |
392 |
$out->end_tag ('dl'); |
$out->end_tag ('dl'); |