From 7051da932fb220845f318fd7f21ce87136d119b3 Mon Sep 17 00:00:00 2001
From: dormando <dormando@rydia.net>
Date: Sun, 29 Jul 2012 17:04:20 -0700
Subject: add a binary touch test that actaully fails

---
 t/binary.t | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/t/binary.t b/t/binary.t
index 504ddef..b427fc4 100755
--- a/t/binary.t
+++ b/t/binary.t
@@ -273,6 +273,10 @@ is($mc->decr("x", 211), 0, "Floor is zero");
     $check->("totouch", 0, "toast2");
 
     # Test miss as well
+    $mc->set("totouch", "toast3", 0, 1);
+    my $res = $mc->touch("totouch", 1);
+    sleep 3;
+    $empty->("totouch");
 }
 
 # diag "Silent set.";
-- 
cgit v1.2.1