X-Git-Url: http://git.euphorik.ch/?p=euphorik.git;a=blobdiff_plain;f=index.yaws;h=9f318dca4799732e6cd79cedbd18ea2df1f7fcf1;hp=9a5d1e285376eec918369f57b9fb5424821a2cf8;hb=972919ab7f5651cd721eb6eec75f7150fdeaf347;hpb=1146f3264ff7535ff3408230140414789c3c25da diff --git a/index.yaws b/index.yaws index 9a5d1e2..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,7 +34,36 @@ }. - + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +