[Po4a-commits] "po4a/lib/Locale/Po4a Html.pm,1.13,1.14"

[Nicolas FRANCOIS]

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

Modified Files:
	Html.pm 
Log Message:
Re-indented.


Index: Html.pm
===================================================================
RCS file: /cvsroot/po4a/po4a/lib/Locale/Po4a/Html.pm,v
retrieving revision 1.13
retrieving revision 1.14
diff -u -d -r1.13 -r1.14
--- Html.pm	5 Aug 2007 16:54:53 -0000	1.13
+++ Html.pm	5 Aug 2007 16:56:01 -0000	1.14
@@ -100,16 +100,16 @@
 #  use HTML::Entities ();
 #  $encoded = HTML::Entities::encode($a);
 #  $decoded = HTML::Entities::decode($a);
-	    #print STDERR $token->[0];
+            #print STDERR $token->[0];
             $self->pushline( $pre_spaces . $self->translate($text,
-		                                  "FIXME:0",
-		                                  (scalar @type ? $type[scalar @type-1]: "NOTYPE")
-	                                         ) . $post_spaces,
+                                                  "FIXME:0",
+                                                  (scalar @type ? $type[scalar @type-1]: "NOTYPE")
+                                                  ) . $post_spaces,
                              'wrap' => 1
                              );
             next NEXT;
-	} elsif ($token->[0] eq 'S') {
-	    push @type,$token->[1];
+        } elsif ($token->[0] eq 'S') {
+            push @type,$token->[1];
             my $text =  get_tag( $token );
             my $tag = $token->[1];
 # TODO: It would be nice to support an option to specify these
@@ -138,9 +138,9 @@
             $text .= $closing;
             $self->pushline( $text );
         } elsif ($token->[0] eq 'E') {
-	    pop @type;
+            pop @type;
             $self->pushline( get_tag( $token ) );
-	} else	{ 
+        } else { 
             $self->pushline( get_tag( $token ) );
         }       
     }