view release on metacpan or  search on metacpan

t/02.formatting.t  view on Meta::CPAN

            },
        );

    @parsed = $preparer->parse_string( $css );
    is_deeply( \@structure, \@parsed )
        or say "display property was:\n" . Dumper \@parsed;
}
{
    $css = <<CSS;
        div { clear: both; }
CSS
    @structure = (
            {
                original  => ' clear: both; ',
                errors    => [],
                selectors => [ 'div' ],
                block     => { 'clear' => 'both', },
            },
        );

    @parsed = $preparer->parse_string( $css );
    is_deeply( \@structure, \@parsed )
        or say "display property was:\n" . Dumper \@parsed;
}
{
    $css = <<CSS;
        div { z-index: 50; }
CSS
    @structure = (
            {
                original  => ' z-index: 50; ',
                errors    => [],
                selectors => [ 'div' ],
                block     => { 'z-index' => '50', },
            },
        );

    @parsed = $preparer->parse_string( $css );
    is_deeply( \@structure, \@parsed )
        or say "z-index property was:\n" . Dumper \@parsed;
}
{
    $css = <<CSS;
        div { direction: rtl; }
CSS
    @structure = (
            {
                original  => ' direction: rtl; ',
                errors    => [],
                selectors => [ 'div' ],
                block     => { 'direction' => 'rtl', },
            },
        );

    @parsed = $preparer->parse_string( $css );
    is_deeply( \@structure, \@parsed )
        or say "direction property was:\n" . Dumper \@parsed;
}
{
    $css = <<CSS;
        div { unicode-bidi: embed; }
CSS
    @structure = (
            {
                original  => ' unicode-bidi: embed; ',
                errors    => [],
                selectors => [ 'div' ],
                block     => { 'unicode-bidi' => 'embed', },
            },
        );

    @parsed = $preparer->parse_string( $css );
    is_deeply( \@structure, \@parsed )
        or say "unicode-bidi property was:\n" . Dumper \@parsed;
}
{
    $css = <<CSS;
        div { vertical-align: baseline; }
CSS
    @structure = (
            {
                original  => ' vertical-align: baseline; ',
                errors    => [],
                selectors => [ 'div' ],
                block     => { 'vertical-align' => 'baseline', },
            },
        );

    @parsed = $preparer->parse_string( $css );
    is_deeply( \@structure, \@parsed )
        or say "vertical-align property was:\n" . Dumper \@parsed;
}
{
    $css = <<CSS;
        div { line-height: 1.3; }
CSS
    @structure = (
            {
                original  => ' line-height: 1.3; ',
                errors    => [],
                selectors => [ 'div' ],
                block     => { 'line-height' => '1.3', },
            },
        );

    @parsed = $preparer->parse_string( $css );
    is_deeply( \@structure, \@parsed )
        or say "line-height property was:\n" . Dumper \@parsed;
}
{
    $css = <<CSS;
        div { width: 50%; min-width: 100px; max-width: 350px; }
CSS
    @structure = (
            {
                original  => ' width: 50%; min-width: 100px; max-width: 350px; ',
                errors    => [],
                selectors => [ 'div' ],
                block     => { 
                    'width'     => '50%', 
                    'min-width' => '100px', 
                    'max-width' => '350px', 
                },
            },
        );

    @parsed = $preparer->parse_string( $css );
    is_deeply( \@structure, \@parsed )
        or say "width property was:\n" . Dumper \@parsed;
}
{
    $css = <<CSS;
        div { height: 50%; min-height: 100px; max-height: 350px; }
CSS