ocaml 3.09 transition

[helm.git] / helm / on-line / html / cic / index.html
diff --git a/helm/on-line/html/cic/index.html b/helm/on-line/html/cic/index.html

index c2a2ef50463a0224fefeaee74b5e022b340a4690..ff3b7ba2077ce31c479dc0c0e23f4211707d1202 100644 (file)
--- a/helm/on-line/html/cic/index.html
+++ b/helm/on-line/html/cic/index.html
@@ -1,16 +1,25 @@
  <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"
  "http://www.w3.org/TR/REC-html40/loose.dtd">
-<html>
+<html xmlns="http://www.w3.org/1999/xhtml" xmlns:subst="http://www.cs.unibo.it/helm/subst">
  <head>
- <script language="JavaScript" src="../../javascript/defaults.js"></script>
- <script language="JavaScript" src="../../javascript/utils.js"></script>
- <title>???</script></title>
+ <title><subst:CICURI/></title>
  </head>
  <script>
-  document.write('<frameset onLoad="window.focus()" rows="18%,*" border="0" scrolling="no">');
-  document.write('<frame src="control.html?url=' + getParam('url') +'"/>');
-  document.write('<frame src="' + unescape(getParam('url')) + '" + name="result"/>');
+ var processorURL = "<subst:processorURL/>";
+ var interfaceURL = "<subst:interfaceURL/>";
+ var profile = "<subst:profile/>";
+ var CICURI = "<subst:CICURI/>";
+ var annotations = "<subst:annotations/>";
+ var url = "<subst:makeURL/>";
+<![CDATA[
+  document.write('<frameset cols="20%,*" border="1">');
+  document.write('<frame src="' + processorURL +
+    'apply?keys=SPK%2CRT&profile=' + profile + '&param.profile=' + profile +
+    '&param.annotations=' + annotations + '&param.CICURI=' +
+    CICURI + '&param.url=' + escape(url) + '&xmluri=' +
+    escape(interfaceURL + 'html/cic/control.html') +'"/>');
+  document.write('<frame src="' + url + '&param.toplevel=true" name="result"/>');
    document.write('</frameset>');
+]]>
  </script>
-
  </html>