Index: trunk/Nebulous-Server/lib/Nebulous/Server.pm
===================================================================
--- trunk/Nebulous-Server/lib/Nebulous/Server.pm	(revision 24367)
+++ trunk/Nebulous-Server/lib/Nebulous/Server.pm	(revision 24369)
@@ -13,5 +13,5 @@
 use base qw( Class::Accessor::Fast );
 
-use Cache::Memcached::Managed;
+use Cache::Memcached;
 use DBI;
 use Digest::SHA1 qw( sha1_hex );
@@ -66,11 +66,11 @@
     $self->sql($sql);
     $self->config($config);
-    my $memcached_server = $config->memcached;
-    if (defined $memcached_server) {
-        $self->cache(Cache::Memcached::Managed->new(
-            data        => $memcached_server,
-            expiration  => 0,
-        ));
-    }
+    $self->cache(
+        Cache::Memcached->new({
+	    servers => $config->memcached_servers,
+       })
+    );
+#    $self->cache->set("foo", "bar") or die "set failed";
+#    $self->cache->get("foo") or die "get failed";
     $log->logdie("at least one database must be defined") unless $config->n_db;
 
@@ -330,5 +330,5 @@
 
     # add new key to the cache
-    $self->cache->set(id => $key->path, value => 1) if defined $self->cache;
+    $self->cache->set($key->path, 1) if defined $self->cache;
     $log->debug( "key added to cache" );
 
@@ -1955,5 +1955,5 @@
         $log->debug( "key found in db" );
     	# add key to cache
-        $self->cache->set(id => $key->path, value => 1) if defined $self->cache;
+        $self->cache->set($key->path, 1) if defined $self->cache;
         $log->debug( "key added to cache" );
         $log->debug( "leaving" );