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;