From 5e847cde0eb3cef4919ab66ac185d51361029069 Mon Sep 17 00:00:00 2001
From: Sean Corfield <sean@corfield.org>
Date: Sat, 23 Apr 2022 16:03:21 -0700
Subject: [PATCH] only throw for named param #396

---
 src/honey/sql.cljc | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/src/honey/sql.cljc b/src/honey/sql.cljc
index 793ae9f..b69951c 100644
--- a/src/honey/sql.cljc
+++ b/src/honey/sql.cljc
@@ -1098,7 +1098,10 @@
   (let [[sql-x & params-x] (format-expr x {:nested true})
         [sql-y & params-y] (format-expr y {:nested true})
         values             (unwrap (first params-y) {})]
-    (when *caching*
+    ;; #396: prevent caching IN () when named parameter is used:
+    (when (and (meta (first params-y))
+               (::wrapper (meta (first params-y)))
+               *caching*)
       (throw (ex-info "SQL that includes IN () expressions cannot be cached" {})))
     (when-not (= :none *checking*)
       (when (or (and (sequential? y)      (empty? y))