xml-axkit-dev mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From ma...@apache.org
Subject cvs commit: xml-axkit/lib/Apache/AxKit/Provider File.pm
Date Sun, 21 Apr 2002 14:07:16 GMT
matts       02/04/21 07:07:16

  Modified:    lib/Apache/AxKit/Provider File.pm
  Log:
  Reverted Directory stuff using XML::Directory
  
  Revision  Changes    Path
  1.4       +3 -14     xml-axkit/lib/Apache/AxKit/Provider/File.pm
  
  Index: File.pm
  ===================================================================
  RCS file: /home/cvs/xml-axkit/lib/Apache/AxKit/Provider/File.pm,v
  retrieving revision 1.3
  retrieving revision 1.4
  diff -u -r1.3 -r1.4
  --- File.pm	2 Apr 2002 16:27:54 -0000	1.3
  +++ File.pm	21 Apr 2002 14:07:16 -0000	1.4
  @@ -1,4 +1,4 @@
  -# $Id: File.pm,v 1.3 2002/04/02 16:27:54 matts Exp $
  +# $Id: File.pm,v 1.4 2002/04/21 14:07:16 matts Exp $
   
   package Apache::AxKit::Provider::File;
   use strict;
  @@ -177,19 +177,8 @@
   
   sub get_strref {
       my $self = shift;
  -    if ($self->_is_dir() && $AxKit::Cfg->HandleDirs()) {
  -        require XML::Directory::SAX;
  -        require XML::SAX::Writer;
  -
  -        my $str = '';
  -        XML::Directory::SAX->new(
  -            Handler => XML::SAX::Writer->new(
  -                Output => \$str
  -            )
  -        )->parse_dir($self->{file});
  -
  -        AxKit::Debug(4, "Directory listing: $str");
  -        return \$str;
  +    if ($self->_is_dir()) {
  +        throw Apache::AxKit::Exception::IO(-text => "$self->{file} is a directory
- please overload File provider and use AxProvider option");
       }
       my $fh = $self->get_fh();
       local $/;
  
  
  

Mime
View raw message