r18091 - in /branches/upstream/libnet-amazon-s3-perl/current: CHANGES META.yml lib/Net/Amazon/S3.pm

[gregoa-guest at users.alioth.debian.org]

Author: gregoa-guest
Date: Fri Mar 28 20:19:08 2008
New Revision: 18091

URL: http://svn.debian.org/wsvn/?sc=1&rev=18091
Log:
[svn-upgrade] Integrating new upstream version, libnet-amazon-s3-perl (0.44)

Modified:
    branches/upstream/libnet-amazon-s3-perl/current/CHANGES
    branches/upstream/libnet-amazon-s3-perl/current/META.yml
    branches/upstream/libnet-amazon-s3-perl/current/lib/Net/Amazon/S3.pm

Modified: branches/upstream/libnet-amazon-s3-perl/current/CHANGES
URL: http://svn.debian.org/wsvn/branches/upstream/libnet-amazon-s3-perl/current/CHANGES?rev=18091&op=diff
==============================================================================
--- branches/upstream/libnet-amazon-s3-perl/current/CHANGES (original)
+++ branches/upstream/libnet-amazon-s3-perl/current/CHANGES Fri Mar 28 20:19:08 2008
@@ -1,4 +1,8 @@
 Revision history for Perl module Net::Amazon::S3:
+
+0.44 Thu Mar 27 08:35:59 GMT 2008
+    - fix bug with storing files consisting of "0" (thanks to
+      Martin Atkins)
 
 0.43 Sat Mar  1 10:55:54 GMT 2008
      - add binmode() to support Windows (thanks to Gabriel Weinberg)

Modified: branches/upstream/libnet-amazon-s3-perl/current/META.yml
URL: http://svn.debian.org/wsvn/branches/upstream/libnet-amazon-s3-perl/current/META.yml?rev=18091&op=diff
==============================================================================
--- branches/upstream/libnet-amazon-s3-perl/current/META.yml (original)
+++ branches/upstream/libnet-amazon-s3-perl/current/META.yml Fri Mar 28 20:19:08 2008
@@ -1,6 +1,6 @@
 --- #YAML:1.0
 name:                Net-Amazon-S3
-version:             0.43
+version:             0.44
 abstract:            ~
 license:             perl
 author:              

Modified: branches/upstream/libnet-amazon-s3-perl/current/lib/Net/Amazon/S3.pm
URL: http://svn.debian.org/wsvn/branches/upstream/libnet-amazon-s3-perl/current/lib/Net/Amazon/S3.pm?rev=18091&op=diff
==============================================================================
--- branches/upstream/libnet-amazon-s3-perl/current/lib/Net/Amazon/S3.pm (original)
+++ branches/upstream/libnet-amazon-s3-perl/current/lib/Net/Amazon/S3.pm Fri Mar 28 20:19:08 2008
@@ -112,7 +112,7 @@
 __PACKAGE__->mk_accessors(
     qw(libxml aws_access_key_id aws_secret_access_key secure ua err errstr timeout retry)
 );
-our $VERSION = '0.43';
+our $VERSION = '0.44';
 
 my $AMAZON_HEADER_PREFIX = 'x-amz-';
 my $METADATA_PREFIX      = 'x-amz-meta-';
@@ -663,8 +663,8 @@
     my ( $self, $method, $path, $headers, $data, $metadata ) = @_;
     croak 'must specify method' unless $method;
     croak 'must specify path'   unless defined $path;
-    $headers  ||= {};
-    $data     ||= '';
+    $headers ||= {};
+    $data = '' if not defined $data;
     $metadata ||= {};
 
     my $http_headers = $self->_merge_meta( $headers, $metadata );