[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
texinfo/tp Texinfo/Convert/HTML.pm t/html_tests...
|
From: |
Patrice Dumas |
|
Subject: |
texinfo/tp Texinfo/Convert/HTML.pm t/html_tests... |
|
Date: |
Sun, 02 Oct 2011 19:11:59 +0000 |
CVSROOT: /sources/texinfo
Module name: texinfo
Changes by: Patrice Dumas <pertusus> 11/10/02 19:11:59
Modified files:
tp/Texinfo/Convert: HTML.pm
tp/t : html_tests.t
Added files:
tp/t/results/html_tests: commands_in_email.pl
documentdescription.pl
Log message:
Put email mail argument in string.
Do something when in string context for all the formatting functions.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/Texinfo/Convert/HTML.pm?cvsroot=texinfo&r1=1.168&r2=1.169
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/html_tests.t?cvsroot=texinfo&r1=1.8&r2=1.9
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/results/html_tests/commands_in_email.pl?cvsroot=texinfo&rev=1.1
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/results/html_tests/documentdescription.pl?cvsroot=texinfo&rev=1.1
Patches:
Index: Texinfo/Convert/HTML.pm
===================================================================
RCS file: /sources/texinfo/texinfo/tp/Texinfo/Convert/HTML.pm,v
retrieving revision 1.168
retrieving revision 1.169
diff -u -b -r1.168 -r1.169
--- Texinfo/Convert/HTML.pm 2 Oct 2011 13:15:21 -0000 1.168
+++ Texinfo/Convert/HTML.pm 2 Oct 2011 19:11:58 -0000 1.169
@@ -992,7 +992,7 @@
# default specification of arguments formatting
my %default_commands_args = (
- 'email' => [['code'], ['normal']],
+ 'email' => [['code', 'codestring'], ['normal']],
'anchor' => [['codestring']],
'uref' => [['codestring'], ['normal'], ['normal']],
'url' => [['codestring'], ['normal'], ['normal']],
@@ -1287,7 +1287,11 @@
if (!defined($text)) {
$text = '';
}
+ if ($self->in_string) {
+ return $text;
+ } else {
return $text . '<!-- /@w -->';
+ }
}
$default_commands_conversion{'w'} = \&_convert_w_command;
@@ -1314,18 +1318,22 @@
my $mail_arg = shift @$args;
my $text_arg = shift @$args;
my $mail = '';
+ my $mail_string = '';
if (defined($mail_arg)) {
$mail = $mail_arg->{'code'};
+ $mail_string = $mail_arg->{'codestring'};
}
- # $mail = main::normalise_space($mail);
my $text = '';
if (defined($text_arg)) {
$text = $text_arg->{'normal'};
- # $text = main::normalise_space($text);
}
$text = $mail unless ($text ne '');
return $text if ($mail eq '');
- return "<a href=\"mailto:$mail\";>$text</a>";
+ if ($self->in_string()) {
+ return "$mail_string ($text)";
+ } else {
+ return "<a href=\"mailto:$mail_string\";>$text</a>";
+ }
}
$default_commands_conversion{'email'} = \&_convert_email_command;
@@ -1383,7 +1391,8 @@
my $args = shift;
my $id = $self->command_id ($command);
- if (defined($id) and $id ne '' and address@hidden>{'multiple_pass'}}) {
+ if (defined($id) and $id ne '' and address@hidden>{'multiple_pass'}}
+ and !$self->in_string()) {
return "<a name=\"$id\"></a>";
}
return '';
@@ -1413,6 +1422,7 @@
$number_in_doc = $NO_NUMBER_FOOTNOTE_SYMBOL;
}
+ return "($number_in_doc)" if ($self->in_string());
#print STDERR "FOOTNOTE $command\n";
my $docid = $self->command_id($command);
my $footid = $self->command_target($command);
@@ -1491,6 +1501,7 @@
$text = $replacement if (defined($replacement) and $replacement ne '');
$text = $url if (!defined($text) or $text eq '');
return $text if (!defined($url) or $url eq '');
+ return "$text ($url)" if ($self->in_string());
return "<a href=\"$url\">$text</a>";
}
@@ -1509,6 +1520,7 @@
if (defined($args->[0]->{'codetext'}) and $args->[0]->{'codetext'} ne '') {
my $basefile = $args->[0]->{'codetext'};
+ return $basefile if ($self->in_string());
my $extension;
if (defined($args->[4]) and defined($args->[4]->{'codetext'})) {
$extension = $args->[4]->{'codetext'};
@@ -1618,8 +1630,12 @@
#print STDERR Texinfo::Parser::_print_current($command);
return '';
}
+ if (!$self->in_string()) {
return $self->xml_protect_text('<').'<code>' .$text
.'</code>'.$self->xml_protect_text('>');
+ } else {
+ return $self->xml_protect_text('<').$text.$self->xml_protect_text('>');
+ }
}
$default_commands_conversion{'indicateurl'} = \&_convert_indicateurl_command;
@@ -1681,9 +1697,16 @@
my $command = shift;
return '' if ($text !~ /\S/);
+
+ # This should seldom happen.
+ if ($self->in_string()) {
+ $text .= "\n" unless ($cmdname eq 'titlefont');
+ return $text;
+ }
+
# FIXME use a class=*contents?
my $class = '';
- if ($cmdname and $cmdname !~ /contents$/) {
+ if ($cmdname !~ /contents$/) {
$class = $cmdname;
$class = 'node-heading' if ($cmdname eq 'node');
}
@@ -1691,7 +1714,7 @@
$align = ' align="center"' if ($cmdname eq 'centerchap' or $cmdname eq
'settitle');
$level = 1 if ($level == 0);
my $result = $self->_attribute_class("h$level", $class)
."$align>$text</h$level>";
- # FIXME titlefont appears inline in text, so no end of line is
+ # titlefont appears inline in text, so no end of line is
# added. The end of line should be added by the user if needed.
$result .= "\n" unless ($cmdname eq 'titlefont');
$result .= $self->get_conf('DEFAULT_RULE') . "\n"
@@ -1824,13 +1847,11 @@
}
} elsif ($button eq ' ') {
# handle space button
- # FIXME for the alt, the second button_icon_img argument, we don't use
- # the button name (we do it for other buttons). This doesn't matter much
- # however, as ' ' is not translated in BUTTON_NAMES.
if ($self->get_conf('ICONS') and $self->get_conf('ACTIVE_ICONS')
and defined($self->get_conf('ACTIVE_ICONS')->{$button})
and $self->get_conf('ACTIVE_ICONS')->{$button} ne '') {
- $active = &{$self->{'button_icon_img'}}($self, $button,
+ my $button_name = $self->get_conf('BUTTONS_NAME')->{$button};
+ $active = &{$self->{'button_icon_img'}}($self, $button_name,
$self->get_conf('ACTIVE_ICONS')->{' '});
} else {
$active = $self->get_conf('BUTTONS_TEXT')->{$button};
@@ -2017,18 +2038,17 @@
my $args = shift;
my $content = shift;
- my $content_ref = '';
- if ($self->get_conf('TOC_LINKS')) {
- my $content_href = $self->command_contents_href($command, 'contents',
- $self->{'current_filename'});
- if ($content_href) {
- $content_ref = " href=\"$content_href\"";
- }
- }
my $result = '';
+
+ # not clear that it may really happen
+ if ($self->in_string) {
+ $result .= $self->command_string($command) ."\n" if ($cmdname ne 'node');
+ $result .= $content if (defined($content));
+ return $result;
+ }
+
my $element_id = $self->command_id($command);
- # FIXME a href here doesn't make sense, there is no text?
- $result .= "<a name=\"$element_id\"${content_ref}></a>\n"
+ $result .= "<a name=\"$element_id\"></a>\n"
if (defined($element_id) and $element_id ne '');
print STDERR "Process $command "
@@ -2109,6 +2129,16 @@
# $heading not defined may happen if the command is a @node, for example
# if there is an error in the node.
if (defined($heading) and $heading ne '' and defined($heading_level)) {
+
+ if ($self->get_conf('TOC_LINKS') and $root_commands{$cmdname}
+ and $sectioning_commands{$cmdname}) {
+ my $content_href = $self->command_contents_href($command, 'contents',
+ $self->{'current_filename'});
+ if ($content_href) {
+ $heading = "<a href=\"$content_href\">$heading</a>";
+ }
+ }
+
if ($self->in_preformatted()) {
$result .= '<strong>'.$heading.'</strong>'."\n";
} else {
@@ -2141,6 +2171,8 @@
chomp ($content);
return $content;
# FIXME compatibility with texi2html
+ } elsif ($self->in_string()) {
+ return $self->xml_protect_text($content);
} elsif ($cmdname eq 'tex') {
return $self->_attribute_class('pre', $cmdname).'>'
.$self->xml_protect_text($content) . '</pre>';
@@ -2162,7 +2194,7 @@
my $command = shift;
my $content = shift;
- if ($content ne '') {
+ if ($content ne '' and !$self->in_string()) {
if ($self->get_conf('COMPLEX_FORMAT_IN_TABLE')) {
if ($indented_preformatted_commands{$cmdname}) {
return
'<table><tr><td> </td><td>'.$content."</td></tr></table>\n";
@@ -2173,7 +2205,7 @@
return $self->_attribute_class('div',
$cmdname).">\n".$content.'</div>'."\n";
}
} else {
- return '';
+ return $content;
}
}
@@ -2189,8 +2221,12 @@
my $command = shift;
my $content = shift;
+ if (!$self->in_string) {
return $self->_attribute_class('pre', $cmdname).'>'
.$content . '</pre>';
+ } else {
+ return $content;
+ }
}
$default_commands_conversion{'verbatim'} = \&_convert_verbatim_command;
@@ -2238,7 +2274,7 @@
if (defined($command->{'extra'}->{'misc_args'}->[0])) {
my $sp_nr = $command->{'extra'}->{'misc_args'}->[0];
- if ($self->in_preformatted()) {
+ if ($self->in_preformatted() or $self->in_string()) {
return "\n" x $sp_nr;
} else {
return "<br>\n" x $sp_nr;
@@ -2258,7 +2294,7 @@
# FIXME do something better with css and span?
my $preformatted = $self->in_preformatted();
- if ($preformatted) {
+ if ($self->in_preformatted() or $self->in_string()) {
return $self->_convert_preformatted_type($cmdname, $command,
$args->[0]->{'normal'} ."\n");
} else {
@@ -2276,9 +2312,7 @@
my $command = shift;
my $args = shift;
- my $preformatted = $self->in_preformatted();
-
- if ($preformatted) {
+ if ($self->in_preformatted() or $self->in_string()) {
return $self->_convert_preformatted_type($cmdname, $command,
$args->[0]->{'normal'} ."\n");
} else {
@@ -2296,7 +2330,11 @@
my $args = shift;
return '' if (!$args->[0] or !$command->{'extra'}->{'titlepage'});
+ if (!$self->in_string()) {
return "<strong>$args->[0]->{'normal'}</strong><br>\n";
+ } else {
+ return $args->[0]->{'normal'}."\n";
+ }
}
$default_commands_conversion{'author'} = \&_convert_author_command;
@@ -2308,7 +2346,11 @@
my $command = shift;
my $args = shift;
return '' if (!$args->[0]);
+ if (!$self->in_string()) {
return "<h1>$args->[0]->{'normal'}</h1>\n";
+ } else {
+ return $args->[0]->{'normal'};
+ }
}
$default_commands_conversion{'title'} = \&_convert_title_command;
@@ -2319,7 +2361,11 @@
my $command = shift;
my $args = shift;
return '' if (!$args->[0]);
+ if (!$self->in_string()) {
return "<h3 align=\"right\">$args->[0]->{'normal'}</h3>\n";
+ } else {
+ return $args->[0]->{'normal'};
+ }
}
$default_commands_conversion{'subtitle'} = \&_convert_subtitle_command;
@@ -2345,7 +2391,8 @@
my $command = shift;
my $args = shift;
- if ($command->{'extra'} and $command->{'extra'}->{'type'}
+ if (!$self->in_string()
+ and $command->{'extra'} and $command->{'extra'}->{'type'}
and defined($command->{'extra'}->{'type'}->{'normalized'})
and $self->{'floats'}
and $self->{'floats'}->{$command->{'extra'}->{'type'}->{'normalized'}}
@@ -2418,6 +2465,9 @@
if ($content !~ /\S/) {
return '';
}
+ if ($self->in_string()) {
+ return $content;
+ }
my $begin_row = '';
my $end_row = '';
if ($self->_in_preformatted_in_menu()) {
@@ -2442,6 +2492,23 @@
my $args = shift;
my $content = shift;
+ my ($caption, $prepended) = Texinfo::Common::float_name_caption($self,
+ $command);
+ my $caption_text = '';
+ my $prepended_text;
+ if ($self->in_string()) {
+ if ($prepended) {
+ $prepended_text = $self->convert_tree ($prepended);
+ } else {
+ $prepended_text = '';
+ }
+ if ($caption) {
+ $caption_text = $self->convert_tree ({'contents'
+ => $caption->{'args'}->[0]->{'contents'}});
+ }
+ return $prepended.$content.$caption_text;
+ }
+
my $id = $self->command_id($command);
my $label;
if (defined($id) and $id ne '') {
@@ -2450,10 +2517,6 @@
$label = '';
}
- my ($caption, $prepended) = Texinfo::Common::float_name_caption($self,
- $command);
- my $caption_text = '';
- my $prepended_text;
if ($prepended) {
if ($caption) {
my @caption_original_contents = @{$caption->{'args'}->[0]->{'contents'}};
@@ -2519,8 +2582,12 @@
$attribution .= $self->convert_tree($centered_author);
}
}
+ if (!$self->in_string()) {
return $self->_attribute_class('blockquote', $class).">\n" .$content
."</blockquote>\n" . $attribution;
+ } else {
+ return $content.$attribution;
+ }
}
$default_commands_conversion{'quotation'} = \&_convert_quotation_command;
$default_commands_conversion{'smallquotation'} = \&_convert_quotation_command;
@@ -2532,11 +2599,11 @@
my $command = shift;
my $content = shift;
- if ($content =~ /\S/) {
+ if ($content =~ /\S/ and !$self->in_string()) {
return $self->_attribute_class('table', 'cartouche')
." border=\"1\"><tr><td>\n". $content ."</td></tr></table>\n";
}
- return '';
+ return $content;
}
$default_commands_conversion{'cartouche'} = \&_convert_cartouche_command;
@@ -2548,6 +2615,9 @@
my $command = shift;
my $content = shift;
+ if ($self->in_string()) {
+ return $content;
+ }
if ($command->{'extra'}->{'command_as_argument'}
and $command->{'extra'}->{'command_as_argument'}->{'cmdname'} eq
'bullet') {
return "<ul>\n" . $content. "</ul>\n";
@@ -2566,6 +2636,9 @@
my $command = shift;
my $content = shift;
+ if ($self->in_string()) {
+ return $content;
+ }
if ($content ne '') {
return "<ol>\n" . $content . "</ol>\n";
} else {
@@ -2582,6 +2655,9 @@
my $command = shift;
my $content = shift;
+ if ($self->in_string()) {
+ return $content;
+ }
if ($content =~ /\S/) {
return "<table>\n" . $content . "</table>\n";
} else {
@@ -2598,6 +2674,9 @@
my $command = shift;
my $content = shift;
+ if ($self->in_string()) {
+ return $content;
+ }
if ($content ne '') {
return "<dl compact=\"compact\">\n" . $content . "</dl>\n";
} else {
@@ -2615,6 +2694,9 @@
my $command = shift;
my $content = shift;
+ if ($self->in_string()) {
+ return $content;
+ }
if ($command->{'parent'}->{'cmdname'}
and $command->{'parent'}->{'cmdname'} eq 'itemize') {
my $prepend ;
@@ -2716,6 +2798,9 @@
$content =~ s/^\s*//;
$content =~ s/\s*$//;
+ if ($self->in_string()) {
+ return $content;
+ }
if ($row_cmdname eq 'headitem') {
return "<th${fractions}>" . $content . '</th>';
} else {
@@ -2783,7 +2868,8 @@
}
}
my $reference = $name;
- $reference = "<a href=\"$href\">$name</a>" if ($href ne '');
+ $reference = "<a href=\"$href\">$name</a>" if ($href ne ''
+ and !$self->in_string());
# maybe use {'extra'}->{'node_argument'}?
my $is_section = ($command->{'cmdname'} ne 'node'
@@ -2847,7 +2933,8 @@
$name = '' if (!defined($name));
my $reference = $name;
- $reference = "<a href=\"$href\">$name</a>" if ($href ne '');
+ $reference = "<a href=\"$href\">$name</a>" if ($href ne ''
+ and !$self->in_string());
if ($cmdname eq 'pxref') {
if (($book ne '') and ($href ne '')) {
@@ -2927,7 +3014,9 @@
my $args = shift;
my $index_id = $self->command_id ($command);
- if (defined($index_id) and $index_id ne '' and
address@hidden>{'multiple_pass'}}) {
+ if (defined($index_id) and $index_id ne ''
+ and address@hidden>{'multiple_pass'}}
+ and !$self->in_string()) {
my $result = "<a name=\"$index_id\"></a>";
$result .= "\n" unless ($self->in_preformatted());
return $result;
@@ -2964,6 +3053,7 @@
# print STDERR " ".join('|', keys(%$index_entry))."|||
$index_entry->{'key'}\n";
# }
#}
+ return '' if ($self->in_string());
$self->_new_document_context($cmdname);
@@ -3140,6 +3230,7 @@
my $cmdname = shift;
my $command = shift;
+ return '' if ($self->in_string());
$cmdname = 'shortcontents' if ($cmdname eq 'summarycontents');
$self->_informative_command($command);
@@ -3219,6 +3310,7 @@
}
}
}
+ return $content if ($self->in_string());
if ($content =~ /\S/) {
my $align = $self->in_align();
@@ -3294,6 +3386,9 @@
and !$self->_in_preformatted_in_menu()) {
return $content;
}
+ if ($self->in_string()) {
+ return $content;
+ }
my $result = $self->_attribute_class('pre',
$pre_class).">".$content."</pre>";
# this may happen with empty lines between a def* and def*x.
@@ -3398,6 +3493,7 @@
my $command = shift;
my $content = shift;
+ return $content if ($self->in_string());
if ($content =~ /\S/) {
my $row_cmdname = $command->{'contents'}->[0]->{'cmdname'};
if ($row_cmdname eq 'headitem') {
@@ -3448,7 +3544,7 @@
my $MENU_SYMBOL = $self->get_conf('MENU_SYMBOL');
my $MENU_ENTRY_COLON = $self->get_conf('MENU_ENTRY_COLON');
- if ($self->_in_preformatted_in_menu()) {
+ if ($self->_in_preformatted_in_menu() or $self->in_string()) {
my $result = '';
my $i = 0;
my @args = @{$command->{'args'}};
@@ -3459,7 +3555,7 @@
if ($arg->{'type'} and $arg->{'type'} eq 'menu_entry_node') {
my $name = $self->convert_tree(
{'type' => '_code', 'contents' => $arg->{'contents'}});
- if ($href ne '') {
+ if ($href ne '' and !$self->in_string()) {
$result .= "<a href=\"$href\"$accesskey>".$name."</a>";
} else {
$result .= $name;
@@ -3565,7 +3661,7 @@
my $command = shift;
my $content = shift;
- if ($self->_in_preformatted_in_menu()) {
+ if ($self->_in_preformatted_in_menu() or $self->in_string()) {
return $content;
} else {
return "<tr><th colspan=\"3\" align=\"left\" valign=\"top\">".$content
@@ -3583,6 +3679,7 @@
my $content = shift;
return '' if ($content !~ /\S/);
+ return $content if ($self->in_string());
my $top_format = $self->top_format();
if ($top_format eq 'itemize' or $top_format eq 'enumerate') {
return '<li>'. $content .'</li>';
@@ -3608,6 +3705,11 @@
my $command = shift;
my $content = shift;
+ if ($self->in_string()) {
+ return $self->xml_protect_text (Texinfo::Convert::Text::convert(
+ $command, Texinfo::Common::_convert_text_options($self)));
+ }
+
my $category_prepared = '';
if ($command->{'extra'} and $command->{'extra'}->{'def_args'}
and @{$command->{'extra'}->{'def_args'}}) {
@@ -3666,6 +3768,7 @@
my $command = shift;
my $content = shift;
+ return $content if ($self->in_string());
if ($content =~ /\S/) {
if (! $self->get_conf('DEF_TABLE')) {
return '<dd>' . $content . '</dd>';
@@ -3684,6 +3787,7 @@
my $command = shift;
my $content = shift;
+ return $content if ($self->in_string());
#print STDERR "IIII $self $cmdname command $command args $args content
$content\n";
if (!$self->get_conf('DEF_TABLE')) {
return "<dl>\n". $content ."</dl>\n";
@@ -3703,6 +3807,7 @@
my $command = shift;
my $content = shift;
+ return $content if ($self->in_string());
if ($content =~ /\S/) {
return '<dd>' . $content . '</dd>'."\n";
}
@@ -3724,13 +3829,14 @@
my $result = $content;
#$result =~ s/^\s*//;
# if there is no element, the parent should not be an element
- if (defined($self->get_conf('DEFAULT_RULE'))
- and (!$command->{'parent'}
+ if (!$command->{'parent'}
or !$command->{'parent'}->{'type'}
- or $command->{'parent'}->{'type'} ne 'element')) {
+ or $command->{'parent'}->{'type'} ne 'element') {
$result .= &{$self->{'footnotes_text'}}($self);
$result .= $self->get_conf('DEFAULT_RULE') ."\n",
- if $self->get_conf('PROGRAM_NAME_IN_FOOTER');
+ if ($self->get_conf('PROGRAM_NAME_IN_FOOTER')
+ and defined($self->get_conf('DEFAULT_RULE'))
+ and !$self->in_string());
}
return $result;
}
@@ -3818,6 +3924,13 @@
#if (!defined($element->{'parent'})) {
# print STDERR "NO PARENT ".Texinfo::Parser::_print_current($element)."\n";
#}
+ if ($self->in_string()) {
+ if (defined($content)) {
+ return $content;
+ } else {
+ return '';
+ }
+ }
my $result = '';
my $special_element;
@@ -5945,6 +6058,7 @@
$self->{'documentdescription_string'} = $self->_convert(
{'type' => '_string',
'contents' => $self->{'extra'}->{'documentdescription'}->{'contents'}});
+ chomp($self->{'documentdescription_string'});
pop @{$self->{'document_context'}};
}
Index: t/html_tests.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/html_tests.t,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -b -r1.8 -r1.9
--- t/html_tests.t 29 Sep 2011 22:07:00 -0000 1.8
+++ t/html_tests.t 2 Oct 2011 19:11:58 -0000 1.9
@@ -53,6 +53,13 @@
@printindex cp
'],
+['documentdescription',
+'@documentdescription
+in @code{documentdescri---ption} --- @bullet{} @enddots{} @verb{:"verb:} @aa{}
@address@hidden @address@hidden
address@hidden documentdescription
+
address@hidden top
+'],
['simple_menu',
'@menu
* (ggg):: description
@@ -112,6 +119,12 @@
],
);
+my @test_cases_text = (
+['commands_in_email',
+'@email{endots @enddots{} @code{in code}}'
+],
+);
+
# problem is that the result is code with accented letters,
# it may not come out right. So this test is left unused for now.
# Also could be in converters_tests
@@ -130,10 +143,13 @@
foreach my $test (@test_cases) {
$test->[2]->{'test_formats'} = ['html'];
}
+foreach my $test (@test_cases_text) {
+ $test->[2]->{'test_formats'} = ['html_text'];
+}
our ($arg_test_case, $arg_generate, $arg_debug);
-run_all ('html_tests', address@hidden, $arg_test_case,
+run_all ('html_tests', address@hidden, @test_cases_text], $arg_test_case,
$arg_generate, $arg_debug);
1;
Index: t/results/html_tests/commands_in_email.pl
===================================================================
RCS file: t/results/html_tests/commands_in_email.pl
diff -N t/results/html_tests/commands_in_email.pl
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ t/results/html_tests/commands_in_email.pl 2 Oct 2011 19:11:59 -0000
1.1
@@ -0,0 +1,112 @@
+use vars qw(%result_texis %result_texts %result_trees %result_errors
+ %result_indices %result_sectioning %result_nodes %result_menus
+ %result_floats %result_converted %result_converted_errors
+ %result_elements %result_directions_text);
+
+use utf8;
+
+$result_trees{'commands_in_email'} = {
+ 'contents' => [
+ {
+ 'contents' => [
+ {
+ 'args' => [
+ {
+ 'contents' => [
+ {
+ 'parent' => {},
+ 'text' => 'endots '
+ },
+ {
+ 'args' => [
+ {
+ 'contents' => [],
+ 'parent' => {},
+ 'type' => 'brace_command_arg'
+ }
+ ],
+ 'cmdname' => 'enddots',
+ 'contents' => [],
+ 'parent' => {}
+ },
+ {
+ 'parent' => {},
+ 'text' => ' '
+ },
+ {
+ 'args' => [
+ {
+ 'contents' => [
+ {
+ 'parent' => {},
+ 'text' => 'in code'
+ }
+ ],
+ 'parent' => {},
+ 'type' => 'brace_command_arg'
+ }
+ ],
+ 'cmdname' => 'code',
+ 'contents' => [],
+ 'line_nr' => {
+ 'file_name' => '',
+ 'line_nr' => 1,
+ 'macro' => ''
+ },
+ 'parent' => {}
+ }
+ ],
+ 'parent' => {},
+ 'type' => 'brace_command_arg'
+ }
+ ],
+ 'cmdname' => 'email',
+ 'contents' => [],
+ 'extra' => {
+ 'brace_command_contents' => [
+ [
+ {},
+ {},
+ {},
+ {}
+ ]
+ ]
+ },
+ 'line_nr' => {},
+ 'parent' => {}
+ }
+ ],
+ 'parent' => {},
+ 'type' => 'paragraph'
+ }
+ ],
+ 'type' => 'text_root'
+};
+$result_trees{'commands_in_email'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'contents'}[0]{'parent'}
= $result_trees{'commands_in_email'}{'contents'}[0]{'contents'}[0]{'args'}[0];
+$result_trees{'commands_in_email'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'contents'}[1]{'args'}[0]{'parent'}
=
$result_trees{'commands_in_email'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'contents'}[1];
+$result_trees{'commands_in_email'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'contents'}[1]{'parent'}
= $result_trees{'commands_in_email'}{'contents'}[0]{'contents'}[0]{'args'}[0];
+$result_trees{'commands_in_email'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'contents'}[2]{'parent'}
= $result_trees{'commands_in_email'}{'contents'}[0]{'contents'}[0]{'args'}[0];
+$result_trees{'commands_in_email'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'contents'}[3]{'args'}[0]{'contents'}[0]{'parent'}
=
$result_trees{'commands_in_email'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'contents'}[3]{'args'}[0];
+$result_trees{'commands_in_email'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'contents'}[3]{'args'}[0]{'parent'}
=
$result_trees{'commands_in_email'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'contents'}[3];
+$result_trees{'commands_in_email'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'contents'}[3]{'parent'}
= $result_trees{'commands_in_email'}{'contents'}[0]{'contents'}[0]{'args'}[0];
+$result_trees{'commands_in_email'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'parent'}
= $result_trees{'commands_in_email'}{'contents'}[0]{'contents'}[0];
+$result_trees{'commands_in_email'}{'contents'}[0]{'contents'}[0]{'extra'}{'brace_command_contents'}[0][0]
=
$result_trees{'commands_in_email'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'contents'}[0];
+$result_trees{'commands_in_email'}{'contents'}[0]{'contents'}[0]{'extra'}{'brace_command_contents'}[0][1]
=
$result_trees{'commands_in_email'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'contents'}[1];
+$result_trees{'commands_in_email'}{'contents'}[0]{'contents'}[0]{'extra'}{'brace_command_contents'}[0][2]
=
$result_trees{'commands_in_email'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'contents'}[2];
+$result_trees{'commands_in_email'}{'contents'}[0]{'contents'}[0]{'extra'}{'brace_command_contents'}[0][3]
=
$result_trees{'commands_in_email'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'contents'}[3];
+$result_trees{'commands_in_email'}{'contents'}[0]{'contents'}[0]{'line_nr'} =
$result_trees{'commands_in_email'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'contents'}[3]{'line_nr'};
+$result_trees{'commands_in_email'}{'contents'}[0]{'contents'}[0]{'parent'} =
$result_trees{'commands_in_email'}{'contents'}[0];
+$result_trees{'commands_in_email'}{'contents'}[0]{'parent'} =
$result_trees{'commands_in_email'};
+
+$result_texis{'commands_in_email'} = '@email{endots @enddots{} @code{in
code}}';
+
+
+$result_texts{'commands_in_email'} = 'endots ... in code';
+
+$result_errors{'commands_in_email'} = [];
+
+
+
+$result_converted{'html_text'}->{'commands_in_email'} = '<p><a
href="mailto:endots ... in code">endots <small class="enddots">...</small>
<code>in code</code></a></p>';
+
+1;
Index: t/results/html_tests/documentdescription.pl
===================================================================
RCS file: t/results/html_tests/documentdescription.pl
diff -N t/results/html_tests/documentdescription.pl
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ t/results/html_tests/documentdescription.pl 2 Oct 2011 19:11:59 -0000
1.1
@@ -0,0 +1,467 @@
+use vars qw(%result_texis %result_texts %result_trees %result_errors
+ %result_indices %result_sectioning %result_nodes %result_menus
+ %result_floats %result_converted %result_converted_errors
+ %result_elements %result_directions_text);
+
+use utf8;
+
+$result_trees{'documentdescription'} = {
+ 'contents' => [
+ {
+ 'contents' => [
+ {
+ 'cmdname' => 'documentdescription',
+ 'contents' => [
+ {
+ 'extra' => {
+ 'command' => {}
+ },
+ 'parent' => {},
+ 'text' => '
+',
+ 'type' => 'empty_line_after_command'
+ },
+ {
+ 'contents' => [
+ {
+ 'parent' => {},
+ 'text' => 'in '
+ },
+ {
+ 'args' => [
+ {
+ 'contents' => [
+ {
+ 'parent' => {},
+ 'text' => 'documentdescri---ption'
+ }
+ ],
+ 'parent' => {},
+ 'type' => 'brace_command_arg'
+ }
+ ],
+ 'cmdname' => 'code',
+ 'contents' => [],
+ 'line_nr' => {
+ 'file_name' => '',
+ 'line_nr' => 2,
+ 'macro' => ''
+ },
+ 'parent' => {}
+ },
+ {
+ 'parent' => {},
+ 'text' => ' --- '
+ },
+ {
+ 'args' => [
+ {
+ 'contents' => [],
+ 'parent' => {},
+ 'type' => 'brace_command_arg'
+ }
+ ],
+ 'cmdname' => 'bullet',
+ 'contents' => [],
+ 'parent' => {}
+ },
+ {
+ 'parent' => {},
+ 'text' => ' '
+ },
+ {
+ 'args' => [
+ {
+ 'contents' => [],
+ 'parent' => {},
+ 'type' => 'brace_command_arg'
+ }
+ ],
+ 'cmdname' => 'enddots',
+ 'contents' => [],
+ 'parent' => {}
+ },
+ {
+ 'parent' => {},
+ 'text' => ' '
+ },
+ {
+ 'args' => [
+ {
+ 'contents' => [
+ {
+ 'parent' => {},
+ 'text' => '"verb',
+ 'type' => 'raw'
+ }
+ ],
+ 'parent' => {},
+ 'type' => 'brace_command_arg'
+ }
+ ],
+ 'cmdname' => 'verb',
+ 'contents' => [],
+ 'line_nr' => {},
+ 'parent' => {},
+ 'type' => ':'
+ },
+ {
+ 'parent' => {},
+ 'text' => ' '
+ },
+ {
+ 'args' => [
+ {
+ 'contents' => [],
+ 'parent' => {},
+ 'type' => 'brace_command_arg'
+ }
+ ],
+ 'cmdname' => 'aa',
+ 'contents' => [],
+ 'parent' => {}
+ },
+ {
+ 'parent' => {},
+ 'text' => ' '
+ },
+ {
+ 'args' => [
+ {
+ 'contents' => [
+ {
+ 'args' => [
+ {
+ 'contents' => [
+ {
+ 'parent' => {},
+ 'text' => 'i'
+ }
+ ],
+ 'parent' => {},
+ 'type' => 'brace_command_arg'
+ }
+ ],
+ 'cmdname' => 'dotless',
+ 'contents' => [],
+ 'line_nr' => {},
+ 'parent' => {}
+ }
+ ],
+ 'parent' => {},
+ 'type' => 'brace_command_arg'
+ }
+ ],
+ 'cmdname' => '^',
+ 'contents' => [],
+ 'line_nr' => {},
+ 'parent' => {}
+ },
+ {
+ 'parent' => {},
+ 'text' => ' '
+ },
+ {
+ 'args' => [
+ {
+ 'contents' => [
+ {
+ 'args' => [
+ {
+ 'contents' => [
+ {
+ 'parent' => {},
+ 'text' => 'some'
+ }
+ ],
+ 'parent' => {},
+ 'type' => 'brace_command_arg'
+ }
+ ],
+ 'cmdname' => 'code',
+ 'contents' => [],
+ 'line_nr' => {},
+ 'parent' => {}
+ },
+ {
+ 'parent' => {},
+ 'text' => 'body'
+ }
+ ],
+ 'parent' => {},
+ 'type' => 'brace_command_arg'
+ }
+ ],
+ 'cmdname' => 'email',
+ 'contents' => [],
+ 'extra' => {
+ 'brace_command_contents' => [
+ [
+ {},
+ {}
+ ]
+ ]
+ },
+ 'line_nr' => {},
+ 'parent' => {}
+ },
+ {
+ 'parent' => {},
+ 'text' => '
+'
+ }
+ ],
+ 'parent' => {},
+ 'type' => 'paragraph'
+ },
+ {
+ 'args' => [
+ {
+ 'contents' => [
+ {
+ 'extra' => {
+ 'command' => {}
+ },
+ 'parent' => {},
+ 'text' => ' ',
+ 'type' => 'empty_spaces_after_command'
+ },
+ {
+ 'parent' => {},
+ 'text' => 'documentdescription'
+ },
+ {
+ 'parent' => {},
+ 'text' => '
+',
+ 'type' => 'spaces_at_end'
+ }
+ ],
+ 'parent' => {},
+ 'type' => 'misc_line_arg'
+ }
+ ],
+ 'cmdname' => 'end',
+ 'extra' => {
+ 'command' => {},
+ 'command_argument' => 'documentdescription',
+ 'text_arg' => 'documentdescription'
+ },
+ 'line_nr' => {
+ 'file_name' => '',
+ 'line_nr' => 3,
+ 'macro' => ''
+ },
+ 'parent' => {}
+ }
+ ],
+ 'extra' => {
+ 'end_command' => {}
+ },
+ 'line_nr' => {
+ 'file_name' => '',
+ 'line_nr' => 1,
+ 'macro' => ''
+ },
+ 'parent' => {}
+ },
+ {
+ 'parent' => {},
+ 'text' => '
+',
+ 'type' => 'empty_line'
+ }
+ ],
+ 'parent' => {},
+ 'type' => 'text_root'
+ },
+ {
+ 'args' => [
+ {
+ 'contents' => [
+ {
+ 'extra' => {
+ 'command' => {}
+ },
+ 'parent' => {},
+ 'text' => ' ',
+ 'type' => 'empty_spaces_after_command'
+ },
+ {
+ 'parent' => {},
+ 'text' => 'top'
+ },
+ {
+ 'parent' => {},
+ 'text' => '
+',
+ 'type' => 'spaces_at_end'
+ }
+ ],
+ 'parent' => {},
+ 'type' => 'misc_line_arg'
+ }
+ ],
+ 'cmdname' => 'top',
+ 'contents' => [],
+ 'extra' => {
+ 'misc_content' => [
+ {}
+ ]
+ },
+ 'level' => 0,
+ 'line_nr' => {
+ 'file_name' => '',
+ 'line_nr' => 5,
+ 'macro' => ''
+ },
+ 'parent' => {}
+ }
+ ],
+ 'type' => 'document_root'
+};
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'extra'}{'command'}
= $result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'parent'}
= $result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[0]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[1]{'args'}[0]{'contents'}[0]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[1]{'args'}[0];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[1]{'args'}[0]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[1];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[1]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[2]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[3]{'args'}[0]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[3];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[3]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[4]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[5]{'args'}[0]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[5];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[5]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[6]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[7]{'args'}[0]{'contents'}[0]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[7]{'args'}[0];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[7]{'args'}[0]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[7];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[7]{'line_nr'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[1]{'line_nr'};
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[7]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[8]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[9]{'args'}[0]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[9];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[9]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[10]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[11]{'args'}[0]{'contents'}[0]{'args'}[0]{'contents'}[0]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[11]{'args'}[0]{'contents'}[0]{'args'}[0];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[11]{'args'}[0]{'contents'}[0]{'args'}[0]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[11]{'args'}[0]{'contents'}[0];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[11]{'args'}[0]{'contents'}[0]{'line_nr'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[1]{'line_nr'};
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[11]{'args'}[0]{'contents'}[0]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[11]{'args'}[0];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[11]{'args'}[0]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[11];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[11]{'line_nr'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[1]{'line_nr'};
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[11]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[12]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[13]{'args'}[0]{'contents'}[0]{'args'}[0]{'contents'}[0]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[13]{'args'}[0]{'contents'}[0]{'args'}[0];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[13]{'args'}[0]{'contents'}[0]{'args'}[0]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[13]{'args'}[0]{'contents'}[0];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[13]{'args'}[0]{'contents'}[0]{'line_nr'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[1]{'line_nr'};
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[13]{'args'}[0]{'contents'}[0]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[13]{'args'}[0];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[13]{'args'}[0]{'contents'}[1]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[13]{'args'}[0];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[13]{'args'}[0]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[13];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[13]{'extra'}{'brace_command_contents'}[0][0]
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[13]{'args'}[0]{'contents'}[0];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[13]{'extra'}{'brace_command_contents'}[0][1]
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[13]{'args'}[0]{'contents'}[1];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[13]{'line_nr'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[1]{'line_nr'};
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[13]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[14]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[1]{'parent'}
= $result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[2]{'args'}[0]{'contents'}[0]{'extra'}{'command'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[2];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[2]{'args'}[0]{'contents'}[0]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[2]{'args'}[0];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[2]{'args'}[0]{'contents'}[1]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[2]{'args'}[0];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[2]{'args'}[0]{'contents'}[2]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[2]{'args'}[0];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[2]{'args'}[0]{'parent'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[2];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[2]{'extra'}{'command'}
= $result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[2]{'parent'}
= $result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'extra'}{'end_command'}
=
$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'contents'}[2];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[0]{'parent'} =
$result_trees{'documentdescription'}{'contents'}[0];
+$result_trees{'documentdescription'}{'contents'}[0]{'contents'}[1]{'parent'} =
$result_trees{'documentdescription'}{'contents'}[0];
+$result_trees{'documentdescription'}{'contents'}[0]{'parent'} =
$result_trees{'documentdescription'};
+$result_trees{'documentdescription'}{'contents'}[1]{'args'}[0]{'contents'}[0]{'extra'}{'command'}
= $result_trees{'documentdescription'}{'contents'}[1];
+$result_trees{'documentdescription'}{'contents'}[1]{'args'}[0]{'contents'}[0]{'parent'}
= $result_trees{'documentdescription'}{'contents'}[1]{'args'}[0];
+$result_trees{'documentdescription'}{'contents'}[1]{'args'}[0]{'contents'}[1]{'parent'}
= $result_trees{'documentdescription'}{'contents'}[1]{'args'}[0];
+$result_trees{'documentdescription'}{'contents'}[1]{'args'}[0]{'contents'}[2]{'parent'}
= $result_trees{'documentdescription'}{'contents'}[1]{'args'}[0];
+$result_trees{'documentdescription'}{'contents'}[1]{'args'}[0]{'parent'} =
$result_trees{'documentdescription'}{'contents'}[1];
+$result_trees{'documentdescription'}{'contents'}[1]{'extra'}{'misc_content'}[0]
=
$result_trees{'documentdescription'}{'contents'}[1]{'args'}[0]{'contents'}[1];
+$result_trees{'documentdescription'}{'contents'}[1]{'parent'} =
$result_trees{'documentdescription'};
+
+$result_texis{'documentdescription'} = '@documentdescription
+in @code{documentdescri---ption} --- @bullet{} @enddots{} @verb{:"verb:} @aa{}
@address@hidden @address@hidden
address@hidden documentdescription
+
address@hidden top
+';
+
+
+$result_texts{'documentdescription'} = '
+top
+***
+';
+
+$result_sectioning{'documentdescription'} = {
+ 'level' => -1,
+ 'section_childs' => [
+ {
+ 'cmdname' => 'top',
+ 'extra' => {},
+ 'level' => 0,
+ 'section_up' => {}
+ }
+ ]
+};
+$result_sectioning{'documentdescription'}{'section_childs'}[0]{'section_up'} =
$result_sectioning{'documentdescription'};
+
+$result_errors{'documentdescription'} = [];
+
+
+
+$result_converted{'html'}->{'documentdescription'} = '<!DOCTYPE html PUBLIC
"-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd";>
+<html>
+<!-- Created by texi2html, http://www.gnu.org/software/texinfo/ -->
+<head>
+<title>top</title>
+
+<meta name="description" content="in documentdescri---ption — • ...
"verb å î somebody (somebody)">
+<meta name="keywords" content="top">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="Generator" content="texi2html">
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<style type="text/css">
+<!--
+a.summary-letter {text-decoration: none}
+blockquote.smallquotation {font-size: smaller}
+div.display {margin-left: 3.2em}
+div.example {margin-left: 3.2em}
+div.lisp {margin-left: 3.2em}
+div.smalldisplay {margin-left: 3.2em}
+div.smallexample {margin-left: 3.2em}
+div.smalllisp {margin-left: 3.2em}
+pre.display {font-family: serif}
+pre.format {font-family: serif}
+pre.menu-comment {font-family: serif}
+pre.menu-preformatted {font-family: serif}
+pre.smalldisplay {font-family: serif; font-size: smaller}
+pre.smallexample {font-size: smaller}
+pre.smallformat {font-family: serif; font-size: smaller}
+pre.smalllisp {font-size: smaller}
+span.nocodebreak {white-space:pre}
+span.nolinebreak {white-space:pre}
+span.roman {font-family:serif; font-weight:normal}
+span.sansserif {font-family:sans-serif; font-weight:normal}
+ul.no-bullet {list-style: none}
+-->
+</style>
+
+
+</head>
+
+<body lang="en" bgcolor="#FFFFFF" text="#000000" link="#0000FF"
vlink="#800080" alink="#FF0000">
+
+<a name="top"></a>
+<h1 class="top">top</h1>
+<hr>
+<p>
+
+
+</p>
+</body>
+</html>
+';
+
+1;
- texinfo/tp Texinfo/Convert/HTML.pm t/html_tests...,
Patrice Dumas <=