All tests pass again! Two separate silly bugs.
This commit is contained in:
parent
b18adb0a69
commit
6f3817022a
|
@ -160,12 +160,13 @@
|
||||||
(acceptable-languages accept-language-header))))]
|
(acceptable-languages accept-language-header))))]
|
||||||
(timbre/debug (str "Found i18n file at '" file-path "'"))
|
(timbre/debug (str "Found i18n file at '" file-path "'"))
|
||||||
(try
|
(try
|
||||||
(slurp-resource
|
(read-string
|
||||||
(or
|
(slurp-resource
|
||||||
file-path
|
(or
|
||||||
(join java.io.File/separator
|
file-path
|
||||||
[resource-path
|
(join java.io.File/separator
|
||||||
(str default-locale ".edn")])))
|
[resource-path
|
||||||
|
(str default-locale ".edn")]))))
|
||||||
(catch Exception any
|
(catch Exception any
|
||||||
(timbre/error (str "Failed to load internationalisation because " (.getMessage any)))
|
(timbre/error (str "Failed to load internationalisation because " (.getMessage any)))
|
||||||
nil))))
|
nil))))
|
||||||
|
|
|
@ -199,11 +199,11 @@
|
||||||
(is
|
(is
|
||||||
(=
|
(=
|
||||||
"This is not a pipe"
|
"This is not a pipe"
|
||||||
(:pipe (get-messages "en-GB, fr-FR;q=0.9" "resources/i18n" "en-GB"))))
|
(:pipe (get-messages "en-GB, fr-FR;q=0.9" "i18n" "en-GB"))))
|
||||||
(is
|
(is
|
||||||
(=
|
(=
|
||||||
"Ceci n'est pas une pipe."
|
"Ceci n'est pas une pipe."
|
||||||
(:pipe (get-messages "en-GB;q=0.9, fr-FR" "resources/i18n" "en-GB"))))
|
(:pipe (get-messages "en-GB;q=0.9, fr-FR" "i18n" "en-GB"))))
|
||||||
(is
|
(is
|
||||||
(= nil (get-messages "xx-XX;q=0.5, yy-YY" "resources/i18n" "zz-ZZ"))
|
(= nil (get-messages "xx-XX;q=0.5, yy-YY" "i18n" "zz-ZZ"))
|
||||||
"If no usable file is found, an exception should not be thrown.")))
|
"If no usable file is found, an exception should not be thrown.")))
|
||||||
|
|
Loading…
Reference in a new issue