Remove custom version of memcached (no longer needed).
[awesomized/libmemcached] / memcached / t / touch.t
diff --git a/memcached/t/touch.t b/memcached/t/touch.t
deleted file mode 100755 (executable)
index dd2eba1..0000000
+++ /dev/null
@@ -1,23 +0,0 @@
-#!/usr/bin/perl
-
-use strict;
-use Test::More tests => 4;
-use FindBin qw($Bin);
-use lib "$Bin/lib";
-use MemcachedTest;
-
-
-my $server = new_memcached();
-my $sock = $server->sock;
-
-# set foo (and should get it)
-print $sock "set foo 0 2 6\r\nfooval\r\n";
-is(scalar <$sock>, "STORED\r\n", "stored foo");
-mem_get_is($sock, "foo", "fooval");
-
-# touch it
-print $sock "touch foo 10\r\n";
-is(scalar <$sock>, "TOUCHED\r\n", "touched foo");
-
-sleep 2;
-mem_get_is($sock, "foo", "fooval");