From: Arthur Axel 'fREW' Schmidt <frioux@gmail.com>
Date: Thu, 3 Dec 2009 05:14:11 +0000 (-0600)
Subject: better test for unimporting
X-Git-Tag: v0.003~21^2~2
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FWeb-Simple.git;a=commitdiff_plain;h=9436712edbf4c7b1da55bfc44f5106d98b19063f

better test for unimporting
---

diff --git a/t/css_declare.t b/t/css_declare.t
index 1427940..f681508 100644
--- a/t/css_declare.t
+++ b/t/css_declare.t
@@ -4,7 +4,6 @@ use Test::More qw(no_plan);
 {
 
   package Foo;
-
   sub foo {
     use CSS::Declare;
     return (
@@ -20,5 +19,5 @@ is(
   'Basic CSS::Declare usage'
 );
 
-ok(!eval "color 'red'", 'Death on use of unimported tag');
+ok(!Foo->can('color'), 'Death on use of unimported tag');