Malli - use registry references for qualified keys in a map?

[damn]

https://github.com/metosin/malli?tab=readme-ov-file#qualified-keys-in-a-map

Maybe no need for ->data function schemas just expand at validate?

https://github.com/metosin/malli?tab=readme-ov-file#schema-registry
Can pass as last arg to m/validate

Use spec:
https://github.com/clojure/spec-alpha2/wiki/Differences-from-spec.alpha#simple-spec-ops

(require '[clojure.spec.alpha :as s])
(s/def :property/audiovisual
  (s/keys :req [:property/id
                :tx/sound
                :entity/animation]))

(s/def :property/audiovisual
  (s/keys :req [:av/sound :av/animation]
          :opt [:foo/bar]))

; does not support closed map set
(s/conform :property/audiovisual
           {:foo/bar 1
            :av/sound "foo"
            :av/animation "bar"
            :foo 2})

(comment
 (defn closed-map-spec [spec]
  (s/and spec
         #(= (set (keys %))
             (set (concat (:req spec)
                          (:opt spec)))))))

(defn get-optional-keys [spec]
  (let [spec-form (s/form spec)]
    (->> spec-form
         (drop-while #(not= :opt %))  ;; Find :opt-un in the form
         second)))                       ;; Get the list after :opt-un

(comment
 (get-optional-keys :property/audiovisual))

Grep malli:
((m/|me/|mg/)