diff options
| author | Asko Nõmm <asko@nmm.ee> | 2025-09-23 02:08:12 +0300 |
|---|---|---|
| committer | Asko Nõmm <asko@nmm.ee> | 2025-09-23 02:08:12 +0300 |
| commit | 20fa62ab90ed87e143bf9b140ba4b7708f1e91ee (patch) | |
| tree | 717c19e9e39adcd29f8e53f58dd9e71ee5447900 /src/dompa/coordinates.cljc | |
| parent | 1cde4cbae25e4cd1a79e882f0858f44b664a453b (diff) | |
Make nodes have namespaces keys so that we could make `$` helper macro into a function instead.
Diffstat (limited to 'src/dompa/coordinates.cljc')
| -rw-r--r-- | src/dompa/coordinates.cljc | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/dompa/coordinates.cljc b/src/dompa/coordinates.cljc index abaf233..4f9a436 100644 --- a/src/dompa/coordinates.cljc +++ b/src/dompa/coordinates.cljc @@ -259,13 +259,13 @@ [node-html node-children] (let [node-name (html-str->node-name node-html)] (merge - {:name node-name} + {:node/name node-name} (when (= node-name :dompa/text) - {:value node-html}) + {:node/value node-html}) (when-let [attrs (html-str->node-attrs node-html)] - {:attrs attrs}) + {:node/attrs attrs}) (when node-children - {:children node-children})))) + {:node/children node-children})))) (defn ->nodes "Transform given `html` according to given `coordinates` into |
