Change confusing local names. cfg -> settings

This commit is contained in:
Aleksander Madland Stapnes 2017-01-20 16:16:01 -03:00
parent c5d995b262
commit f7f02f7433

View file

@ -47,14 +47,14 @@
#{"selector" "selector_reagent"})
(defn clojure-eval?
"Does the configuration include any keys that imply clojure eval?"
[normalized-cfg]
(some clojure-selectors (keys normalized-cfg)))
"Do the settings include any keys that imply clojure eval?"
[normalized-settings]
(some clojure-selectors (keys normalized-settings)))
(defn normalize-settings
"Transform the keys to the correct snake-case or camelCase strings."
[cfg]
(-> (map-keys ->snake_case_string cfg)
[settings]
(-> (map-keys ->snake_case_string settings)
(update-existing "codemirror_options_in" (partial map-keys ->camelCaseString))
(update-existing "codemirror_options_out" (partial map-keys ->camelCaseString))))