sub BUILD{
my $self = shift;
my $skin_name = $self->skin_name;
- my $skin_path = $app->path_to('share','skin',$skin_name);
+ my $skin_path = $self->app->path_to('share','skin',$skin_name);
confess("'${skin_path}' is not a valid path for skin '${skin_name}'")
unless -d $skin_path;
}