cvs commit: xml-axkit/t/lib/Provider Tiny.pm

[kip]

kip         2003/05/25 12:27:26

  Added:       t/lib/Provider Tiny.pm
  Log:
  Adding to the test suite.
  
  Revision  Changes    Path
  1.1                  xml-axkit/t/lib/Provider/Tiny.pm
  
  Index: Tiny.pm
  ===================================================================
  package Provider::Tiny;
  use strict;
  use vars qw( @ISA );
  @ISA = qw( Apache::AxKit::Provider );
  
  sub get_strref {
      my $xml = qq*<?xml version="1.0"?>
  <root/>
  *;
       return \$xml;
  }
  
  sub mtime {
      return 0;
  }
  
  sub process {
      return 1;
  }
  
  sub key {
      my $self = shift;
      return $self->apache_request->uri;
  }
  
  1;