trying connection pool

This commit is contained in:
2025-01-29 11:42:22 -08:00
parent ebf155d0cd
commit e74694e924

View File

@@ -64,9 +64,11 @@
(defmulti parse-file (fn [_ filename] (.toLowerCase (last (str/split filename #"\." )))))
(defn invoke-glimpse2 [f]
(let [result (slurp (:payload (lambda/invoke {:function-name "glimpse2" :payload
(let [result (slurp (:payload (lambda/invoke {:client-config {:request-timeout 120000
:socket-timeout 120000}} {:function-name "glimpse2" :payload
(json/write-str
(alog/peek ::x {"url" (str "https://" "data.prod.app.integreatconsult.com" "/" f ) }))})))]
(alog/peek ::x {"url" (str "https://" "data.prod.app.integreatconsult.com" "/" f ) }))
})))]
(alog/info ::glimpse2-payload :payload result)
(-> result