texinfo/tp/Texinfo/Convert Plaintext.pm

[Patrice Dumas]

CVSROOT:        /sources/texinfo
Module name:    texinfo
Changes by:     Patrice Dumas <pertusus>        12/01/03 21:08:36

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

Log message:
        raw block format are in 'code' ('' -- and so on are kept). 

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/Texinfo/Convert/Plaintext.pm?cvsroot=texinfo&r1=1.197&r2=1.198

Patches:
Index: Plaintext.pm
===================================================================
RCS file: /sources/texinfo/texinfo/tp/Texinfo/Convert/Plaintext.pm,v
retrieving revision 1.197
retrieving revision 1.198
diff -u -b -r1.197 -r1.198
--- Plaintext.pm        3 Jan 2012 01:47:52 -0000       1.197
+++ Plaintext.pm        3 Jan 2012 21:08:36 -0000       1.198
@@ -540,7 +540,8 @@
     foreach my $context (reverse(@{$self->{'context'}})) {
       if ($menu_commands{$context}) {
         last;
-      } elsif ($preformatted_code_commands{$context}) {
+      } elsif ($preformatted_code_commands{$context}
+               or $format_raw_commands{$context}) {
         $formatter->{'code'} = 1;
         last;
       }
@@ -2094,7 +2095,6 @@
     } else {
       $unknown_command = 1;
     }
-    #} els
     if ($unknown_command and !($root->{'extra'} 
                                and $root->{'extra'}->{'index_entry'})
         # commands like def*x are not processed above, since only the def_line