Commit | Line | Data |
---|---|---|
1c4ebc89 | 1 | use strict; use warnings FATAL => 'all'; |
2 | use Test::More qw(no_plan); | |
3 | ||
4 | { | |
5 | ||
6 | package Foo; | |
1c4ebc89 | 7 | sub foo { |
8 | use CSS::Declare; | |
4a610f74 | 9 | return ( |
1c4ebc89 | 10 | '*' => [ color 'red' ], |
11 | 'tr, td' => [ margin '1px' ], | |
4a610f74 | 12 | ); |
1c4ebc89 | 13 | } |
14 | } | |
15 | ||
16 | is( | |
17 | CSS::Declare::to_css_string(Foo::foo()), | |
18 | '* {color:red} tr, td {margin:1px}', | |
19 | 'Basic CSS::Declare usage' | |
20 | ); | |
21 | ||
9436712e | 22 | ok(!Foo->can('color'), 'Death on use of unimported tag'); |
1c4ebc89 | 23 |