1 diff -Nur docbook2X/docbook2man-spec.pl docbook2X.new/docbook2man-spec.pl
2 --- docbook2X/docbook2man-spec.pl Sat Oct 2 16:35:18 1999
3 +++ docbook2X.new/docbook2man-spec.pl Fri Jun 23 15:14:07 2000
9 + # check refentry's language
10 + if(defined($_[0]->attribute('LANG')->value)) {
11 + $manpage_lang = $_[0]->attribute('LANG')->value;
17 sgml('</REFENTRY>', sub {
23 -man_sgml('<REFNAMEDIV>', "\n.SH NAME\n");
24 +#man_sgml('<REFNAMEDIV>', "\n.SH NAME\n");
25 +man_sgml('<REFNAMEDIV>', sub {
26 + if ($manpage_lang eq "pl") { man_output "\n.SH NAZWA\n"; }
27 + # waits for another languages
28 + #elsif ($manpage_lang eq "xx") { man_output "\n.SH xxxxxxx\n"; }
29 + else { man_output "\n.SH NAME\n"; }
32 sgml('<REFNAME>', \&save_cdata);
33 sgml('</REFNAME>', sub {
36 ########################################################################
38 -man_sgml('<REFSYNOPSISDIV>', "\n.SH SYNOPSIS\n");
39 +#man_sgml('<REFSYNOPSISDIV>', "\n.SH SYNOPSIS\n");
40 +man_sgml('<REFSYNOPSISDIV>', sub {
41 + if ($manpage_lang eq "pl") { man_output "\n.SH SKĀ£ADNIA\n"; }
42 + # waits for another languages
43 + #elsif ($manpage_lang eq "xx") { man_output "\n.SH xxxxxxx\n"; }
44 + else { man_output "\n.SH SYNOPSIS\n"; }
47 man_sgml('</REFSYNOPSISDIV>', "\n");
49 ## FIXME! Must be made into block elements!!