aboutsummaryrefslogtreecommitdiffstats
path: root/lib/Reaction/UI/View.pm
diff options
context:
space:
mode:
authorgroditi <groditi@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7>2007-09-20 18:32:32 +0000
committergroditi <groditi@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7>2007-09-20 18:32:32 +0000
commit7b78a39dc4f84911690a1163bf4666a566815e9b (patch)
treed8cb6de62072dc295d756beaf753a3fa1e7214a3 /lib/Reaction/UI/View.pm
parentf670cfd0d1ce4753a2c76b27cdc01e8471e4cc4a (diff)
downloadreaction-7b78a39dc4f84911690a1163bf4666a566815e9b.tar.gz
reaction-7b78a39dc4f84911690a1163bf4666a566815e9b.zip
minor reflector changes and start of widget port
Diffstat (limited to 'lib/Reaction/UI/View.pm')
-rw-r--r--lib/Reaction/UI/View.pm8
1 files changed, 8 insertions, 0 deletions
diff --git a/lib/Reaction/UI/View.pm b/lib/Reaction/UI/View.pm
index 4fc40c6..fa98030 100644
--- a/lib/Reaction/UI/View.pm
+++ b/lib/Reaction/UI/View.pm
@@ -24,6 +24,14 @@ class View which {
return $class->new(%{$args||{}}, app => $app);
};
+ sub BUILD{
+ my $self = shift;
+ my $skin_name = $self->skin_name;
+ my $skin_path = $app->path_to('share','skin',$skin_name);
+ confess("'${skin_path}' is not a valid path for skin '${skin_name}'")
+ unless -d $skin_path;
+ }
+
implements 'render_window' => as {
my ($self, $window) = @_;
my $root_vp = $window->focus_stack->vp_head;