[Po4a-commits] "po4a/lib/Locale/Po4a Sgml.pm,1.123,1.124"

[Nicolas FRANCOIS]

Update of /cvsroot/po4a/po4a/lib/Locale/Po4a
In directory alioth:/tmp/cvs-serv2634/lib/Locale/Po4a

Modified Files:
	Sgml.pm 
Log Message:
Do not try to validate the input file when the force option is used.
(useful for xml files handled with the sgml module)


Index: Sgml.pm
===================================================================
RCS file: /cvsroot/po4a/po4a/lib/Locale/Po4a/Sgml.pm,v
retrieving revision 1.123
retrieving revision 1.124
diff -u -d -r1.123 -r1.124
--- Sgml.pm	9 Sep 2007 12:34:27 -0000	1.123
+++ Sgml.pm	15 Sep 2007 15:43:46 -0000	1.124
@@ -109,7 +109,8 @@
 
 =item force
 
-Proceed even if the DTD is unknown.
+Proceed even if the DTD is unknown or if nsgmls finds errors in the input
+file.
 
 =item include-all
 
@@ -367,6 +368,7 @@
         $origfile .= ${$self->{TT}{doc_in}}[$i];
         $i+=2;
     }
+    unless ($self->{options}{'force'}) {
     # Detect if we can find the DTD
     open (VALID, "| nsgmls -p")
         or die wrap_mod("po4a::sgml",
@@ -377,6 +379,7 @@
                         dgettext("po4a", "Error while running nsgmls -p.  ".
                                          "Please check if nsgmls and the ".
                                          "DTD are installed."));
+    }
     # Detect the XML pre-prolog
     if ($origfile =~ s/^(\s*<\?xml[^?]*\?>)//) {
 	warn wrap_mod("po4a::sgml", dgettext("po4a",