From 23a64d60617cef7950225b650545ebec5f1fda5f Mon Sep 17 00:00:00 2001
From: Tienson Qin <tiensonqin@gmail.com>
Date: Mon, 10 Jul 2023 00:24:15 +0800
Subject: [PATCH] enhance: add description to properties

---
 src/main/frontend/components/page.cljs     |  3 ++-
 src/main/frontend/components/property.cljs | 23 ++++++++++++++++------
 2 files changed, 19 insertions(+), 7 deletions(-)

diff --git a/src/main/frontend/components/page.cljs b/src/main/frontend/components/page.cljs
index 39289c00fb..23c9dfcb1a 100644
--- a/src/main/frontend/components/page.cljs
+++ b/src/main/frontend/components/page.cljs
@@ -1174,7 +1174,8 @@
                {}
                edit-input-id
                {:selected? false
-                :page-configure? true}))]]
+                :page-configure? true
+                :class-schema? true}))]]
 
           [:div
            [:h2.text-lg.font-medium.mb-2 "Properties:"]
diff --git a/src/main/frontend/components/property.cljs b/src/main/frontend/components/property.cljs
index 847b592d66..b5202bf260 100644
--- a/src/main/frontend/components/property.cljs
+++ b/src/main/frontend/components/property.cljs
@@ -41,13 +41,13 @@
 
      [:div.grid.gap-2.p-1
       [:div.grid.grid-cols-4.gap-1.items-center.leading-8
-       [:label.cols-1 "Name:"]
+       [:label "Name:"]
        [:input.form-input
         {:on-change #(reset! *property-name (util/evalue %))
          :value @*property-name}]]
 
       [:div.grid.grid-cols-4.gap-1.leading-8
-       [:label.cols-1 "Schema type:"]
+       [:label "Schema type:"]
        (let [schema-types (->> (keys property-handler/builtin-schema-types)
                                (map (comp string/capitalize name))
                                (map (fn [type]
@@ -62,12 +62,20 @@
 
       (when-not (= (:type @*property-schema) :checkbox)
         [:div.grid.grid-cols-4.gap-1.items-center.leading-8
-         [:label.cols-1 "Multiple values:"]
+         [:label "Multiple values:"]
          (let [many? (boolean (= :many (:cardinality @*property-schema)))]
            (ui/checkbox {:checked many?
                          :on-change (fn []
                                       (swap! *property-schema assoc :cardinality (if many? :one :many)))}))])
 
+      [:div.grid.grid-cols-4.gap-1.items-center.leading-8
+       [:label "Description:"]
+       [:div.col-span-3
+        (ui/ls-textarea
+         {:on-change (fn [e]
+                       (swap! *property-schema assoc :description (util/evalue e)))
+          :value (:description @*property-schema)})]]
+
       [:div
        (ui/button
          "Save"
@@ -364,7 +372,7 @@
     [:div
      [:div.ls-property-add.grid.grid-cols-4.gap-1.flex.flex-row.items-center
       (property-key-input entity *property-key *property-value *search?)
-      (when property
+      (when (and property (not (:class-schema? opts)))
         (property-scalar-value entity property @*property-value opts))
 
       [:a.close {:on-mouse-down exit-edit-property}
@@ -522,8 +530,11 @@
                   [:div.grid.grid-cols-4.gap-1
                    [:div.property-key.col-span-1
                     (property-key block property)]
-                   [:div.property-value.col-span-3
-                    (property-value block property v opts)]])
+                   (if (:class-schema? opts)
+                     [:div.property-description.col-span-3.font-light
+                      (get-in property [:block/schema :description])]
+                     [:div.property-value.col-span-3
+                      (property-value block property v opts)])])
                 ;; TODO: built in properties should have UUID and corresponding schema
                 ;; builtin
                 [:div