Commit 67fe33dd authored by Jason Miller's avatar Jason Miller
Browse files

Correct two keywords in ps-dom.lisp

Fixes #32
parent bc3ba1da
......@@ -3,13 +3,13 @@
;; Utilities for accessing standard DOM functionality in a Lispier, PSier way.
(defpsmacro inner-html (el)
`(@ ,el :inner-h-t-m-l))
`(@ ,el 'inner-h-t-m-l))
(defpsmacro uri-encode (str)
`(if (null ,str) "" (encode-u-r-i-component ,str)))
(defpsmacro attribute (el attr)
`((@ ,el :get-attribute) ,attr))
`((@ ,el 'get-attribute) ,attr))
(defun assert-is-one-of (val options)
(unless (member val options)
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment