From 0425b9a802b54d223c616c678f3af326cc6adf1c Mon Sep 17 00:00:00 2001
From: Mainframe2008 <thg.bot@gmail.com>
Date: Fri, 1 Feb 2013 12:44:18 +0100
Subject: Added comments for searching using secondary indexes

---
 lib/Net/Riak/Role/REST/Search.pm | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)

diff --git a/lib/Net/Riak/Role/REST/Search.pm b/lib/Net/Riak/Role/REST/Search.pm
index b83e3d4..7e74af5 100644
--- a/lib/Net/Riak/Role/REST/Search.pm
+++ b/lib/Net/Riak/Role/REST/Search.pm
@@ -1,6 +1,7 @@
 package Net::Riak::Role::REST::Search;
 use Moose::Role;
 use JSON;
+use Data::Dumper;
 
 #ABSTRACT: Search interface
 
@@ -73,4 +74,24 @@ sub setup_indexing {
     JSON::decode_json($http_response->content);
 }
 
+sub i2search {
+	my $self = shift;
+	my %params = @_;
+	my $request;
+	
+	my $org_prefix = $self->prefix;
+	
+	$request = $self->new_request('GET', [
+			'buckets',
+			$params{bucket},
+			'index',
+			$params{index},
+			$params{key}
+			]
+	);
+	
+	my $http_response = $self->send_request($request);
+	JSON::decode_json($http_response->content)->{keys};
+}
+
 1;
-- 
cgit 1.4.1