X-Git-Url: http://git.euphorik.ch/?p=euphorik.git;a=blobdiff_plain;f=index.yaws;h=47595bb3ab44fa6c6cb6e960fa0d27c50fba32de;hp=105694d329b0028860972e8a474a8bee03ca3753;hb=7203835bce6f94b6afcc7403694145c829a4f833;hpb=55b0291a691e56465277811aac749e930509fea2
diff --git a/index.yaws b/index.yaws
index 105694d..47595bb 100755
--- a/index.yaws
+++ b/index.yaws
@@ -1,6 +1,15 @@
+
+ out(A) ->
+ {header, {content_type,
+ case string:str((A#arg.headers)#headers.user_agent, "MSIE") of
+ 0 -> "application/xhtml+xml";
+ _ -> "text/html"
+ end
+ }}.
+
@@ -23,7 +32,35 @@
}.
-
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+