matts 2003/02/01 11:20:53
Modified: lib AxKit.pm
Log:
Fix for pepl's cache problems
Revision Changes Path
1.39 +4 -4 xml-axkit/lib/AxKit.pm
Index: AxKit.pm
===================================================================
RCS file: /home/cvs/xml-axkit/lib/AxKit.pm,v
retrieving revision 1.38
retrieving revision 1.39
diff -u -r1.38 -r1.39
--- AxKit.pm 29 Jan 2003 13:44:57 -0000 1.38
+++ AxKit.pm 1 Feb 2003 19:20:53 -0000 1.39
@@ -422,6 +422,9 @@
$AxKit::Charset = $AxKit::Cfg->OutputCharset();
+ # Store in package variable for other modules
+ $AxKit::Cache = $cache;
+
if (!$recreate) {
AxKit::Debug(1, "delivering cached copy - all conditions met");
return $cache->deliver();
@@ -429,9 +432,6 @@
AxKit::Debug(1, "some condition failed. recreating output");
- # Store in package variable for other modules
- $AxKit::Cache = $cache;
-
# reconsecrate Apache request object (& STDOUT) into our own class
bless $r, 'AxKit::Apache';
tie *STDOUT, 'AxKit::Apache', $r;