135 |
$out->start_tag ('li', id => 'line-1'); |
$out->start_tag ('li', id => 'line-1'); |
136 |
} |
} |
137 |
$out->end_tag ('ol'); |
$out->end_tag ('ol'); |
138 |
$out->html (qq[<script> |
$out->add_source_to_parse_error_list ('parse-errors-list'); |
|
addSourceToParseErrorList ('@{[$input->id_prefix]}', 'parse-errors-list'); |
|
|
</script>]); |
|
139 |
$out->end_section |
$out->end_section |
140 |
} # generate_source_string_section |
} # generate_source_string_section |
141 |
|
|
167 |
$out->link_to_webhacc ('Check conformance of this document', url => $url); |
$out->link_to_webhacc ('Check conformance of this document', url => $url); |
168 |
$out->html ('<dd>Found in: <ul>'); |
$out->html ('<dd>Found in: <ul>'); |
169 |
for my $entry (@{$urls->{$url}}) { |
for my $entry (@{$urls->{$url}}) { |
170 |
$out->html (qq[<li>] . $result->get_node_link ($input, $entry->{node})); |
$out->start_tag ('li'); |
171 |
|
$out->node_link ($entry->{node}); |
172 |
if (keys %{$entry->{type} or {}}) { |
if (keys %{$entry->{type} or {}}) { |
173 |
$out->text (' ('); |
$out->text (' ('); |
174 |
$out->text (join ', ', map { |
$out->text (join ', ', map { |