From 8ef109e820ffeb31b158ec6f400eccc10fe208bb Mon Sep 17 00:00:00 2001 From: franck cuny Date: Tue, 2 Nov 2010 15:38:27 +0100 Subject: prepare to release --- lib/Net/Riak/Client.pm | 4 ++-- lib/Net/Riak/MapReduce.pm | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) (limited to 'lib') diff --git a/lib/Net/Riak/Client.pm b/lib/Net/Riak/Client.pm index e76a0ef..dbe3c16 100644 --- a/lib/Net/Riak/Client.pm +++ b/lib/Net/Riak/Client.pm @@ -30,13 +30,13 @@ has client_id => ( has http_request => ( is => 'rw', isa => 'HTTP::Request', -); +); has http_response => ( is => 'rw', isa => 'HTTP::Response', handles => ['is_success'] -); +); with 'Net::Riak::Role::UserAgent'; with qw/ diff --git a/lib/Net/Riak/MapReduce.pm b/lib/Net/Riak/MapReduce.pm index 14e4007..8ebe563 100644 --- a/lib/Net/Riak/MapReduce.pm +++ b/lib/Net/Riak/MapReduce.pm @@ -54,7 +54,7 @@ sub add { }while(my $arg = shift @_); return $self; } - + if (!scalar @_) { if (blessed($arg)) { $self->add_object($arg); @@ -212,7 +212,7 @@ sub run { my $query = $riak->add("Cats"); $query->map( - 'function(v, d, a) { return [v]; }', + 'function(v, d, a) { return [v]; }', arg => [qw/some params to your function/] ); -- cgit v1.2.3