Hi,

I think the attached patch fixes this bug.

I also attach the result of po4a-normalize on the module-init-tools
depmod.8 man page (and the generated groff page).

Pierre, can you check if it looks OK.
I still need to check whether this patch do not mess up with existing
translation done with the Sgml module.

Kind Regards,
-- 
Nekral
Index: lib/Locale/Po4a/Sgml.pm
===================================================================
RCS file: /cvsroot/po4a/po4a/lib/Locale/Po4a/Sgml.pm,v
retrieving revision 1.109
diff -u -r1.109 Sgml.pm
--- lib/Locale/Po4a/Sgml.pm     6 May 2006 03:52:55 -0000       1.109
+++ lib/Locale/Po4a/Sgml.pm     7 Sep 2006 19:27:50 -0000
@@ -428,14 +428,14 @@
                                            "tag taglist titlepag toc");
 
     } elsif ($prolog =~ /docbook/i) {
-       $self->set_tags_kind("translate" => "abbrev acronym arg artheader 
attribution ".
+       $self->set_tags_kind("translate" => "abbrev acronym artheader 
attribution ".
                                            "date ".
                                            "edition editor entry ".
                                            "figure ".
                                            "glosssee glossseealso glossterm ".
                                            "holder ".
                                            "member msgaud msglevel msgorig ".
-                                           "option orgname othername ".
+                                           "orgname othername ".
                                            "para phrase pubdate publishername 
primary ".
                                            "refclass refdescriptor 
refentrytitle refmiscinfo refname refpurpose releaseinfo remark revnumber 
revremark ".
                                            "screeninfo seg secondary segtitle 
simpara subtitle synopfragmentref synopsis ".
@@ -444,7 +444,7 @@
                             "empty"     => "audiodata colspec graphic 
imagedata textdata sbr videodata xref",
                             "indent"    => "abstract answer appendix article 
articleinfo audioobject author authorgroup ".
                                            "bibliodiv bibliography blockquote 
blockinfo book bookinfo bridgehead ".
-                                           "callout calloutlist caption 
caution chapter cmdsynopsis copyright ".
+                                           "callout calloutlist caption 
caution chapter copyright ".
                                            "dedication docinfo ".
                                            "entry ".
                                            "formalpara ".
@@ -462,9 +462,9 @@
                                            "table tbody textobject tgroup 
thead tip toc ".
                                            "variablelist varlistentry 
videoobject ".
                                            "warning",
-                            "verbatim"  => "address holder literallayout 
option programlisting ".
+                            "verbatim"  => "address cmdsynopsis holder 
literallayout programlisting ".
                                            "refentrytitle refname refpurpose 
screen title",
-                            "ignore"    => "action affiliation anchor 
application author authorinitials ".
+                            "ignore"    => "action affiliation anchor 
application arg author authorinitials ".
                                            "command citation citerefentry 
citetitle classname co computeroutput constant corpauthor ".
                                            "database po4abeg po4aend ".
                                            "email emphasis envar errorcode 
errorname errortext errortype exceptionname ".
@@ -476,7 +476,7 @@
                                            "link literal ".
                                            "manvolnum markup medialabel 
menuchoice methodname modespec mousebutton ".
                                            "nonterminal ".
-                                           "olink ooclass ooexception 
oointerface optional othercredit ".
+                                           "olink ooclass ooexception 
oointerface option optional othercredit ".
                                            "parameter personname phrase 
productname productnumber prompt property ".
                                            "quote ".
                                            "remark replaceable returnvalue 
revhistory ".
@@ -958,6 +958,18 @@
                # the same line.
                $verb_last_ref = $ref;
            }
+           if ($verb) {
+               # Tag in a verbatim section. Check if it appeared at
+               # the same line than the previous data. If not, it
+               # means that an end of line must be added to the
+               # buffer.
+               if ($ref ne $verb_last_ref) {
+                   # FIXME: Does it work if $verb > 1
+                   $buffer .= "\n";
+                   $verb_last_ref = $ref;
+               }
+           }
+
            if ($indent{$event->data->name()}) {
                # push the indenting space only if not in verb before that tag
                # push trailing "\n" only if not in verbose afterward

Attachment: m-i-t.tar.bz2
Description: Binary data

Reply via email to