[Po4a-commits] po4a/lib/Locale/Po4a Po.pm,1.39,1.40

[Nicolas FRAN??OIS]

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

Modified Files:
	Po.pm 
Log Message:
Allow multiple comment lines for a PO string.


Index: Po.pm
===================================================================
RCS file: /cvsroot/po4a/po4a/lib/Locale/Po4a/Po.pm,v
retrieving revision 1.39
retrieving revision 1.40
diff -u -d -r1.39 -r1.40
--- Po.pm	2 Apr 2005 22:19:29 -0000	1.39
+++ Po.pm	2 Apr 2005 23:05:02 -0000	1.40
@@ -254,8 +254,12 @@
 	
 	$output .= format_comment($self->{po}{$msgid}{'comment'},"") 
 	    if $self->{po}{$msgid}{'comment'};
-	$output .= format_comment($self->{po}{$msgid}{'automatic'},". ")
-	   if $self->{po}{$msgid}{'automatic'};
+	if ($self->{po}{$msgid}{'automatic'}) {
+	    foreach my $comment (split(/\\n/,$self->{po}{$msgid}{'automatic'}))
+	    {
+		$output .= format_comment($comment, ". ")
+	    }
+	}
 	$output .= format_comment($self->{po}{$msgid}{'type'}," type: ") 
 	    if $self->{po}{$msgid}{'type'};
 	$output .= format_comment($self->{po}{$msgid}{'reference'},": ")