X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Factions.t;fp=t%2Factions.t;h=d1dcc54d2c2de674f238798ade1755a38c568c9a;hb=071d883153cb8067921eada9946a996b68c70fc7;hp=1b8b1fbad85ef877b35f0b3e30485b8a9fc1c7e6;hpb=c84b68f396fb5b0e81dbae8927519b2e06138734;p=catagits%2FHTML-Zoom.git diff --git a/t/actions.t b/t/actions.t index 1b8b1fb..d1dcc54 100644 --- a/t/actions.t +++ b/t/actions.t @@ -125,6 +125,20 @@ is( 'remove name from attribute' ); +is( + run_for { $_->remove_from_attribute({ madeup => 'main' }) }, + $tmpl, + 'remove name from non existing attribute (ignored)' +); + +($expect = $tmpl) =~ s/class="main"/class=""/; + +is( + run_for { $_->remove_class( 'main' ) }, + $expect, + 'remove_class' +); + ($expect = $tmpl) =~ s/ class="main"//; is(