Fix p component, extract :children arg-desc

Author: kimo-k

src/re_com/args.cljs

@@ -2,6 +2,13 @@
   (:require
    [re-com.validate :refer [css-style? html-attr? parts? vector-of-maps? css-class?]]))
 
+(def children
+  {:description "Pass a list of hiccups for this component to use, or contain."
+   :name        :children
+   :required    true
+   :type        "vector of hiccups | list of hiccups"
+   :validate-fn sequential?})
+
 (def class
   {:name        :class,
    :required    false,

src/re_com/box.cljs

@@ -226,7 +226,7 @@
 
 (def h-box-args-desc
   (when include-args-desc?
-    [{:name :children   :required true                    :type "vector"        :validate-fn sequential?    :description "a vector (or list) of components"}
+    [args/children
      {:name :size       :required false :default "none"   :type "string"        :validate-fn string?        :description [:span "equivalent to CSS style " [:span.bold "flex"] "." [:br]  "Examples: " [:code "initial"] ", " [:code "auto"] ", " [:code "none"] ", " [:code "100px"] ", " [:code "2"] " or a generic triple of " [:code "grow shrink basis"]]}
      {:name :width      :required false                   :type "string"        :validate-fn string?        :description "a CSS width style"}
      {:name :height     :required false                   :type "string"        :validate-fn string?        :description "a CSS height style"}
@@ -291,7 +291,7 @@
 
 (def v-box-args-desc
   (when include-args-desc?
-    [{:name :children   :required true                    :type "vector"        :validate-fn sequential?    :description "a vector (or list) of components"}
+    [args/children
      {:name :size       :required false :default "none"   :type "string"        :validate-fn string?        :description [:span "equivalent to CSS style " [:span.bold "flex"] "." [:br]  "Examples: " [:code "initial"] ", " [:code "auto"] ", " [:code "none"] ", " [:code "100px"] ", " [:code "2"] " or a generic triple of " [:code "grow shrink basis"]]}
      {:name :width      :required false                   :type "string"        :validate-fn string?        :description "a CSS width style"}
      {:name :height     :required false                   :type "string"        :validate-fn string?        :description "a CSS height style"}

src/re_com/nested_grid.cljs

@@ -3,6 +3,7 @@
    [re-com.validate :refer [validate-args-macro]])
   (:require
    [clojure.string :as str]
+   [re-com.args :as args]
    [re-com.config :as config :refer [include-args-desc?]]
    [re-com.validate]
    [re-com.util :as u]
@@ -18,7 +19,7 @@
   [{:name :row-path}
    {:name :column-path}
    {:name :value}
-   {:name :children}])
+   args/children])
 
 (def part-structure
   [::wrapper

src/re_com/popover.cljs

@@ -3,6 +3,7 @@
    [re-com.core         :refer [handler-fn at reflect-current-component]]
    [re-com.validate     :refer [validate-args-macro]])
   (:require
+   [re-com.args :as args]
    [re-com.config       :refer [include-args-desc?]]
    [re-com.debug        :refer [->attr]]
    [re-com.theme        :as theme]
@@ -272,7 +273,7 @@
 
 (def popover-border-args-desc
   (when include-args-desc?
-    [{:name :children             :required true                        :type "vector"           :validate-fn sequential?                   :description "a vector of component markups"}
+    [args/children
      {:name :position             :required true                        :type "keyword r/atom"   :validate-fn position?                     :description [:span "relative to this anchor. One of " position-options-list]}
      {:name :optimize-position? :required false :type "boolean" :default "true" :description "When true, dynamically repositions the popover body to fit within the available viewport space."}
      {:name :position-offset      :required false                       :type "integer"          :validate-fn number?                       :description [:span "px offset of the arrow from its default " [:code ":position"] " along the popover border. Is ignored when " [:code ":position"] " is one of the " [:code ":xxx-center"] " variants. Positive numbers slide the popover toward its center"]}

src/re_com/text.cljs

@@ -172,7 +172,8 @@
 (def p-args-desc
   (when include-args-desc?
     (into
-     [args/class
+     [(merge args/children {:required false})
+      args/class
       args/style
       args/attr
       (args/parts p-parts)