luciano/next-jdbc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix tests for 1.0.0-alpha13

Browse source
This commit is contained in:
Sean Corfield 2019-05-05 00:04:44 -07:00
parent ff94962e27
commit fa73bb800b
1 changed files with 7 additions and 21 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

28
test/next/jdbc/connection_test.clj
View file

@ -34,33 +34,19 @@
(is (= (#'c/spec->url+etc {:dbtype "postgres" :dbname db-name})
(#'c/spec->url+etc {:dbtype "postgresql" :dbname db-name}))))
(testing "default ports"
(is (= (-> (#'c/spec->url+etc {:dbtype "jtds:sqlserver" :dbname db-name})
;; defaults don't show up in etc (just in the url)
(update 1 assoc :port 1433))
(is (= (#'c/spec->url+etc {:dbtype "jtds:sqlserver" :dbname db-name})
(#'c/spec->url+etc {:dbtype "jtds:sqlserver" :dbname db-name :port 1433})))
(is (= (-> (#'c/spec->url+etc {:dbtype "mysql" :dbname db-name})
;; defaults don't show up in etc (just in the url)
(update 1 assoc :port 3306))
(is (= (#'c/spec->url+etc {:dbtype "mysql" :dbname db-name})
(#'c/spec->url+etc {:dbtype "mysql" :dbname db-name :port 3306})))
(is (= (-> (#'c/spec->url+etc {:dbtype "oracle:oci" :dbname db-name})
;; defaults don't show up in etc (just in the url)
(update 1 assoc :port 1521))
(is (= (#'c/spec->url+etc {:dbtype "oracle:oci" :dbname db-name})
(#'c/spec->url+etc {:dbtype "oracle:oci" :dbname db-name :port 1521})))
(is (= (-> (#'c/spec->url+etc {:dbtype "oracle:sid" :dbname db-name})
;; defaults don't show up in etc (just in the url)
(update 1 assoc :port 1521))
(is (= (#'c/spec->url+etc {:dbtype "oracle:sid" :dbname db-name})
(#'c/spec->url+etc {:dbtype "oracle:sid" :dbname db-name :port 1521})))
(is (= (-> (#'c/spec->url+etc {:dbtype "oracle:thin" :dbname db-name})
;; defaults don't show up in etc (just in the url)
(update 1 assoc :port 1521))
(is (= (#'c/spec->url+etc {:dbtype "oracle:thin" :dbname db-name})
(#'c/spec->url+etc {:dbtype "oracle:thin" :dbname db-name :port 1521})))
(is (= (-> (#'c/spec->url+etc {:dbtype "postgresql" :dbname db-name})
;; defaults don't show up in etc (just in the url)
(update 1 assoc :port 5432))
(is (= (#'c/spec->url+etc {:dbtype "postgresql" :dbname db-name})
(#'c/spec->url+etc {:dbtype "postgresql" :dbname db-name :port 5432})))
(is (= (-> (#'c/spec->url+etc {:dbtype "sqlserver" :dbname db-name})
;; defaults don't show up in etc (just in the url)
(update 1 assoc :port 1433))
(is (= (#'c/spec->url+etc {:dbtype "sqlserver" :dbname db-name})
(#'c/spec->url+etc {:dbtype "sqlserver" :dbname db-name :port 1433})))))
;; these are the 'local' databases that we can always test against