Date: Tuesday December 11, 2001 @ 11:17
Author: matt
Update of /home/cvs/AxKit
In directory ted:/home/matt/Perl/AxKit
Modified Files:
AxKit.pm
Log Message:
chdir now that we removed that from the provider.
Index: AxKit.pm
===================================================================
RCS file: /home/cvs/AxKit/AxKit.pm,v
retrieving revision 1.123
retrieving revision 1.124
diff -u -r1.123 -r1.124
--- AxKit.pm 2001/11/29 17:47:17 1.123
+++ AxKit.pm 2001/12/11 11:17:00 1.124
@@ -1,4 +1,4 @@
-# $Id: AxKit.pm,v 1.123 2001/11/29 17:47:17 matt Exp $
+# $Id: AxKit.pm,v 1.124 2001/12/11 11:17:00 matt Exp $
package AxKit;
use strict;
@@ -16,6 +16,7 @@
use Apache::AxKit::Provider::File;
use Apache::AxKit::Provider::Scalar;
use Apache::AxKit::CharsetConv;
+use File::Basename ();
Apache::AxKit::CharsetConv::raise_error(1);
@@ -223,6 +224,8 @@
my $retcode = eval {
# $r->header_out('X-AxKit-Version', $VERSION);
+
+ chdir(File::Basename::dirname($r->filename));
$AxKit::OrigType = $r->content_type('changeme');
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
