@@ -396,25 +396,22 @@ sub translate_buffer_ignore {
396
396
$translate_buffer_env {" ignore" } = \&translate_buffer_ignore;
397
397
398
398
foreach (
399
- qw( appendix section cindex findex kindex opindex pindex tindex vindex subsection
400
- dircategory subtitle include
401
- exdent center unnumberedsec
402
- heading unnumbered unnumberedsubsec
403
- unnumberedsubsubsec appendixsec appendixsubsec
404
- appendixsubsubsec majorheading chapheading subheading
405
- subsubheading shorttitlepage
406
- subsubsection top item itemx chapter settitle
407
- title author)
399
+ qw( appendix appendixsec appendixsubsec appendixsubsubsec author center
400
+ chapheading chapter cindex defline deftypeline dircategory exdent findex
401
+ heading include item itemx kindex majorheading opindex pindex section
402
+ settitle shorttitlepage subheading subsection subsubheading subsubsection
403
+ subtitle tindex title top unnumbered unnumberedsec unnumberedsubsec
404
+ unnumberedsubsubsec vindex)
408
405
)
409
406
{
410
407
$commands {$_ } = \&line_command;
411
408
$break_line {$_ } = 1;
412
409
$translate_line_command {$_ } = 1;
413
410
}
414
411
foreach (
415
- qw( c comment clear set setfilename setchapternewpage vskip synindex
416
- syncodeindex need fonttextsize printindex headings finalout sp
417
- definfoenclose )
412
+ qw( c clear comment definfoenclose finalout fonttextsize frenchspacing
413
+ headings need printindex set setchapternewpage setfilename sp syncodeindex
414
+ synindex vskip )
418
415
)
419
416
{
420
417
$commands {$_ } = \&line_command;
@@ -555,18 +552,17 @@ sub environment_line_command {
555
552
# }
556
553
#
557
554
foreach (
558
- qw( detailmenu menu titlepage group copying
559
- documentdescription cartouche
560
- direntry
561
- ifdocbook ifhtml ifinfo ifplaintext iftex ifxml
562
- ifnotdocbook ifnothtml ifnotinfo ifnotplaintext ifnottex ifnotxml)
563
- )
555
+ qw( cartouche copying copyingg defblock detailmenu direntry displaymath
556
+ documentdescription group ifdocbook ifhtml ifinfo iflatex ifnotdocbook
557
+ ifnothtml ifnotinfo ifnotplaintextg ifnottex ifnotxml ifplaintext iftex
558
+ ifxml menu nodedescriptionblock titlepage)
559
+ )
564
560
{
565
561
$commands {$_ } = \&environment_line_command;
566
562
$translate_line_command {$_ } = 0;
567
563
$break_line {$_ } = 1;
568
564
}
569
- foreach (qw( enumerate multitable ifclear ifset) ) {
565
+ foreach (qw( enumerate multitable ifclear ifset float linemacro ) ) {
570
566
$commands {$_ } = \&environment_line_command;
571
567
$break_line {$_ } = 1;
572
568
}
@@ -589,15 +585,11 @@ register_generic_command("*end, ");
589
585
$commands {' end' } = $end_command ;
590
586
$break_line {' end' } = 1;
591
587
592
- register_generic_command(" *macro, " );
593
- $commands {' macro' } = \&environment_command;
594
- $break_line {' macro' } = 1;
595
- register_generic_command(" *itemize, " );
596
- $commands {' itemize' } = \&environment_command;
597
- $break_line {' itemize' } = 1;
598
- register_generic_command(" *table, " );
599
- $commands {' table' } = \&environment_command;
600
- $break_line {' table' } = 1;
588
+ foreach (qw( itemize macro ftable table vtable) ) {
589
+ register_generic_command(" *$_ , " );
590
+ $commands {$_ } = \&environment_command;
591
+ $break_line {$_ } = 1;
592
+ }
601
593
602
594
# TODO: is_closed, use a regexp: \ does not escape the closing brace.
603
595
# TBC on LaTeX.
0 commit comments