X-Git-Url: http://git.euphorik.ch/?p=euphorik.git;a=blobdiff_plain;f=index.yaws;h=5bc67bd293282974bef46b8b0469d378d0e5fc75;hp=c600fe90d44ac56a9dbcd982d8e47f48f37d8c37;hb=c219198926b679ef5bc28182b3d05e8c1f447886;hpb=f39b28682e1e41cd487a2268320552b687640adf diff --git a/index.yaws b/index.yaws index c600fe9..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 @@ -23,16 +34,35 @@ }. - - - - - - - - - - + + + + + + + + + + + + + + + + + + + + + + + + + + + + +