Changeset 2505 for branches/release-39/lib/MT/App/Search.pm

Timestamp:

06/04/08 07:54:01 (18 months ago)

Author:

fumiakiy

Message:

Purge stale search cache after it finishes processing, and also periodically. BugId:79999

Files:

• branches/release-39/lib/MT/App/Search.pm (modified) (2 diffs)

branches/release-39/lib/MT/App/Search.pm

@@ -173 +173 @@
         return;
     }
-    $app->{cache_driver} = $cache_driver->new( ttl => $app->config->SearchCacheTTL );
+    $app->{cache_driver} = $cache_driver->new(
+        ttl => $app->config->SearchCacheTTL,
+        kind => 'CS',
+    );
 }
 
@@ -877 +880 @@
     my ( $cb, $app ) = @_;
     alarm(0) if $app->{__have_throttle};
+    if ( my $cache_driver = $app->{cache_driver} ) {
+        $cache_driver->purge_stale( 2 * $app->config->SearchCacheTTL );
+    }
     1;
 }