fix WTF-9

src/brmelect.scm

@@ -87,7 +87,7 @@
              @tr{@th{ID} @th{Nick} @th{Name} @th{Surname}}
              @,@(row-map*
                 (lambda (id nick name surname)
-                  `@tr{@td{@,id}@td{@,nick}@td{@,name}@td{@,surname}})
+                  `@tr{@td{@,(number->string id)}@td{@,nick}@td{@,name}@td{@,surname}})
                 rows)
            }
         }))))

src/webgate-core.scm

@@ -234,7 +234,7 @@
 	  (hash-table-ref/default status-table status "Unknown"))
 	 (headers '()))
   (%make-response
-   "text/html" headers (call-with-output-string (cut write-html html <>))
+   "text/html; charset=UTF-8" headers (call-with-output-string (cut write-html html <>))
    status status-message))
 
 (define (make-error-response