Support removing nullable values from LLM request body if the value in extraPayload is null.

Fixes #232

Author: ericdallo

CHANGELOG.md

@@ -3,6 +3,7 @@
 ## Unreleased
 
 - Support `~` in dynamic string parser.
+- Support removing nullable values from LLM request body if the value in extraPayload is null. #232
 
 ## 0.86.0
 

src/eca/llm_providers/openai_chat.clj

@@ -375,7 +375,7 @@
                                   (when-let [reasoning-text (or (:reasoning delta)
                                                                 (:reasoning_content delta))]
                                     (when-not @reasoning-started*
-                                        ;; Generate new reason-id for each thinking block
+                                      ;; Generate new reason-id for each thinking block
                                       (let [new-reason-id (str (random-uuid))]
                                         (reset! current-reason-id* new-reason-id)
                                         (reset! reasoning-started* true)

src/eca/shared.clj

@@ -59,7 +59,13 @@
             (cond
               (nil? v1) v2
               (nil? v2) v1
-              (and (map? v1) (map? v2)) (merge-with deep-merge v1 v2)
+              (and (map? v1) (map? v2))
+              (reduce-kv (fn [m k v]
+                           (if (nil? v)
+                             (dissoc m k)
+                             (assoc m k (rec-merge (get v1 k) v))))
+                         v1
+                         v2)
               :else v2))]
     (reduce rec-merge v vs)))
 

test/eca/shared_test.clj

@@ -90,7 +90,17 @@
                               {:a 2})))
     (is (= {:a {:b 1}}
            (shared/deep-merge {:a 2}
-                              {:a {:b 1}})))))
+                              {:a {:b 1}}))))
+  (testing "Dissoc nil values"
+    (is (match?
+         {:a 1
+          :b {:c {:e 3
+                  :f 4}}}
+         (shared/deep-merge {:a 1
+                             :b {:c {:e 3}
+                                 :d 2}}
+                            {:b {:c {:f 4}
+                                 :d nil}})))))
 
 (deftest future*-test
   (testing "on test env we run on same thread"