Changeset 2362

Show
Ignore:
Timestamp:
10/03/07 16:30:10
Author:
miyagawa
Message:

Checking in changes prior to tagging of version 0.20. Changelog diff is:

=== Changes
==================================================================
--- Changes (revision 6927)
+++ Changes (local)
@@ -1,5 +1,9 @@

Revision history for Perl extension Web
Scraper

+0.20 Wed Oct 3 00:28:13 PDT 2007
+ - Fixed a bug where URI is not absolutized with a hash reference value
+ - Added eg/jp-playstation-store.pl
+

0.19 Thu Sep 20 22:42:30 PDT 2007

- Try to get HTML encoding from META tags as well, when there's

no charset value in HTTP response header.

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • Web-Scraper/trunk/Changes

    r2359 r2362  
    11Revision history for Perl extension Web::Scraper 
     2 
     30.20  Wed Oct  3 00:28:13 PDT 2007 
     4        - Fixed a bug where URI is not absolutized with a hash reference value 
     5        - Added eg/jp-playstation-store.pl 
    26 
    370.19  Thu Sep 20 22:42:30 PDT 2007 
  • Web-Scraper/trunk/MANIFEST

    r2352 r2362  
    55eg/extract-links.pl 
    66eg/hatena-keyword.pl 
     7eg/jp-playstation-store.pl 
    78eg/rel-tag.pl 
    89eg/search-cpan.pl 
     
    4546t/13_textnode.t 
    4647t/14_absolute_nested.t 
     48t/15_absolute_hash.t 
    4749t/perlcriticrc 
  • Web-Scraper/trunk/lib/Web/Scraper.pm

    r2359 r2362  
    1010use HTML::Selector::XPath; 
    1111 
    12 our $VERSION = '0.19'; 
     12our $VERSION = '0.20'; 
    1313 
    1414sub import { 
     
    182182        my $values; 
    183183        for my $key (keys %$val) { 
    184             $values->{$key} = __get_value($node, $val->{$key}); 
     184            $values->{$key} = __get_value($node, $val->{$key}, $uri); 
    185185        } 
    186186        return $values;