Changeset 1622

Show
Ignore:
Timestamp:
08/25/05 07:15:52
Author:
miyagawa
Message:

handle 304 no change

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • WebService-Bloglines/trunk/Changes

    r1516 r1622  
    11Revision history for Perl extension WebService::Bloglines 
     2 
     30.06  Wed Aug 24 22:15:21 UTC 2005 
     4        - handle '304 No Change' as no updates, not fatal error 
     5          (Thanks to Ben Trott) 
    26 
    370.05  Tue Feb 15 23:08:23 JST 2005 
  • WebService-Bloglines/trunk/lib/WebService/Bloglines.pm

    r1516 r1622  
    33use strict; 
    44use vars qw($VERSION); 
    5 $VERSION = 0.05
     5$VERSION = 0.06
    66 
    77use LWP::UserAgent; 
     
    8181    my $res  = $self->_request("http://rpc.bloglines.com/getitems", %param); 
    8282 
     83    # 304 means no updates 
     84    return if $res->code == 304; 
     85 
     86    # otherwise, something bad is happened 
    8387    unless ($res->code == 200) { 
    8488        $self->_die($res->status_line);