From: Vincent Pit <vince@profvince.com>
Date: Mon, 15 Mar 2010 17:28:47 +0000 (+0100)
Subject: This is 0.41
X-Git-Tag: v0.41^0
X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=6c7c2526186bcb3bb40a9a337d77af313f5b2a4e;p=perl%2Fmodules%2FVariable-Magic.git

This is 0.41
---

diff --git a/Changes b/Changes
index c37d46a..9a7914e 100644
--- a/Changes
+++ b/Changes
@@ -1,5 +1,13 @@
 Revision history for Variable-Magic
 
+0.41    2010-03-15 17:35 UTC
+        + Doc : Tweaks and fixups.
+                Thanks Shlomi Fish.
+        + Fix : Compatibility with the soon-to-be-released perl 5.12.0.
+        + Fix : Correctly propagate the errors thrown when variable destruction
+                happens at compile-time and not from inside eval STRING.
+                Thanks Florian Ragwitz and Ash Berlin for reporting.
+
 0.40    2010-01-06 23:20 UTC
         + Fix : Possible memory miswrites when passing data arguments to cast().
         + Fix : Minor C portability tweaks.
diff --git a/MANIFEST b/MANIFEST
index 88af47a..d429500 100644
--- a/MANIFEST
+++ b/MANIFEST
@@ -1,6 +1,6 @@
 Changes
 MANIFEST
-META.yml # Will be created by "make dist"
+META.yml
 Magic.xs
 Makefile.PL
 README
diff --git a/META.yml b/META.yml
index 52add99..acf9f9c 100644
--- a/META.yml
+++ b/META.yml
@@ -1,6 +1,6 @@
 --- #YAML:1.0
 name:               Variable-Magic
-version:            0.40
+version:            0.41
 abstract:           Associate user-defined magic to variables from Perl.
 author:
     - Vincent Pit <perl@profvince.com>
diff --git a/README b/README
index 23b5303..f6f4362 100644
--- a/README
+++ b/README
@@ -2,7 +2,7 @@ NAME
     Variable::Magic - Associate user-defined magic to variables from Perl.
 
 VERSION
-    Version 0.40
+    Version 0.41
 
 SYNOPSIS
         use Variable::Magic qw/wizard cast VMG_OP_INFO_NAME/;
@@ -30,8 +30,8 @@ SYNOPSIS
         }
 
 DESCRIPTION
-    Magic is Perl way of enhancing objects. This mechanism lets the user add
-    extra data to any variable and hook syntaxical operations (such as
+    Magic is Perl's way of enhancing variables. This mechanism lets the user
+    add extra data to any variable and hook syntactical operations (such as
     access, assignment or destruction) that can be applied to it. With this
     module, you can add your own magic to any variable without having to
     write a single line of XS.
@@ -52,12 +52,12 @@ DESCRIPTION
 
     *   It doesn't replace the original semantics.
 
-        Magic callbacks usually trigger before the original action take
-        place, and can't prevent it to happen. This also makes catching
-        individual events easier than with "tie", where you have to provide
-        fallbacks methods for all actions by usually inheriting from the
-        correct "Tie::Std*" class and overriding individual methods in your
-        own class.
+        Magic callbacks usually get triggered before the original action
+        takes place, and can't prevent it from happening. This also makes
+        catching individual events easier than with "tie", where you have to
+        provide fallbacks methods for all actions by usually inheriting from
+        the correct "Tie::Std*" class and overriding individual methods in
+        your own class.
 
     *   It's type-agnostic.
 
@@ -352,7 +352,9 @@ CONSTANTS
 
 COOKBOOK
   Associate an object to any perl variable
-    This can be useful for passing user data through limited APIs.
+    This technique can be useful for passing user data through limited APIs.
+    It is similar to using inside-out objects, but without the drawback of
+    having to implement a complex destructor.
 
         {
          package Magical::UserData;
@@ -365,9 +367,9 @@ COOKBOOK
           my ($var) = @_;
           my $data = &getdata($var, $wiz);
           unless (defined $data) {
-           &cast($var, $wiz);
-           $data = &getdata($var, $wiz);
-           die "Couldn't cast UserData magic onto the variable" unless defined $data;
+           $data = \(my $slot);
+           &cast($var, $wiz, $slot)
+                            or die "Couldn't cast UserData magic onto the variable";
           }
           $$data;
          }
diff --git a/lib/Variable/Magic.pm b/lib/Variable/Magic.pm
index bdbb97e..bebfc98 100644
--- a/lib/Variable/Magic.pm
+++ b/lib/Variable/Magic.pm
@@ -13,13 +13,13 @@ Variable::Magic - Associate user-defined magic to variables from Perl.
 
 =head1 VERSION
 
-Version 0.40
+Version 0.41
 
 =cut
 
 our $VERSION;
 BEGIN {
- $VERSION = '0.40';
+ $VERSION = '0.41';
 }
 
 =head1 SYNOPSIS