Fixed more 'Passing a list of values to enum is deprecated' errors an…

…d made version come from Net/Amazon/S3.pm
robin13 · Apr 1, 2015 · b757bc8 · b757bc8
1 parent 2153da8
commit b757bc8
Show file tree

Hide file tree

Showing 4 changed files with 4 additions and 3 deletions.
diff --git a/CHANGES b/CHANGES
@@ -1,4 +1,5 @@
 Revision history for Perl module Net::Amazon::S3:
+0.60 2015-04-01 Moose enum fixes
 
 0.60 Sun May 11 23:41:12 BST 2014
 

diff --git a/Makefile.PL b/Makefile.PL
@@ -62,7 +62,7 @@ my %WriteMakefileArgs = (
     "Test::More" => 0,
     "vars" => 0
   },
-  "VERSION" => "0.60",
+  "VERSION_FROM"  => 'lib/Net/Amazon/S3.pm',
   "test" => {
     "TESTS" => "t/*.t"
   }

diff --git a/lib/Net/Amazon/S3.pm b/lib/Net/Amazon/S3.pm
@@ -1,6 +1,6 @@
 package Net::Amazon::S3;
 {
-  $Net::Amazon::S3::VERSION = '0.60';
+  $Net::Amazon::S3::VERSION = '0.61';
 }
 use Moose 0.85;
 use MooseX::StrictConstructor 0.16;

diff --git a/lib/Net/Amazon/S3/Client/Object.pm b/lib/Net/Amazon/S3/Client/Object.pm
@@ -19,7 +19,7 @@ enum 'AclShort' =>
     [ qw(private public-read public-read-write authenticated-read) ];
 
 enum 'StorageClass' =>
-    qw(standard reduced_redundancy);
+    [ qw(standard reduced_redundancy) ];
 
 has 'client' =>
     ( is => 'ro', isa => 'Net::Amazon::S3::Client', required => 1 );