Skip to content
Snippets Groups Projects
Commit ae2c0dff authored by Tom Robinson's avatar Tom Robinson
Browse files

Last CI fixes

parent c1e97894
No related branches found
No related tags found
No related merge requests found
......@@ -38,10 +38,11 @@
(throw (Exception. (str "Invalid JSON URL or resource: " url-or-resource-path)))))))
(def ^:private CustomGeoJSON
{s/Keyword {:name s/Str
:url (s/constrained s/Str valid-json-url-or-resource? "URL must point to a valid JSON file.")
:region_key (s/maybe s/Str)
:region_name (s/maybe s/Str)}})
{s/Keyword {:name s/Str
:url (s/constrained s/Str valid-json-url-or-resource? "URL must point to a valid JSON file.")
:region_key (s/maybe s/Str)
:region_name (s/maybe s/Str)
(s/optional-key :builtin) s/Bool}})
(def ^:private builtin-geojson
{:us_states {:name "United States" :url "/app/charts/us-states.json" :region_key "name" :region_name "name" :builtin true}
......
......@@ -14,10 +14,20 @@
"https://raw.githubusercontent.com/metabase/metabase/master/test_resources/test.geojson")
(def ^:private ^:const test-custom-geojson
{:middle-earth {:name "Middle Earth"
:url test-geojson-url
:region_key nil
:region_name nil}})
{:middle-earth {:name "Middle Earth"
:url test-geojson-url
:region_key nil
:region_name nil}
:us_states {:name "United States"
:url "/app/charts/us-states.json"
:region_key "name"
:region_name "name"
:builtin true}
:world_countries {:name "World"
:url "/app/charts/world.json"
:region_key "ISO_A2"
:region_name "NAME"
:builtin true}})
;;; test valid-json-url?
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment