fix: remove broken built-in enum properties from app and script

It's too complicated for now but hope to bring this back
Part of LOG-2871
This commit is contained in:
Gabriel Horner
2023-10-30 10:31:56 -04:00
parent 5f392a2260
commit c88b0a2a4e
3 changed files with 7 additions and 42 deletions

View File

@@ -25,21 +25,10 @@
[date days]
(new js/Date (- (.getTime date) (* days 24 60 60 1000))))
(defn- build-enum-config
[]
(let [values (->> ["joy" "sob" "upside_down_face"]
(map #(vector (random-uuid) {:name %
:description ""
:icon {:id % :name % :type :emoji}}))
(into {}))]
{:values values
:order (vec (keys values))}))
(defn- create-init-data
[]
(let [today (new js/Date)
yesterday (subtract-days today 1)
enum-config (build-enum-config)]
yesterday (subtract-days today 1)]
{:pages-and-blocks
[{:page
{:block/name (date-journal-title today) :block/journal? true :block/journal-day (date-journal-day today)}
@@ -62,8 +51,7 @@
{:block/content "page-many property block" :properties {:page-many #{[:page "page 1"] [:page "page 2"]}}}
{:block/content "date property block" :properties {:date [:page (date-journal-title today)]}}
{:block/content "date-many property block" :properties {:date-many #{[:page (date-journal-title today)]
[:page (date-journal-title yesterday)]}}}
{:block/content "enum property block" :properties {:enum (-> enum-config :values keys first)}}]}
[:page (date-journal-title yesterday)]}}}]}
{:page {:block/name "queries"}
:blocks
[{:block/content "{{query (property :default \"haha\")}}"}
@@ -85,8 +73,6 @@
(mapcat #(cond-> [[% {:block/schema {:type %}}]]
(not (#{:checkbox :default} %))
(conj [(keyword (str (name %) "-many")) {:block/schema {:type % :cardinality :many}}])))
(into [[:enum {:block/schema {:type :enum
:enum-config enum-config}}]])
(into {}))}))
(defn -main [args]