simon/internationalisation
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

Improved error handling when totally invalid header is provided.

Browse source
This commit is contained in:
Simon Brooke 2017-09-11 11:40:04 +01:00
parent 90397d839c
commit f53fcdb451
1 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
src/scot/weft/i18n/core.clj
View file

@ -2,6 +2,7 @@
:author "Simon Brooke"} :author "Simon Brooke"}
scot.weft.i18n.core scot.weft.i18n.core
(:require [clojure.java.io :as io] (:require [clojure.java.io :as io]
[clojure.pprint :refer [pprint]]
[clojure.string :refer [join]] [clojure.string :refer [join]]
[instaparse.core :as insta] [instaparse.core :as insta]
[taoensso.timbre :as timbre])) [taoensso.timbre :as timbre]))
@ -78,7 +79,10 @@
(generate-accept-languages (second parse-tree))) (generate-accept-languages (second parse-tree)))
:SUB-TAG (second parse-tree) :SUB-TAG (second parse-tree)
:Q-SEP nil :Q-SEP nil
:Q-VALUE (read-string (second parse-tree))))) :Q-VALUE (read-string (second parse-tree))
;; default
(let [formatted-tree (with-out-str (pprint parse-tree))]
(throw (Exception. (str "Unexpected parse tree: " formatted-tree)))))))
(defn acceptable-languages (defn acceptable-languages