[Po4a-commits] "po4a/lib/Locale/Po4a Xml.pm,1.66,1.67"

Nicolas FRANCOIS nekral-guest at alioth.debian.org
Sun Mar 2 00:49:04 UTC 2008


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

Modified Files:
	Xml.pm 
Log Message:
iUse get_translate_options to check if a tag should be inlined.


Index: Xml.pm
===================================================================
RCS file: /cvsroot/po4a/po4a/lib/Locale/Po4a/Xml.pm,v
retrieving revision 1.66
retrieving revision 1.67
diff -u -d -r1.66 -r1.67
--- Xml.pm	2 Mar 2008 00:46:56 -0000	1.66
+++ Xml.pm	2 Mar 2008 00:49:02 -0000	1.67
@@ -681,8 +681,8 @@
 
 sub tag_break_close {
 	my ($self, at tag)=@_;
-	if ($self->tag_in_list($self->get_path."<".
-		$self->get_tag_name(@tag).">",@{$self->{inline}})) {
+	my $struct = $self->get_path."<".$self->get_tag_name(@tag).">";
+	if ($self->get_translate_options($struct) =~ m/i/) {
 		return 0;
 	} else {
 		return 1;
@@ -721,8 +721,8 @@
 
 sub tag_break_alone {
 	my ($self, at tag)=@_;
-	if ($self->tag_in_list($self->get_path."<".
-		$self->get_tag_name(@tag).">",@{$self->{inline}})) {
+	my $struct = $self->get_path."<".$self->get_tag_name(@tag).">";
+	if ($self->get_translate_options($struct) =~ m/i/) {
 		return 0;
 	} else {
 		return 1;
@@ -742,8 +742,8 @@
 
 sub tag_break_open {
 	my ($self, at tag)=@_;
-	if ($self->tag_in_list($self->get_path."<".
-		$self->get_tag_name(@tag).">",@{$self->{inline}})) {
+	my $struct = $self->get_path."<".$self->get_tag_name(@tag).">";
+	if ($self->get_translate_options($struct) =~ m/i/) {
 		return 0;
 	} else {
 		return 1;




More information about the Po4a-commits mailing list