Fix http test

2009-02-01 02:02:09 -06:00 · 2009-02-01 02:02:09 -06:00 · e089ce6df0
parent 83cbe7c04f
commit e089ce6df0
1 changed files with 1 additions and 1 deletions
--- a/basis/http/http-tests.factor
+++ b/basis/http/http-tests.factor
@ -308,7 +308,7 @@ SYMBOL: a
    <dispatcher>
        <action>
            [ a get-global "a" set-value ] >>init
-            [ [ "a" <field> render ] "text/html" <content> ] >>display
+            [ [ "<html>" write "a" <field> render "</html>" write ] "text/html" <content> ] >>display
            [ { { "a" [ v-integer ] } } validate-params ] >>validate
            [ "a" value a set-global URL" " <redirect> ] >>submit
        <conversations>