ignore if attr doesn't exist.

[catagits/HTML-Zoom.git] / t / actions.t

diff --git a/t/actions.t b/t/actions.t
index 8805a55..7f23cd4 100644 (file)
--- 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(