texinfo/tp/Texinfo/Convert HTML.pm

[Patrice Dumas]

CVSROOT:        /sources/texinfo
Module name:    texinfo
Changes by:     Patrice Dumas <pertusus>        11/05/29 13:15:22

Modified files:
        tp/Texinfo/Convert: HTML.pm 

Log message:
        Handle exdent.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/Texinfo/Convert/HTML.pm?cvsroot=texinfo&r1=1.62&r2=1.63

Patches:
Index: HTML.pm
===================================================================
RCS file: /sources/texinfo/texinfo/tp/Texinfo/Convert/HTML.pm,v
retrieving revision 1.62
retrieving revision 1.63
diff -u -b -r1.62 -r1.63
--- HTML.pm     28 May 2011 23:27:39 -0000      1.62
+++ HTML.pm     29 May 2011 13:15:21 -0000      1.63
@@ -1720,6 +1720,26 @@
 
 $default_commands_conversion{'sp'} = \&_convert_sp_command;
 
+sub _convert_exdent_command($$$$)
+{
+  my $self = shift;
+  my $cmdname = shift;
+  my $command = shift;
+  my $args = shift;
+
+  #Â FIXME do something better with css and span?
+  my $preformatted = $self->in_preformatted();
+  
+  if ($preformatted) {
+    return $self->_convert_preformatted_type($cmdname, $command, 
$args->[0]->{'normal'} ."\n");
+  } else {
+    # ignore alignment information
+    return "<p>".$args->[0]->{'normal'} ."\n</p>";
+  }
+}
+
+$default_commands_conversion{'exdent'} = \&_convert_exdent_command;
+
 my $html_menu_entry_index;
 sub _convert_menu_command($$$$)
 {