mirror of
https://github.com/penpot/penpot.git
synced 2025-01-24 15:39:50 -05:00
12 lines
325 B
Clojure
12 lines
325 B
Clojure
|
(ns hooks.export
|
||
|
|
(:require [clj-kondo.hooks-api :as api]))
|
||
|
|
|
||
|
|
(defn export
|
||
|
|
[{:keys [:node]}]
|
||
|
|
(let [[_ sname] (:children node)
|
||
|
|
result (api/list-node
|
||
|
|
[(api/token-node (symbol "def"))
|
||
|
|
(api/token-node (symbol (name (:value sname))))
|
||
|
|
sname])]
|
||
|
|
{:node result}))
|