Changeset 59

Show
Ignore:
Timestamp:
02/21/06 17:41:51 (3 years ago)
Author:
miya
Message:

modify updateEntry() and deleteEntry() in My::XML::Atom::Client

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • atom_client/trunk/lib/My/XML/Atom/Client.pm

    r58 r59  
    6969    #return $client->error("Error on PUT $url: " . $res->status_line) 
    7070    #    unless $res->code == 200; 
    71     return (undef, $req, $res); 
     71    my $xml = XML::Atom::Entry->new(Stream => \$res->content) 
     72        or return $client->error(XML::Atom::Entry->errstr); 
     73    return ($xml, $req, $res); 
    7274} 
    7375 
    …… 
    7981    #return $client->error("Error on DELETE $url: " . $res->status_line) 
    8082    #    unless $res->code == 200; 
    81     return (undef, $req, $res); 
     83    my $xml = XML::Atom::Entry->new(Stream => \$res->content) 
     84        or return $client->error(XML::Atom::Entry->errstr); 
     85    return ($xml, $req, $res); 
    8286} 
    8387