[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
texinfo/tp/Texinfo/Convert HTML.pm
From: |
Patrice Dumas |
Subject: |
texinfo/tp/Texinfo/Convert HTML.pm |
Date: |
Sun, 05 Jun 2011 14:51:37 +0000 |
CVSROOT: /sources/texinfo
Module name: texinfo
Changes by: Patrice Dumas <pertusus> 11/06/05 14:51:37
Modified files:
tp/Texinfo/Convert: HTML.pm
Log message:
Handle @value with undefined flag.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/Texinfo/Convert/HTML.pm?cvsroot=texinfo&r1=1.85&r2=1.86
Patches:
Index: HTML.pm
===================================================================
RCS file: /sources/texinfo/texinfo/tp/Texinfo/Convert/HTML.pm,v
retrieving revision 1.85
retrieving revision 1.86
diff -u -b -r1.85 -r1.86
--- HTML.pm 5 Jun 2011 14:11:36 -0000 1.85
+++ HTML.pm 5 Jun 2011 14:51:37 -0000 1.86
@@ -1184,6 +1184,19 @@
return $text;
}
+sub _convert_value_command($$$$)
+{
+ my $self = shift;
+ my $cmdname = shift;
+ my $command = shift;
+ my $args = shift;
+
+ return $self->convert_tree ($self->gdt('@{No value for `{value}\'@}',
+ {'value' => $command->{'type'}}));
+}
+
+$default_commands_conversion{'value'} = \&_convert_value_command;
+
sub _convert_email_command($$$$)
{
my $self = shift;
@@ -3638,8 +3651,9 @@
}
}
+ # FIXME put value in a category in Texinfo::Common?
foreach my $command (keys(%misc_commands), keys(%brace_commands),
- keys (%block_commands), keys(%no_brace_commands)) {
+ keys (%block_commands), keys(%no_brace_commands), 'value') {
if (exists($Texinfo::Config::commands_conversion{$command})) {
$self->{'commands_conversion'}->{$command}
= $Texinfo::Config::commands_conversion{$command};
@@ -5698,8 +5712,6 @@
# print STDERR "INDEX ENTRY lines_count $location->{'lines'}, index_entry
$location->{'index_entry'}\n"
# if ($self->get_conf('DEBUG'));
- # TODO special: footnote
-
# commands like @deffnx have both a cmdname and a def_line type. It is
# better to consider them as a def_line type, as the whole point of the
# def_line type is to handle the same the def*x and def* line formatting.
@@ -5941,15 +5953,6 @@
return '';
}
}
- #} elsif ($command eq 'value') {
- # my $expansion = $self->gdt('@{No value for `{value}\'@}',
- # {'value' => $root->{'type'}});
- # if ($formatter->{'_top_formatter'}) {
- # $expansion = {'type' => 'paragraph',
- # 'contents' => [$expansion]};
- # }
- # $result .= $self->_convert($expansion);
- # }
print STDERR "DEBUG: HERE!($root)\n";
}
- texinfo/tp/Texinfo/Convert HTML.pm, Patrice Dumas, 2011/06/01
- texinfo/tp/Texinfo/Convert HTML.pm, Patrice Dumas, 2011/06/02
- texinfo/tp/Texinfo/Convert HTML.pm, Patrice Dumas, 2011/06/04
- texinfo/tp/Texinfo/Convert HTML.pm, Patrice Dumas, 2011/06/04
- texinfo/tp/Texinfo/Convert HTML.pm, Patrice Dumas, 2011/06/05
- texinfo/tp/Texinfo/Convert HTML.pm,
Patrice Dumas <=
- texinfo/tp/Texinfo/Convert HTML.pm, Patrice Dumas, 2011/06/05
- texinfo/tp/Texinfo/Convert HTML.pm, Patrice Dumas, 2011/06/06
- texinfo/tp/Texinfo/Convert HTML.pm, Patrice Dumas, 2011/06/06
- texinfo/tp/Texinfo/Convert HTML.pm, Karl Berry, 2011/06/23
- texinfo/tp/Texinfo/Convert HTML.pm, Karl Berry, 2011/06/24
- texinfo/tp/Texinfo/Convert HTML.pm, Patrice Dumas, 2011/06/26
- texinfo/tp/Texinfo/Convert HTML.pm, Patrice Dumas, 2011/06/30