X-Git-Url: https://git.saurik.com/redis.git/blobdiff_plain/2753acf1d642628d01de0d2a477c5d905fb761bc..fa4a5d59220b1c9e7833b563cb7e9e314747bdf7:/tests/unit/cas.tcl

diff --git a/tests/unit/cas.tcl b/tests/unit/cas.tcl
index 082fba35..95766abe 100644
--- a/tests/unit/cas.tcl
+++ b/tests/unit/cas.tcl
@@ -25,6 +25,16 @@ start_server {tags {"cas"}} {
         r exec
     } {}
 
+    test {EXEC fail on WATCHed key modified by SORT with STORE even if the result is empty} {
+        r flushdb
+        r lpush foo bar
+        r watch foo
+        r sort emptylist store foo
+        r multi
+        r ping
+        r exec
+    } {}
+
     test {After successful EXEC key is no longer watched} {
         r set x 30
         r watch x