cbaines/guix-data-service
1
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Make it possible to show HTML for the invalid parameter messages

Browse source 
So that they can include links.
This commit is contained in:
Christopher Baines 2020-11-28 19:36:26 +00:00
parent 8f702e5666
commit cb871530cf
1 changed files with 7 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

10
guix-data-service/web/view/html.scm
View file

@ -251,9 +251,13 @@
(lambda (message) (lambda (message)
`(strong `(strong
(@ (style "display: block;")) (@ (style "display: block;"))
,(string-append "Error: "
"Error: " message))) ,@(if (list? message)
(filter string? messages)))))) message
(list message))))
(remove (lambda (v)
(eq? #f v))
messages))))))
'()) '())
,@(if required? '((strong "Required. ")) '()) ,@(if required? '((strong "Required. ")) '())
,@(if help-text ,@(if help-text