From 9e1700039bee97c38471970469e4cbef0795ba44 Mon Sep 17 00:00:00 2001
From: franck cuny <franck@lumberjaph.net>
Date: Mon, 14 Jun 2010 15:24:44 +0200
Subject: private

---
 lib/Net/Riak/Object.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/Net/Riak/Object.pm b/lib/Net/Riak/Object.pm
index 288abbe..aee4b78 100644
--- a/lib/Net/Riak/Object.pm
+++ b/lib/Net/Riak/Object.pm
@@ -126,7 +126,7 @@ sub store {
     }
 
     if ($self->count_links > 0) {
-        $request->header('link' => $self->links_to_header);
+        $request->header('link' => $self->_links_to_header);
     }
 
     if ($self->_jsonize) {
@@ -141,7 +141,7 @@ sub store {
     $self;
 }
 
-sub links_to_header {
+sub _links_to_header {
     my $self        = shift;
     my $header_link = '';
     foreach my $l ($self->links) {
-- 
cgit 1.4.1