X-Git-Url: http://git.euphorik.ch/?p=euphorik.git;a=blobdiff_plain;f=index.yaws;h=767a0b7ccbf00a4ba38ab4d7e37bb3d62eee56a6;hp=35180ba10bdeda4e26cf340bcbef282300db37b6;hb=15f8b5143c6b9dcfe86eda84c22c31826a7f3d1c;hpb=217c4d7a0d5f9fee3a8ef0a05ab8506c7f39d5e5 diff --git a/index.yaws b/index.yaws index 35180ba..767a0b7 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 @@ -24,10 +35,10 @@ - - - - + + + + @@ -35,6 +46,7 @@ +