Author: glondu-guest
Date: Thu Feb 26 17:27:22 2009
New Revision: 6267

URL: http://svn.debian.org/wsvn/?sc=1&rev=6267
Log:
XHTML validity (and shameless advertising)

Modified:
    trunk/tools/ocaml_transition_monitor/ocaml_transition_monitor.mll

Modified: trunk/tools/ocaml_transition_monitor/ocaml_transition_monitor.mll
URL: 
http://svn.debian.org/wsvn/trunk/tools/ocaml_transition_monitor/ocaml_transition_monitor.mll?rev=6267&op=diff
==============================================================================
--- trunk/tools/ocaml_transition_monitor/ocaml_transition_monitor.mll (original)
+++ trunk/tools/ocaml_transition_monitor/ocaml_transition_monitor.mll Thu Feb 
26 17:27:22 2009
@@ -255,11 +255,16 @@
            
"http://svn.debian.org/wsvn/pkg-ocaml-maint/trunk/tools/ocaml_transition_monitor/ocaml_transition_monitor.mll?op=file&rev=0&sc=0";
            "is available";
          pcdata "."; br ();
+         pcdata "This page has been type-check by OCaml using ";
+         a_link "http://ocsigen.org/docu/1.1.0/XHTML.M.html"; "XHTML.M";
+         pcdata " and should be ";
+         a_link "http://validator.w3.org/check?uri=referer"; "XHTML Valid";
+         pcdata "."; br ();
          pcdata "Kudos: zack and his ";
          a_link 
"http://pkg-ocaml-maint.alioth.debian.org/debian-ocaml-status.html"; "OCaml 
Packages Status in Debian";
          pcdata ", from which I shamelessly copied this page's CSS.";
         ]] in
-    let html = html
+    let html = html ~a:[a_xmlns `W3_org_1999_xhtml]
       (head (title (pcdata page_title))
          [link ~a:[a_rel [`Stylesheet]; a_href (uri_of_string 
"ocaml-status.css")] ();
           script ~contenttype:"text/javascript" ~a:[a_src (uri_of_string 
"http://code.jquery.com/jquery-latest.js";)] (pcdata "");


_______________________________________________
Pkg-ocaml-maint-commits mailing list
Pkg-ocaml-maint-commits@lists.alioth.debian.org
http://lists.alioth.debian.org/mailman/listinfo/pkg-ocaml-maint-commits

Reply via email to