[SVN] [72] Add a bit of logging

[matt]

Revision: 72
Author:   matt
Date:     2006-08-09 22:26:40 +0000 (Wed, 09 Aug 2006)

Log Message:
-----------
Add a bit of logging

Modified Paths:
--------------
    trunk/lib/AxKit2/Transformer/XSLT.pm

Modified: trunk/lib/AxKit2/Transformer/XSLT.pm
===================================================================
--- trunk/lib/AxKit2/Transformer/XSLT.pm        2006-08-09 22:26:15 UTC (rev 71)
+++ trunk/lib/AxKit2/Transformer/XSLT.pm        2006-08-09 22:26:40 UTC (rev 72)
@@ -7,6 +7,7 @@
 
 use XML::LibXML;
 use XML::LibXSLT;
+use AxKit2::Constants;
 
 my $parser = XML::LibXML->new();
 my $xslt = XML::LibXSLT->new();
@@ -30,6 +31,8 @@
 
     my $stylefile = $self->{stylesheet};
     
+    $self->log(LOGINFO, "Transformer::XSLT($stylefile) running");
+    
     my $stylesheet = $cache{$stylefile};
     if (!$stylesheet) {
         my $style_doc = $parser->parse_file($stylefile);
@@ -68,4 +71,4 @@
     $client->write($out);
 }
 
-1;
\ No newline at end of file
+1;