$OpenBSD: patch-lib_Rose_DB_Registry_Entry_pm,v 1.3 2015/12/12 19:58:39 jasper Exp $
--- lib/Rose/DB/Registry/Entry.pm.orig	Wed Mar 18 00:30:03 2015
+++ lib/Rose/DB/Registry/Entry.pm	Sat Dec 12 20:41:36 2015
@@ -2,7 +2,7 @@ package Rose::DB::Registry::Entry;
 
 use strict;
 
-use Clone::PP();
+use Clone();
 
 use Rose::Object;
 our @ISA = qw(Rose::Object);
@@ -189,7 +189,7 @@ sub dump
   {
     my $value = $self->$attr();
     next  unless(defined $value);
-    $dump{$attr} = Clone::PP::clone($value);
+    $dump{$attr} = Clone::clone($value);
   }
 
 
@@ -199,13 +199,13 @@ sub dump
   {
     my $value = $self->{$attr};
     next  unless(defined $value);
-    $dump{$attr} = Clone::PP::clone($value);
+    $dump{$attr} = Clone::clone($value);
   }
 
   return \%dump;
 }
 
-sub clone { Clone::PP::clone($_[0]) }
+sub clone { Clone::clone($_[0]) }
 
 1;
 
