#============================================================= -*-Perl-*- # # Template::Plugin::View # # DESCRIPTION # A user-definable view based on templates. Similar to the concept of # a "Skin". # # AUTHOR # Andy Wardley <abw@wardley.org> # # COPYRIGHT # Copyright (C) 2000-2022 Andy Wardley. All Rights Reserved. # # This module is free software; you can redistribute it and/or # modify it under the same terms as Perl itself. # #============================================================================ package Template::Plugin::View; use strict; use warnings; use base 'Template::Plugin'; our $VERSION = '3.100'; use Template::View; #------------------------------------------------------------------------ # new($context, \%config) #------------------------------------------------------------------------ sub new { my $class = shift; my $context = shift; my $view = Template::View->new($context, @_) || return $class->error($Template::View::ERROR); $view->seal(); return $view; } 1; __END__ =head1 NAME Template::Plugin::View - Plugin to create views (Template::View) =head1 SYNOPSIS [% USE view( prefix = 'splash/' # template prefix/suffix suffix = '.tt2' bgcol = '#ffffff' # and any other variables you style = 'Fancy HTML' # care to define as view metadata, items = [ foo, bar.baz ] # including complex data and foo = bar ? baz : x.y.z # expressions %] [% view.title %] # access view metadata [% view.header(title = 'Foo!') %] # view "methods" process blocks or [% view.footer %] # templates with prefix/suffix added =head1 DESCRIPTION This plugin module creates L<Template::View> objects. Views are an experimental feature and are subject to change in the near future. In the mean time, please consult L<Template::View> for further info. =head1 AUTHOR Andy Wardley E<lt>abw@wardley.orgE<gt> L<http://wardley.org/> =head1 COPYRIGHT Copyright (C) 1996-2022 Andy Wardley. All Rights Reserved. This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself. =head1 SEE ALSO L<Template::Plugin>, L<Template::View>, L<Template::Manual::Views> =cut # Local Variables: # mode: perl # perl-indent-level: 4 # indent-tabs-mode: nil # End: # # vim: expandtab shiftwidth=4: