X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FClass%2FMOP%2FInstance.pm;h=303ad4d7dab9e9691c0a97ecf717c7bacc22b20e;hb=a0e95742d64c3965acf708b3beae14de5bfff766;hp=9500e9148da4459831991e1a91ea7de5144b9d24;hpb=1550e0820d345fd483382e2b912ba683da3bdc1d;p=gitmo%2FClass-MOP.git

diff --git a/lib/Class/MOP/Instance.pm b/lib/Class/MOP/Instance.pm
index 9500e91..303ad4d 100644
--- a/lib/Class/MOP/Instance.pm
+++ b/lib/Class/MOP/Instance.pm
@@ -6,7 +6,7 @@ use warnings;
 
 use Scalar::Util 'weaken', 'blessed';
 
-our $VERSION   = '0.78_02';
+our $VERSION   = '0.82_02';
 $VERSION = eval $VERSION;
 our $AUTHORITY = 'cpan:STEVAN';
 
@@ -75,6 +75,9 @@ sub create_instance {
 
 # for compatibility
 sub bless_instance_structure {
+    Carp::cluck('The bless_instance_structure method is deprecated.'
+        . " It will be removed in a future release.\n");
+
     my ($self, $instance_structure) = @_;
     bless $instance_structure, $self->_class_name;
 }