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