Show
Ignore:
Timestamp:
09/04/08 10:41:06 (5 years ago)
Author:
tomi-ru
Message:

s/$html/$content/

Location:
lang/perl/HTML-MobileJp-Filter/trunk/lib/HTML/MobileJp/Filter
Files:
5 modified

Legend:

Unmodified
Added
Removed

  • lang/perl/HTML-MobileJp-Filter/trunk/lib/HTML/MobileJp/Filter/DoCoMoCSS.pm

    r18789 r18800  
    2020 
    2121sub filter { 
    22     my ($self, $html) = @_; 
     22    my ($self, $content) = @_; 
    2323     
    2424    unless ($self->mobile_agent->is_docomo) { 
    … …  
    2828    if ($self->config->{xml_declaration_replace}) { 
    2929        # instead of $doc->setEncoding etc.. 
    30         $html =~ s/.*(<html)/$self->config->{xml_declaration} . "\n$1"/msei; 
     30        $content =~ s/.*(<html)/$self->config->{xml_declaration} . "\n$1"/msei; 
    3131    } 
    3232      
    3333    my $inliner = HTML::DoCoMoCSS->new(base_dir => $self->config->{base_dir}); 
    34     $html = $inliner->apply($html); 
    35     $html = Encode::decode_utf8($html); 
     34    $content = $inliner->apply($content); 
     35    $content = Encode::decode_utf8($content); 
    3636} 
    3737 

  • lang/perl/HTML-MobileJp-Filter/trunk/lib/HTML/MobileJp/Filter/DoCoMoGUID.pm

    r18789 r18800  
    77 
    88sub filter { 
    9     my ($self, $html) = @_; 
     9    my ($self, $content) = @_; 
    1010     
    1111    unless ($self->mobile_agent->is_docomo) { 
    … …  
    1313    } 
    1414     
    15     HTML::StickyQuery::DoCoMoGUID->new->sticky( scalarref => \$html ); 
     15    HTML::StickyQuery::DoCoMoGUID->new->sticky( scalarref => \$content->stringfy ); 
    1616} 
    1717 

  • lang/perl/HTML-MobileJp-Filter/trunk/lib/HTML/MobileJp/Filter/Dummy.pm

    r15485 r18800  
    1212 
    1313sub filter { 
    14     my ($self, $html) = @_; 
     14    my ($self, $content) = @_; 
    1515     
    1616    return join('', 
    1717        $self->config->{prefix}, 
    18         $html, 
     18        $content->stringfy, 
    1919        $self->config->{suffix}, 
    2020    ); 

  • lang/perl/HTML-MobileJp-Filter/trunk/lib/HTML/MobileJp/Filter/EntityReference.pm

    r15485 r18800  
    1414 
    1515sub filter { 
    16     my ($self, $html) = @_; 
     16    my ($self, $content) = @_; 
    1717     
    1818    if ($self->mobile_agent->is_non_mobile) { 
    1919        if ($self->config->{force}) { 
    20             $html =~ s{(&\#x([A-Z0-9]+);)}{ 
     20            $content =~ s{(&\#x([A-Z0-9]+);)}{ 
    2121                my $code = $1; 
    2222                my $char = chr hex $2; 
    … …  
    2525        } 
    2626    } else { 
    27         $html = convert_pictogram_entities( 
     27        $content = convert_pictogram_entities( 
    2828            mobile_agent => $self->mobile_agent, 
    29             html         => $html, 
     29            html         => $content->stringfy, 
    3030        ); 
    3131    } 
    3232     
    33     $html; 
     33    $content; 
    3434} 
    3535 

  • lang/perl/HTML-MobileJp-Filter/trunk/lib/HTML/MobileJp/Filter/PictogramFallback.pm

    r18789 r18800  
    1515 
    1616sub filter { 
    17     my ($self, $html) = @_; 
     17    my ($self, $content) = @_; 
    1818     
    1919    unless ($self->mobile_agent->is_non_mobile) { 
    … …  
    2121    } 
    2222     
    23     $html =~ s{(\p{InMobileJPPictograms})}{ 
     23    $content =~ s{(\p{InMobileJPPictograms})}{ 
    2424        my $char = Encode::JP::Mobile::Character->from_unicode(ord $1); 
    2525        my @param; 
    … …  
    3434    }ge; 
    3535     
    36     $html; 
     36    $content; 
    3737} 
    3838