Upgrade to Attribute-Handlers-0.83

3 files changed, 9 insertions, 4 deletions

diff --git a/ext/Attribute-Handlers/Changes b/ext/Attribute-Handlers/Changes
index 212a998466..394ef5253e 100644
--- a/ext/Attribute-Handlers/Changes
+++ b/ext/Attribute-Handlers/Changes
@@ -119,4 +119,6 @@ Revision history for Perl extension Attribute::Handlers
 0.82	Wed Mar 11 17:17:00 CET 2009
         - Bring test code in line with core perl.
 	
-	
+0.83	Fri Mar 13 15:14:00 CET 2009
+        - Re-add a TODO marker in the tests that would fail on 5.6.2.
+
diff --git a/ext/Attribute-Handlers/lib/Attribute/Handlers.pm b/ext/Attribute-Handlers/lib/Attribute/Handlers.pm
index 1d28768285..aba1138022 100644
--- a/ext/Attribute-Handlers/lib/Attribute/Handlers.pm
+++ b/ext/Attribute-Handlers/lib/Attribute/Handlers.pm
@@ -4,7 +4,7 @@ use Carp;
 use warnings;
 use strict;
 use vars qw($VERSION $AUTOLOAD);
-$VERSION = '0.82';
+$VERSION = '0.83';
 # $DB::single=1;
 
 my %symcache;
diff --git a/ext/Attribute-Handlers/t/linerep.t b/ext/Attribute-Handlers/t/linerep.t
index 76f63994db..e417de5aaa 100644
--- a/ext/Attribute-Handlers/t/linerep.t
+++ b/ext/Attribute-Handlers/t/linerep.t
@@ -41,6 +41,9 @@ sub SArgs : ATTR(SCALAR) {
     is( ref $data,	'ARRAY',	'data' );
     is( $data->[0],	'grumpf',	'data' );
     is( $phase,		'CHECK',	'phase' );
-    is( $filename,	__FILE__,	'filename' );
-    is( $linenum,	42,		'linenum' );
+    TODO: {
+      local $TODO = "Doesn't work correctly" if $] < 5.008;
+      is( $filename,	__FILE__,	'filename' );
+      is( $linenum,	42,		'linenum' );
+    }
 }