Changeset 58

Show
Ignore:
Timestamp:
02/21/06 17:28:31 (2 years ago)
Author:
miya
Message:

modify createEntry method in My::XML::Atom::Client.pm

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • atom_client/trunk/lib/My/XML/Atom/Client.pm

    r56 r58  
    5252    #    unless $res->code == 201; 
    5353    $res->header('Location') || 1; 
    54  
    55     return (undef, $req, $res); 
     54    my $xml = XML::Atom::Entry->new(Stream => \$res->content) 
     55        or return $client->error(XML::Atom::Entry->errstr); 
     56    return ($xml, $req, $res); 
    5657} 
    5758