diff options
author | groditi <groditi@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7> | 2007-09-20 18:32:32 +0000 |
---|---|---|
committer | groditi <groditi@03d0b0b2-0e1a-0410-a411-fdb2f4bd65d7> | 2007-09-20 18:32:32 +0000 |
commit | 7b78a39dc4f84911690a1163bf4666a566815e9b (patch) | |
tree | d8cb6de62072dc295d756beaf753a3fa1e7214a3 /lib/Reaction/UI/View.pm | |
parent | f670cfd0d1ce4753a2c76b27cdc01e8471e4cc4a (diff) | |
download | reaction-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.pm | 8 |
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; |