add DOCTYPE html in most places.

[factor.git] / basis / http / http-tests.factor
diff --git a/basis/http/http-tests.factor b/basis/http/http-tests.factor

index 444edc3157091eae48393c130096a8e2167b3e4e..fe70a00e399d27ee5865e52611123f14e9980807 100644 (file)
--- a/basis/http/http-tests.factor
+++ b/basis/http/http-tests.factor
@@ -345,7 +345,7 @@ SYMBOL: a
  <dispatcher>
      <action>
          [ a get-global "a" set-value ] >>init
-        [ [ "<html>" write "a" <field> render "</html>" write ] "text/html" <content> ] >>display
+        [ [ "<!DOCTYPE html><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>