X-Git-Url: http://git.euphorik.ch/?p=euphorik.git;a=blobdiff_plain;f=index.yaws;h=9f318dca4799732e6cd79cedbd18ea2df1f7fcf1;hp=c600fe90d44ac56a9dbcd982d8e47f48f37d8c37;hb=972919ab7f5651cd721eb6eec75f7150fdeaf347;hpb=f39b28682e1e41cd487a2268320552b687640adf
diff --git a/index.yaws b/index.yaws
index c600fe9..9f318dc 100755
--- a/index.yaws
+++ b/index.yaws
@@ -1,7 +1,18 @@
-
+
-
+
+ out(A) ->
+ {header, {content_type,
+ case string:str((A#arg.headers)#headers.user_agent, "MSIE") of
+ 0 -> "application/xhtml+xml";
+ _ -> "text/html"
+ end
+ }}.
+
+
euphorik.ch
@@ -23,16 +34,36 @@
}.
-
-
-
-
-
-
-
-
-
-
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+