diff options
Diffstat (limited to 'lib/WebCoso/XSLT.pm')
-rw-r--r-- | lib/WebCoso/XSLT.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lib/WebCoso/XSLT.pm b/lib/WebCoso/XSLT.pm index 28643c5..b52d596 100644 --- a/lib/WebCoso/XSLT.pm +++ b/lib/WebCoso/XSLT.pm @@ -8,6 +8,7 @@ use XML::LibXSLT; use DateTime::Format::Strptime; use Log::Log4perl ':easy'; use Data::Dumper; +use XML::LibXSLT::EXSLT; my $NS='http://webcoso.thenautilus.net/'; @@ -19,6 +20,8 @@ sub new { $self->{xml_parser}=XML::LibXML->new(); $self->{xslt_proc}=XML::LibXSLT->new(); + XML::LibXSLT::EXSLT->apply_to($self->{xslt_proc}); + $self->{xslt_proc}->register_function($NS,'title-for', sub{$self->getTitleForXML(@_)}); $self->{xslt_proc}->register_function($NS,'dst-uri-for', |