All tests pass again! Two separate silly bugs.

This commit is contained in:
Simon Brooke 2017-09-08 15:51:02 +01:00
parent b18adb0a69
commit 6f3817022a
2 changed files with 10 additions and 9 deletions

View file

@ -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
(read-string
(slurp-resource (slurp-resource
(or (or
file-path file-path
(join java.io.File/separator (join java.io.File/separator
[resource-path [resource-path
(str default-locale ".edn")]))) (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))))

View file

@ -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.")))