X-Git-Url: https://git.saurik.com/redis.git/blobdiff_plain/d4507ec615439794e113daf51d7d5fccae77408a..4774a53b:/tests/support/test.tcl diff --git a/tests/support/test.tcl b/tests/support/test.tcl index 4caa6ca7..988189bf 100644 --- a/tests/support/test.tcl +++ b/tests/support/test.tcl @@ -26,6 +26,8 @@ proc assert_error {pattern code} { } proc assert_encoding {enc key} { + # swapped out value doesn't have encoding, so swap in first + r debug swapin $key assert_match "* encoding:$enc *" [r debug object $key] }