Merge pull request #224 from chrisbroome/wrap-collection-names

Allow keywords as collection names in rename and aggreate
This commit is contained in:
Michael Klishin 2023-01-19 08:37:42 -06:00 committed by GitHub
commit 84170f7c51
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23

View file

@ -490,9 +490,9 @@
(defn rename
"Renames collection."
([^DB db ^String from, ^String to]
(.rename (.getCollection db from) to))
(.rename (.getCollection db (name from)) (name to)))
([^DB db ^String from ^String to drop-target?]
(.rename (.getCollection db from) to drop-target?)))
(.rename (.getCollection db (name from)) (name to) drop-target?)))
;;
;; Map/Reduce
@ -545,7 +545,7 @@
See http://docs.mongodb.org/manual/applications/aggregation/ to learn more."
[^DB db ^String coll stages & opts]
(let [coll (.getCollection db coll)
(let [coll (.getCollection db (name coll))
agg-opts (build-aggregation-options opts)
pipe (into-array-list (to-db-object stages))
res (.aggregate coll pipe agg-opts)
@ -558,7 +558,7 @@
See http://docs.mongodb.org/manual/applications/aggregation/ to learn more."
[^DB db ^String coll stages & opts]
(let [coll (.getCollection db coll)
(let [coll (.getCollection db (name coll))
agg-opts (build-aggregation-options opts)
pipe (into-array-list (to-db-object stages))
res (.explainAggregate coll pipe agg-opts)]