Changeset 24367 for trunk/Nebulous-Server/lib/Nebulous/Server.pm

Timestamp:

Jun 10, 2009, 11:29:51 AM (17 years ago)

Author:

jhoblitt

Message:

set default memcached expiration time to 'never' (0)

File:

• trunk/Nebulous-Server/lib/Nebulous/Server.pm (modified) (1 diff)

trunk/Nebulous-Server/lib/Nebulous/Server.pm

@@ -66 +66 @@
     $self->sql($sql);
     $self->config($config);
-    $self->cache(Cache::Memcached::Managed->new($config->memcached));
+    my $memcached_server = $config->memcached;
+    if (defined $memcached_server) {
+        $self->cache(Cache::Memcached::Managed->new(
+            data        => $memcached_server,
+            expiration  => 0,
+        ));
+    }
     $log->logdie("at least one database must be defined") unless $config->n_db;