From ab878ab69c6c26d1b5781db69ef8b267d204c426 Mon Sep 17 00:00:00 2001 From: Oscar Korz Date: Sat, 2 Apr 2022 15:44:44 -0700 Subject: [PATCH] Add uuid-representation option --- src/clojure/monger/core.clj | 4 +++- test/monger/test/core_test.clj | 1 + 2 files changed, 4 insertions(+), 1 deletion(-) diff --git a/src/clojure/monger/core.clj b/src/clojure/monger/core.clj index 98509c6..f3ff8fd 100644 --- a/src/clojure/monger/core.clj +++ b/src/clojure/monger/core.clj @@ -145,7 +145,7 @@ max-wait-time min-connections-per-host min-heartbeat-frequency read-concern read-preference required-replica-set-name retry-writes server-selection-timeout server-selector socket-keep-alive socket-factory socket-timeout ssl-context ssl-enabled ssl-invalid-host-name-allowed - threads-allowed-to-block-for-connection-multiplier write-concern]}] + threads-allowed-to-block-for-connection-multiplier uuid-representation write-concern]}] (let [mob (MongoClientOptions$Builder.)] (when add-cluster-listener (.addClusterListener mob add-cluster-listener)) @@ -238,6 +238,8 @@ (.sslInvalidHostNameAllowed mob ssl-invalid-host-name-allowed)) (when threads-allowed-to-block-for-connection-multiplier (.threadsAllowedToBlockForConnectionMultiplier mob threads-allowed-to-block-for-connection-multiplier)) + (when uuid-representation + (.uuidRepresentation mob uuid-representation)) (when write-concern (.writeConcern mob write-concern)) mob)) diff --git a/test/monger/test/core_test.clj b/test/monger/test/core_test.clj index ee0c828..42d7aee 100644 --- a/test/monger/test/core_test.clj +++ b/test/monger/test/core_test.clj @@ -80,6 +80,7 @@ :ssl-enabled true :ssl-invalid-host-name-allowed true :threads-allowed-to-block-for-connection-multiplier 1 + :uuid-representation org.bson.UuidRepresentation/STANDARD :write-concern com.mongodb.WriteConcern/JOURNAL_SAFE}] (is (instance? com.mongodb.MongoClientOptions$Builder (mg/mongo-options-builder opts)))))