Fix duck_type constraint generators

[gitmo/Moose.git] / lib / Class / MOP / Class.pm

diff --git a/lib/Class/MOP/Class.pm b/lib/Class/MOP/Class.pm
index 45dfd46..1482ade 100644 (file)
--- a/lib/Class/MOP/Class.pm
+++ b/lib/Class/MOP/Class.pm
@@ -727,6 +727,7 @@ sub _create_meta_instance {
     return $instance;
 }
 
+# TODO: this is actually not being used!
 sub _inline_rebless_instance {
     my $self = shift;
 
@@ -1269,7 +1270,7 @@ sub _immutable_options {
 sub make_immutable {
     my ( $self, @args ) = @_;
 
-    return if not $self->is_mutable;
+    return unless $self->is_mutable;
 
     my ($file, $line) = (caller)[1..2];
 
@@ -1279,6 +1280,7 @@ sub make_immutable {
         $self->_immutable_options(@args),
     );
     $self->_rebless_as_immutable(@args);
+
     return $self;
 }