summaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
authorSalvatore Sanfilippo <antirez@gmail.com>2014-04-23 16:13:49 +0200
committerSalvatore Sanfilippo <antirez@gmail.com>2014-04-23 16:13:49 +0200
commit32c917964efb7c617597a409e02deef9952763f8 (patch)
tree02bab909aae10751a4746eeae00cf328efc933dc /tests
parent12e435d2a49a3a121b91b14c23162c800d5fb798 (diff)
parent88530804e8c7ad977277ea693026b2b0a5f4816d (diff)
downloadredis-32c917964efb7c617597a409e02deef9952763f8.tar.gz
Merge pull request #1677 from mattsta/expire-before-delete
Check key expiration before deleting
Diffstat (limited to 'tests')
-rw-r--r--tests/unit/basic.tcl8
1 files changed, 8 insertions, 0 deletions
diff --git a/tests/unit/basic.tcl b/tests/unit/basic.tcl
index 1f46ba666..8da358968 100644
--- a/tests/unit/basic.tcl
+++ b/tests/unit/basic.tcl
@@ -261,6 +261,14 @@ start_server {tags {"basic"}} {
assert_equal 20 [r get x]
}
+ test "DEL against expired key" {
+ r debug set-active-expire 0
+ r setex keyExpire 1 valExpire
+ after 1100
+ assert_equal 0 [r del keyExpire]
+ r debug set-active-expire 1
+ }
+
test {EXISTS} {
set res {}
r set newkey test