require D::GD 0.07 to avoid prototype mismatch errors

diff --git a/Changes b/Changes
index 12ff01c..37ec51e 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,3 +1,4 @@
+  - require D::GD 0.07 to avoid prototype mismatch errors
   - fix stupid typo in new Sub::Quote section
 
 1.000001 - 2012-07-21

diff --git a/lib/Moo/_Utils.pm b/lib/Moo/_Utils.pm
index 2667055..76ba5d9 100644 (file)
--- a/lib/Moo/_Utils.pm
+++ b/lib/Moo/_Utils.pm
@@ -105,7 +105,7 @@ sub STANDARD_DESTROY {
   die $e if $e; # rethrow
 }
 
-if (eval { require_module('Devel::GlobalDestruction') }) {
+if (eval { use_module('Devel::GlobalDestruction', 0.07) }) {
   *_in_global_destruction = \&Devel::GlobalDestruction::in_global_destruction;
 } elsif (defined ${^GLOBAL_PHASE}) {
   eval 'sub _in_global_destruction () { ${^GLOBAL_PHASE} eq q[DESTRUCT] }';