diff options
Diffstat (limited to 'lib/Tree/Template/Declare/LibXML.pm')
-rw-r--r-- | lib/Tree/Template/Declare/LibXML.pm | 31 |
1 files changed, 29 insertions, 2 deletions
diff --git a/lib/Tree/Template/Declare/LibXML.pm b/lib/Tree/Template/Declare/LibXML.pm index f8c0e01..d5e208c 100644 --- a/lib/Tree/Template/Declare/LibXML.pm +++ b/lib/Tree/Template/Declare/LibXML.pm @@ -10,10 +10,11 @@ sub new { return bless {ns=>{':default'=>undef}},$class; } -sub _additional_exports { - my ($self)=@_; +sub _munge_exports { + my ($self,$exports)=@_; return { + %$exports, xmlns => sub($$) { $self->{ns}->{$_[0]}=$_[1]; return; @@ -95,3 +96,29 @@ sub set_node_attributes { } 1; +__END__ + +=head1 NAME + +Tree::Template::Declare::LibXML + +=head1 SYNOPSIS + +See L<Tree::Template::Declare>. + +=head1 SPECIFICITIES + +A function C<xmlns> is exported, so that you can declare XML namespaces: + + xmlns test => 'http://test/'; + + node { name 'test:elem'; attribs id => 1, 'test:attr' => 5 }; + +You I<can> create nodes with qualified names with undeclared prefixes, +but it's probably not a good idea. + +=head1 AUTHOR + +Gianni Ceccarelli <dakkar@thenautilus.net> + +=cut |