diff options
| author | colin <colin@cicadas.surf> | 2024-11-24 08:32:07 -0800 |
|---|---|---|
| committer | colin <colin@cicadas.surf> | 2024-11-24 08:32:07 -0800 |
| commit | 8040abe92f2c8097aa40a609a6fac2ef5e22a2d3 (patch) | |
| tree | 69fcd5a3b2b1831b26f223655114dd5cb016e321 | |
| parent | b712dba9223fbfe0d192a65b243dfe983cebfad4 (diff) | |
Add <elem> ps macro
| -rw-r--r-- | src/hypnotisml.lisp | 4 | ||||
| -rw-r--r-- | src/package.lisp | 3 |
2 files changed, 5 insertions, 2 deletions
diff --git a/src/hypnotisml.lisp b/src/hypnotisml.lisp index 5a3ec84..544f195 100644 --- a/src/hypnotisml.lisp +++ b/src/hypnotisml.lisp @@ -274,7 +274,6 @@ already present in the element." - ;;; RENDERING (defun html-string (elem &key (pretty t)) @@ -628,6 +627,9 @@ E.g. :1/2, :1, :3/4" (ps:defpsmacro js-elem (elem) `(ps:chain document (query-selector (ps:lisp (elem-query-selector ,elem))))) +(ps:defpsmacro <elem> (elem) + `(ps:chain document (query-selector (ps:lisp (elem-query-selector ,elem))))) + diff --git a/src/package.lisp b/src/package.lisp index d2731e6..5064b6c 100644 --- a/src/package.lisp +++ b/src/package.lisp @@ -170,7 +170,8 @@ ;; parenscript macros (:export - #:js-elem) + #:js-elem + #:<elem>) ;; transforms and structure editing (:export |