allow WebGUI::Cache to do more than File, Database

This commit is contained in:
Doug Bell 2010-04-27 15:22:28 -05:00
parent a9578eec2c
commit 8e9dc4823f

View file

@ -132,13 +132,15 @@ A subdivider to store this cache under. When building your own cache plug-in def
sub new {
my $class = shift;
my $session = shift;
if ($session->config->get("cacheType") eq "WebGUI::Cache::Database") {
require WebGUI::Cache::Database;
return WebGUI::Cache::Database->new($session,@_);
} else {
require WebGUI::Cache::FileCache;
return WebGUI::Cache::FileCache->new($session,@_);
}
my $type = $session->config->get('cacheType');
eval{ WebGUI::Pluggable::load( $type ) };
if ( !$@ && $type->isa( "WebGUI::Cache" ) ) {
return $type->new( $session, @_ );
}
else {
require WebGUI::Cache::FileCache;
return WebGUI::Cache::FileCache->new( $session, @_ );
}
}
#-------------------------------------------------------------------