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 c0611022cf52a4f96b3da6d204164b9a5c2a97b9..ff3b7ba2077ce31c479dc0c0e23f4211707d1202 100644 (file)
--- a/helm/on-line/html/cic/index.html
+++ b/helm/on-line/html/cic/index.html
@@ -1,44 +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 rows="18%,*" border="0" scrolling="no">');
-  document.write('<frame src="control.html?url=' + getParam('url') +'"/>');
-  document.write('<frame src="' + unescape(getParam('url')) + '"/>');
-/*
-  document.write('<frame src="control.html' +
-       '?topurl=' + location.protocol + "//" + location.host + location.pathname +
-       '&mode=' + getParam('mode') +
-       '&cicuri=' + getParam('cicuri') +
-       '&theoryuri=' + getParam('theoryuri') +
-       '&processorURL=' + getParam('processorURL') +
-       '&getterURL=' + getParam('getterURL') +
-       '" name="control"/>');
-*/
-/*
-  document.write('<frame src="' +
-       getParam('processorURL') + 'apply' +
-       '?keys=GP' +
-       '&xmluri=' + location.protocol + "//" + location.host + chopSlash(location.pathname) + "/header.html" +
-       '&param.uri=' + getParam('theoryuri') + 
-       '" name="theoryheader"/>');
-  document.write('<frame src="' +
-       getParam('processorURL') + 'apply' +
-       '?keys=L2H' +
-       '&xmluri=' + escape(getParam('getterURL') + 'ls?format=xml&baseuri=' + getParam('theoryuri')) +
-        '&param.keys=L2H' +
-       '&param.uri=' + getParam('theoryuri') +
-       '&param.getterURL=' + getParam('getterURL') +
-        '&param.target=theory' +
-       '&param.interfaceURL=' + location.protocol + "//" + location.host + chopSlash(chopSlash(chopSlash(location.pathname))) + 
-       '" name="theoryresult"/>');
-*/
+ 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>