MOD avancement dans le module 'communication'

[euphorik.git] / index.yaws
diff --git a/index.yaws b/index.yaws

index 9d31ae4..9f318dc 100755 (executable)
--- a/index.yaws
+++ b/index.yaws
@@ -1,7 +1,18 @@
-<?xml version="1.0" encoding="UTF-8" ?>
+<?xml version="1.0" encoding="UTF-8"?>
  <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN"
  "http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">
-<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="fr" >
+<erl>
+ out(A) ->
+   {header, {content_type, 
+      case string:str((A#arg.headers)#headers.user_agent, "MSIE") of
+         0 -> "application/xhtml+xml";
+         _ -> "text/html"
+      end
+   }}.
+</erl>
+<html xmlns="http://www.w3.org/1999/xhtml" 
+      xmlns:svg="http://www.w3.org/2000/svg"
+      xmlns:xlink="http://www.w3.org/1999/xlink">
  <head>
     <meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
     <title>euphorik.ch</title>
@@ -31,7 +42,8 @@
  
     <script type="text/javascript" src="js/betterjs.js" prod="delete"></script>
     <script type="text/javascript" src="js/comet.js" prod="delete"></script>
-   <script type="text/javascript" src="js/fragment.js" prod="delete"></script>
+   <script type="text/javascript" src="js/fragment.js" prod="delete"></script>\r
+   <script type="text/javascript" src="js/communication.js" prod="delete"></script>
  
     <script type="text/javascript" src="js/euphorik.js"></script>