[Po4a-commits] po4a/lib/Locale/Po4a TransTractor.pm,1.43,1.44

[Jordi Vilalta]

Update of /cvsroot/po4a/po4a/lib/Locale/Po4a
In directory haydn:/tmp/cvs-serv16741/lib/Locale/Po4a

Modified Files:
	TransTractor.pm 
Log Message:
Change the second instance of the same error message.
Removed a wrong negation in a condition.


Index: TransTractor.pm
===================================================================
RCS file: /cvsroot/po4a/po4a/lib/Locale/Po4a/TransTractor.pm,v
retrieving revision 1.43
retrieving revision 1.44
diff -u -d -r1.43 -r1.44
--- TransTractor.pm	17 Aug 2004 23:13:54 -0000	1.43
+++ TransTractor.pm	17 Aug 2004 23:50:08 -0000	1.44
@@ -944,14 +944,14 @@
 
 sub recode_skipped_text {
     my ($self,$text)=(shift,shift);
-    unless (!$self->{TT}{'ascii_input'}) {
+    unless ($self->{TT}{'ascii_input'}) {
 	if(defined($self->{TT}{'file_in_charset'}) and
 	    length($self->{TT}{'file_in_charset'}) ) {
 	    Encode::from_to($text,$self->{TT}{'file_in_charset'},
 		$self->get_out_charset);
 	    return $text;
 	} else {
-	    die dgettext("po4a","Couldn't determine the input document's character set. Please specify it on the command line.")."\n";
+	    die "po4a: ".sprintf(dgettext("po4a","Couldn't determine the input document's character set. Please specify it on the command line. (non-ascii char at %s)"),$self->{TT}{non_ascii_ref})."\n"
 	}
     }
 }