merge helpers
[catagits/HTML-Zoom.git] / t / actions.t
index 6b7c12c..8805a55 100644 (file)
@@ -117,6 +117,14 @@ is(
   'remove attribute on non existing attribute'
 );
 
+($expect = $tmpl) =~ s/class="main"/class=""/;
+
+is(
+  run_for { $_->remove_from_attribute({ class => 'main' }) },
+  $expect,
+  'remove name from attribute'
+);
+
 ($expect = $tmpl) =~ s/ class="main"//;
 
 is(