02/10: Avoid errors in form-horizontal-control

[Christopher Baines]

cbaines pushed a commit to branch master
in repository data-service.

commit d0a4143c7c45f84d5761fb6ccf31be586b1c887c
Author: Christopher Baines <mail@cbaines.net>
AuthorDate: Sat Nov 21 18:31:39 2020 +0000

    Avoid errors in form-horizontal-control
    
    When invalid parameters don't have a message.
---
 guix-data-service/web/view/html.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/guix-data-service/web/view/html.scm 
b/guix-data-service/web/view/html.scm
index 1e19b6f..40cf60e 100644
--- a/guix-data-service/web/view/html.scm
+++ b/guix-data-service/web/view/html.scm
@@ -253,7 +253,7 @@
                                                (@ (style "display: block;"))
                                                ,(string-append
                                                  "Error: " message)))
-                                           messages)))))
+                                           (filter string? messages))))))
                                '())
                          ,@(if required? '((strong "Required. ")) '())
                          ,@(if help-text