Skip to content

Commit e5b40d8

Browse files
committed
Add case-insensitive extension property test
Requires anticipated CSS::Module v0.6.8 release.
1 parent b0c81f9 commit e5b40d8

File tree

1 file changed

+8
-2
lines changed

1 file changed

+8
-2
lines changed

t/extend.t

Lines changed: 8 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,8 @@
11
use v6;
22
use Test;
3-
plan 19;
4-
require CSS::Module::CSS3;
3+
plan 20;
4+
use CSS::Module::CSS3;
5+
use CSS::Module;
56
use CSS::Properties;
67

78
my $my-align-calls;
@@ -21,6 +22,7 @@ my %extensions = %(
2122
:coerce(-> Int() $num {$my-span-calls++; :$num }),
2223
),
2324
'-my-any' => %(),
25+
'-my-mixed-CASE' => %(),
2426
);
2527

2628
my $module = CSS::Module::CSS3.module: :%extensions;
@@ -53,6 +55,10 @@ is $css.Str, '-my-span:5;', 'reserialization';
5355
is $css."-my-span"(), 5;
5456
is $css."-my-align"(), 'middle';
5557

58+
todo "Requires CSS::Module v0.6.8+"
59+
unless CSS::Module.^ver >= v0.6.8;
60+
lives-ok { $css."-my-mixed-case"() }, 'case insensitivity';
61+
5662
subtest 'parse' => {
5763
$my-span-calls = 0;
5864
$my-align-calls = 0;

0 commit comments

Comments
 (0)