Keep eliss-control-group from outputting nil="nil"

This commit is contained in:
Tom Willemse 2013-05-19 03:16:33 +02:00
parent 57a4ee838a
commit 49639ee0ee

View file

@ -80,8 +80,9 @@ certain other properties.
(input (@ (type "text")
(name ,name)
(id ,name)
,(when placeholder `(placeholder ,placeholder))
,(when default `(value ,default))))))))
,@(when placeholder
`((placeholder ,placeholder)))
,@(when default `((value ,default)))))))))
(defun eliss-project-page (httpcon)
"Send a list of issues and an issue-creation form over HTTPCON."