The R Project SVN R

Rev

Rev 6211 | Rev 6351 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6211 Rev 6348
Line 460... Line 460...
460 
 
 460 
 
461 
    if($_[0]!= -1) {
 461 
    if($_[0]!= -1) {
462 
      if($_[0]) { open htmlout, "> $_[0]"; } else { open htmlout, "| cat"; }
 462 
      if($_[0]) { open htmlout, "> $_[0]"; } else { open htmlout, "| cat"; }
463 
    }
 463 
    }
464 
    $using_chm = 0;
 464 
    $using_chm = 0;
465 
    print htmlout html_functionhead($blocks{"title"});
 465 
    print htmlout html_functionhead($blocks{"title"}, $pkgname,
- 
 
 466 
				    $blocks{"name"});
466 
 
 467 
 
- 
 
 468 
    html_print_block("description", "Description");
467 
    html_print_codeblock("usage", "Usage");
 469 
    html_print_codeblock("usage", "Usage");
468 
    html_print_argblock("arguments", "Arguments");
 470 
    html_print_argblock("arguments", "Arguments");
469 
    html_print_block("format", "Format");
 471 
    html_print_block("format", "Format");
470 
    html_print_block("description", "Description");
 - 
 
471 
    html_print_block("details", "Details");
 472 
    html_print_block("details", "Details");
472 
    html_print_argblock("value", "Value");
 473 
    html_print_argblock("value", "Value");
473 
 
 474 
 
474 
    html_print_sections();
 475 
    html_print_sections();
475 
 
 476 
 
Line 818... Line 819...
818 
 
 819 
 
819 
    print nroffout ".ND\n";
 820 
    print nroffout ".ND\n";
820 
    print nroffout ".pl 100i\n";
 821 
    print nroffout ".pl 100i\n";
821 
    print nroffout ".po 3\n";
 822 
    print nroffout ".po 3\n";
822 
    print nroffout ".na\n";
 823 
    print nroffout ".na\n";
- 
 
 824 
    print nroffout ".tl '", $blocks{"name"},
823 
    print nroffout $blocks{"name"}, "($pkgname)\n\n" if $pkgname;
 825 
          "($pkgname)''R Documentation'\n\n" if $pkgname;
824 
    print nroffout ".SH\n";
 826 
    print nroffout ".SH\n";
825 
    print nroffout $blocks{"title"}, "\n";
 827 
    print nroffout $blocks{"title"}, "\n";
826 
 
 - 
 
- 
 
 828 
    nroff_print_block("description", "Description");
827 
    nroff_print_codeblock("usage", "");
 829 
    nroff_print_codeblock("usage", "");
828 
    nroff_print_argblock("arguments", "Arguments");
 830 
    nroff_print_argblock("arguments", "Arguments");
829 
    nroff_print_block("format", "Format");
 831 
    nroff_print_block("format", "Format");
830 
    nroff_print_block("description", "Description");
 - 
 
831 
    nroff_print_block("details", "Details");
 832 
    nroff_print_block("details", "Details");
832 
    nroff_print_argblock("value", "Value");
 833 
    nroff_print_argblock("value", "Value");
833 
 
 834 
 
834 
    nroff_print_sections();
 835 
    nroff_print_sections();
835 
 
 836 
 
Line 866... Line 867...
866 
    ## tables are pre-processed by the tbl(1) command, so this has to
 867 
    ## tables are pre-processed by the tbl(1) command, so this has to
867 
    ## be done first
 868 
    ## be done first
868 
    $text = nroff_tables($text);
 869 
    $text = nroff_tables($text);
869 
    $text =~ s/\\cr\n?/\n.br\n/sgo;
 870 
    $text =~ s/\\cr\n?/\n.br\n/sgo;
870 
 
 871 
 
871 
 
 - 
 
872 
 
 - 
 
873 
    $text =~ s/\n\s*\n/\n.IP \"\" $indent\n/sgo;
 872 
    $text =~ s/\n\s*\n/\n.IP \"\" $indent\n/sgo;
874 
    $text =~ s/\\dots/\\&.../go;
 873 
    $text =~ s/\\dots/\\&.../go;
875 
    $text =~ s/\\ldots/\\&.../go;
 874 
    $text =~ s/\\ldots/\\&.../go;
876 
    $text =~ s/\\le/<=/go;
 875 
    $text =~ s/\\le/<=/go;
877 
    $text =~ s/\\ge/>=/go;
 876 
    $text =~ s/\\ge/>=/go;
Line 1369... Line 1368...
1369 
    }
 1368 
    }
1370 
    foreach (@keywords) {
 1369 
    foreach (@keywords) {
1371 
      printf latexout "\\keyword\{%s\}\{%s\}\n", $_, $blocks{"name"}
 1370 
      printf latexout "\\keyword\{%s\}\{%s\}\n", $_, $blocks{"name"}
1372 
      unless /^$/ ;
 1371 
      unless /^$/ ;
1373 
    }
 1372 
    }
- 
 
 1373 
    latex_print_block("description", "Description");
1374 
    latex_print_codeblock("usage", "Usage");
 1374 
    latex_print_codeblock("usage", "Usage");
1375 
    latex_print_argblock("arguments", "Arguments");
 1375 
    latex_print_argblock("arguments", "Arguments");
1376 
    latex_print_block("format", "Format");
 1376 
    latex_print_block("format", "Format");
1377 
    latex_print_block("description", "Description");
 - 
 
1378 
    latex_print_block("details", "Details");
 1377 
    latex_print_block("details", "Details");
1379 
    latex_print_argblock("value", "Value");
 1378 
    latex_print_argblock("value", "Value");
1380 
 
 1379 
 
1381 
    latex_print_sections();
 1380 
    latex_print_sections();
1382 
 
 1381 
 
Line 1622... Line 1621...
1622 
 
 1621 
 
1623 
    if($_[0]!= -1) {
 1622 
    if($_[0]!= -1) {
1624 
      if($_[0]) { open htmlout, "> $_[0]"; } else { open htmlout, "| cat"; }
 1623 
      if($_[0]) { open htmlout, "> $_[0]"; } else { open htmlout, "| cat"; }
1625 
    }
 1624 
    }
1626 
    $using_chm = 1;
 1625 
    $using_chm = 1;
1627 
    print htmlout chm_functionhead($blocks{"title"});
 1626 
    print htmlout chm_functionhead($blocks{"title"}, $pkgname,
- 
 
 1627 
				   $blocks{"name"});
1628 
 
 1628 
 
1629 
    html_print_codeblock("usage", "Usage");
 1629 
    html_print_codeblock("usage", "Usage");
1630 
    html_print_argblock("arguments", "Arguments");
 1630 
    html_print_argblock("arguments", "Arguments");
1631 
    html_print_block("format", "Format");
 1631 
    html_print_block("format", "Format");
1632 
    html_print_block("description", "Description");
 1632 
    html_print_block("description", "Description");