-<?xml version="1.0" encoding="UTF-8"?>\r
-<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN"\r
-"http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">\r
-<erl>\r
- out(A) ->\r
- {header, {content_type,\r
- case string:str((A#arg.headers)#headers.user_agent, "MSIE") of\r
- 0 -> "text/html"; %"application/xhtml+xml"; % TODO : jquery.lightbox does not support application/xhtml+xml\r
- _ -> "text/html"\r
- end\r
- }}.\r
-</erl>\r
-<html xmlns="http://www.w3.org/1999/xhtml">\r
+<!DOCTYPE html>\r
+<html>\r
<head>\r
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />\r
<title>euphorik.ch</title>\r
<p>\r
<select id="menuCss">\r
<erl>\r
- % parse les styles disponible\r
+ % Parse the available styles.\r
out(A) ->\r
Styles_dir = A#arg.docroot ++ "/styles",\r
{ok, Liste_dir} = file:list_dir(Styles_dir),\r