From 317b78815a4f8571a5762438d38ada506dee910a Mon Sep 17 00:00:00 2001
From: Kenichi Ishigaki <ishigaki@cpan.org>
Date: Thu, 4 Jul 2013 13:23:50 +0900
Subject: [PATCH] oops

---
 lib/UnQLite.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lib/UnQLite.pm b/lib/UnQLite.pm
index 93f932a..04c55fb 100644
--- a/lib/UnQLite.pm
+++ b/lib/UnQLite.pm
@@ -12,7 +12,7 @@ XSLoader::load(__PACKAGE__, $VERSION);
 
 sub TIEHASH {
     my $class = shift;
-    my $self = $class->open(@_) or croak $class->errstr;
+    my $self = $class->open(@_) or Carp::croak $class->errstr;
     $self->cursor_init;
 }
 
@@ -112,14 +112,14 @@ sub FETCH {
 
 sub STORE {
     my ($self, $key, $value) = @_;
-    $self->[1]->kv_store($key, $value) or croak $self->[1]->errstr;
+    $self->[1]->kv_store($key, $value) or Carp::croak $self->[1]->errstr;
     $value;
 }
 
 sub DELETE {
     my ($self, $key) = @_;
     my $prev = $self->kv_fetch($key);
-    $self->[1]->kv_delete($key) or croak $self->[1]->errstr;
+    $self->[1]->kv_delete($key) or Carp::croak $self->[1]->errstr;
     $prev;
 }