X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FHTML%2FZoom.pm;fp=lib%2FHTML%2FZoom.pm;h=208bf770972aa5974c43647d6752def187d8cd46;hb=484f42058536d0cae692241fc29967f1c42d315a;hp=26ad101dbefc5a17514ba4c91b66cb4a39c9a3e4;hpb=5c4c9836ca949e555a592fd2098b7107a6a35724;p=catagits%2FHTML-Zoom.git diff --git a/lib/HTML/Zoom.pm b/lib/HTML/Zoom.pm index 26ad101..208bf77 100644 --- a/lib/HTML/Zoom.pm +++ b/lib/HTML/Zoom.pm @@ -8,7 +8,7 @@ use HTML::Zoom::Transform; use HTML::Zoom::TransformBuilder; use Scalar::Util (); -our $VERSION = '0.009005'; +our $VERSION = '0.009007_1'; $VERSION = eval $VERSION; @@ -643,6 +643,12 @@ zoom instance with that as the source HTML to be transformed. Convenience method - slurps the contents of $file and calls from_html with it. +=head2 from_events + + my $zoom = HTML::Zoom->from_events($evt); + +Create a new Zoom object from collected events + =head2 to_stream my $stream = $zoom->to_stream; @@ -691,6 +697,14 @@ sugar, the following is entirely equivalent: my $z2 = $sub->($z1); +=head2 apply_if + + my $z2 = $z1->apply_if($cond, sub { + $_->select('div')->replace_content('I AM A DIV!') }) + }); + +->apply but will only run the tranform if $cond is true + =head2 to_html my $html = $zoom->to_html; @@ -775,6 +789,8 @@ John Napiorkowski Robert Buels +David Dorward + =head1 COPYRIGHT Copyright (c) 2010-2011 the HTML::Zoom L and L