   "Fetch the value of SETTING-OR-NAME. What this means depends on the Setting's `:getter`; by default, this looks for first for a corresponding env var,
    then checks the cache, then returns the default value of the Setting, if any."
   [setting-or-name]
-  (println "get" (u/format-color 'blue (setting-name setting-or-name))) ; NOCOMMIT
   ((:getter (resolve-setting setting-or-name))))
 
 

                     :internal?    false}
                    (dissoc setting :name :type :default)))
    (s/validate SettingDefinition <>)
    (swap! registered-settings assoc setting-name <>)
    (println "Registered Setting" setting-name))) ; NOCOMMIT




   If the fetched value is an empty string it is considered to be unset and this function returns `nil`."
  ^String [setting-or-name]
  (let [setting (resolve-setting setting-or-name)
        v       (or (db-value setting)
                    (env-var-value setting)
                    (:default setting))]
    (when (seq v)
      v)))

