Changeset 58
- Timestamp:
- 02/21/06 17:28:31 (2 years ago)
- Files:
-
- atom_client/trunk/lib/My/XML/Atom/Client.pm (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
atom_client/trunk/lib/My/XML/Atom/Client.pm
r56 r58 52 52 # unless $res->code == 201; 53 53 $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); 56 57 } 57 58
