comparison Lib/IMPL/Web/TDocument.pm @ 6:e2cd73ccc5bd

DOM In development
author Sergey
date Fri, 14 Aug 2009 16:14:13 +0400
parents
children 94d47b388442
comparison
equal deleted inserted replaced
5:efa7db58abae 6:e2cd73ccc5bd
1 package IMPL::Web::TDocument;
2 use strict;
3 use warnings;
4
5 use base qw(IMPL::DOM::Node);
6 use Template::Context;
7 use Template::Provider;
8 use IMPL::Class::Property;
9 use File::Spec;
10
11 BEGIN {
12 public property Templates => prop_get | owner_set;
13 public property Context => prop_get | owner_set;
14 }
15
16 our %CTOR = (
17 'IMPL::DOM::Node' => sub { nodeName => 'document' }
18 );
19
20 sub load {
21 my ($this,$file) = @_;
22
23 $file = File::Spec->rel2abs($file);
24
25 }
26
27 1;