SweetPea::Application::View - Model support for SweetPea-Application.


SweetPea-Application documentation Contained in the SweetPea-Application distribution.

Index


Code Index:

NAME

Top

SweetPea::Application::View - Model support for SweetPea-Application.

SYNOPSIS

Top

    ... from inside SweetPea::Application or a Controller;
    #access View::Email::welcome_letter()
    $s->view('Email')->welcome_letter();

METHODS

Top

new

    The new method instantiates a new SweetPea::Application::View object
    which loads view packages on requests ands provides accessors to it's
    functions. 

    $s->plug( 'view', sub { return SweetPea::Application::View->new($s); });

AUTHOR

Top

Al Newkirk, <al.newkirk at awnstudio.com>


SweetPea-Application documentation Contained in the SweetPea-Application distribution.
package SweetPea::Application::View;

use warnings;
use strict;

our $VERSION = '0.001';

sub new {
    my ($class, $s, $view) = @_;
    my $self        = {};
    my $pckg        = $view;
    bless $self, $class;
    $view          =~ s/^\///;
    $pckg          =~ s/[\\\:]/\//g;
    $pckg          = 'View::' . $view;
    $view          = 'View/' . $view . '.pm';
    
    require $view;
    return  $pckg->new($s);
}

1; # End of SweetPea::Application::View