From f5785ae997611ac2fc628b6ad2d437a79530f7d6 Mon Sep 17 00:00:00 2001
From: antirez <antirez@gmail.com>
Date: Thu, 23 Apr 2009 18:48:11 +0200
Subject: [PATCH] RANDOMKEY regression test added

---
 test-redis.tcl | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/test-redis.tcl b/test-redis.tcl
index 2fd959321..0e1c852f0 100644
--- a/test-redis.tcl
+++ b/test-redis.tcl
@@ -624,6 +624,13 @@ proc main {server port} {
         $r randomkey
     } {}
 
+    test {RANDOMKEY regression 1} {
+        $r flushall
+        $r set x 10
+        $r del x
+        $r randomkey
+    } {}
+
     # Leave the user with a clean DB before to exit
     test {FLUSHALL} {
         $r flushall