X-Git-Url: http://git.ieval.ro/?a=blobdiff_plain;f=t%2FSVG-SpriteMaker.t;fp=t%2FSVG-SpriteMaker.t;h=4c3719937dd87957335d0a21e7399ee49cdac2ba;hb=014f8c27d1123b5d338e675dcf5d06b4b269ba03;hp=b83a9394ccc72eebf192bebcfda73c15e7e43f4c;hpb=39589141d278d3a90361f1939a59be2c462ca962;p=svg-spritemaker.git diff --git a/t/SVG-SpriteMaker.t b/t/SVG-SpriteMaker.t index b83a939..4c37199 100644 --- a/t/SVG-SpriteMaker.t +++ b/t/SVG-SpriteMaker.t @@ -2,11 +2,15 @@ use strict; use warnings; -use Test::More tests => 3; +use Test::More tests => 5; BEGIN { use_ok('SVG::SpriteMaker') }; +# Don't warn, we intentionally have a duplicate ID +local $ENV{SVG_SPRITEMAKER_NO_DUPLICATE_WARNINGS} = 1; my $sprite = make_sprite frag => ; my @elements = $sprite->getFirstChild->getChildren; ok $sprite->getElementByID('frag-rect'), 'sprite contains #frag-rect'; ok $sprite->getElementByID('frag-circle'), 'sprite contains #frag-circle'; +like $sprite->xmlify, qr/id="thing"/, 'sprite contains #thing'; +like $sprite->xmlify, qr/id="thing_"/, 'sprite contains #thing_';