[catagits/Catalyst-View-Component-SubInclude.git] / lib / Catalyst / View / Component / SubInclude / ESI.pm

package Catalyst::View::Component::SubInclude::ESI;
use warnings;
use strict;

sub generate_subinclude {
    my $class = shift;
    my $c     = shift;
    my $url = $c->uri_for( @_ );
    return '<!--esi <esi:include src="' . $url->path . '" /> -->';
}

1;
Commit	Line	Data
30726632	1	package Catalyst::View::Component::SubInclude::ESI;
	2	use warnings;
	3	use strict;
	4
	5	sub generate_subinclude {
	6	my $class = shift;
	7	my $c = shift;
	8	my $url = $c->uri_for( @_ );
	9	return '<!--esi <esi:include src="' . $url->path . '" /> -->';
	10	}
	11
	12	1;