From: Dave Rolsky <autarch@urth.org>
Date: Mon, 26 Apr 2010 17:51:42 +0000 (-0500)
Subject: Clarify what $TODO is about
X-Git-Tag: 1.02~8
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=57e6687d0fd56257068f892d51e3a589dde77e35;p=gitmo%2FClass-MOP.git

Clarify what $TODO is about
---

diff --git a/t/041_metaclass_incompatibility.t b/t/041_metaclass_incompatibility.t
index da3b599..5c24305 100644
--- a/t/041_metaclass_incompatibility.t
+++ b/t/041_metaclass_incompatibility.t
@@ -172,7 +172,7 @@ Foo::Meta::Class->create(
     'Foo::Reverse',
 );
 isa_ok(Class::MOP::class_of('Foo::Reverse'), 'Foo::Meta::Class');
-{ local $TODO = "no idea how to handle this";
+{ local $TODO = 'No idea how to handle case where parent class is created before children';
 isa_ok(Class::MOP::class_of('Foo::Reverse::Sub'), 'Foo::Meta::Class');
 isa_ok(Class::MOP::class_of('Foo::Reverse::Sub::Sub'), 'Foo::Meta::Class');
 }