paku/hsx
1
0
Fork 0
Code Issues Pull requests Projects Releases 1 Packages Wiki Activity Actions

Add comment

Browse source
This commit is contained in:
paku 2024-02-20 17:53:16 +09:00
parent 929b93960d
commit ef1071404b
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/generator.lisp
View file

@ -7,7 +7,7 @@
#:elem-str)) #:elem-str))
(in-package #:piccolo/generator) (in-package #:piccolo/generator)
;;; print-object ;;; groups of specific tags and attributes
(defun symbols-hash-table (symbols) (defun symbols-hash-table (symbols)
(let ((ht (make-hash-table))) (let ((ht (make-hash-table)))
@ -32,6 +32,8 @@
area base br col embed hr img input keygen area base br col embed hr img input keygen
link meta param source track wbr) link meta param source track wbr)
;;; print-object
(defparameter *expand-user-element* t) (defparameter *expand-user-element* t)
(defmethod print-object ((attrs elm:attrs) stream) (defmethod print-object ((attrs elm:attrs) stream)