Fix test failures

extra/html/templates/chloe/chloe-tests.factor

@@ -151,7 +151,7 @@ TUPLE: person first-name last-name ;
 
 [ ] [ H{ { "a" H{ { "b" "c" } } } } values set ] unit-test
 
-[ "<form method='POST' action='foo'><input type='hidden' name='__n' value='a'/></form>" ] [
+[ "<form method='post' action='foo'><input type='hidden' name='__n' value='a'/></form>" ] [
     [
         "test10" test-template call-template
     ] run-template

extra/io/server/server-tests.factor

@@ -2,6 +2,6 @@ IN: io.server.tests
 USING: tools.test io.server io.server.private kernel ;
 
 { 2 0 } [ [ ] server-loop ] must-infer-as
-{ 2 0 } [ [ ] with-connection ] must-infer-as
+{ 3 0 } [ [ ] with-connection ] must-infer-as
 { 1 0 } [ [ ] swap datagram-loop ] must-infer-as
 { 2 0 } [ [ ] with-datagrams ] must-infer-as