X-Git-Url: http://git.euphorik.ch/?a=blobdiff_plain;f=index.yaws;h=5bc67bd293282974bef46b8b0469d378d0e5fc75;hb=9be780a2fbd68bf4c71431d94e8e8c07666468fb;hp=9d31ae48064c56849eec04468fdaca6b282260f7;hpb=0f7afc675941bab91a2e74fd40caffea876591df;p=euphorik.git
diff --git a/index.yaws b/index.yaws
index 9d31ae4..5bc67bd 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