use strict;
use warnings;
-use Test::More tests => 3539;
+use Test::More tests => 3549;
use FindBin qw($Bin);
use lib "$Bin/lib";
use MemcachedTest;
$check->("totouch", 0, "toast2");
# Test miss as well
+ $mc->set("totouch", "toast3", 0, 1);
+ $res = $mc->touch("totouch", 1);
+ sleep 3;
+ $empty->("totouch");
}
# diag "Silent set.";