ocaml 3.09 transition

[helm.git] / helm / cgi / mkindex.pl

diff --git a/helm/cgi/mkindex.pl b/helm/cgi/mkindex.pl
index cd6e47d61d267a77cdb359fcd077cbdc44bc0ddf..955d6d8b0e6dd597fc832d190da129d574bab783 100755 (executable)
--- a/helm/cgi/mkindex.pl
+++ b/helm/cgi/mkindex.pl
@@ -22,6 +22,8 @@ $cgi = new CGI($ENV{"REQUEST_URL"});
 $mode      = $cgi->param('mode');
 $cicuri    = $cgi->param('cicuri');
 $theoryuri = $cgi->param('theoryuri');
+$processorURL = $cgi->param('processorURL');
+$getterURL = $cgi->param('getterURL');
 $topurl    = $cgi->url();
 
 print <<EOT;
@@ -34,15 +36,15 @@ Content-type: text/html
  <title>Index of $cicuri and $theoryuri</title>
 </head>
 <frameset rows="18%,*" border="0" scrolling="no">
-  <frame src="mkcontrol.pl?topurl=$topurl&mode=$mode&cicuri=$cicuri&theoryuri=$theoryuri" name="control"/>
+  <frame src="mkcontrol.pl?topurl=$topurl&mode=$mode&cicuri=$cicuri&theoryuri=$theoryuri&processorURL=$processorURL&getterURL=$getterURL" name="control"/>
   <frameset cols="50%,50%" border="0" scrolling="no">
      <frameset rows="11%,*" border="0" scrolling="no">
         <frame src="mkheader.pl?uri=$theoryuri" name="theoryheader"/>
-        <frame src="mkindextheory.pl?theoryuri=$theoryuri" name="theoryresult"/>
+        <frame src="mkindextheory.pl?theoryuri=$theoryuri&getterURL=$getterURL" name="theoryresult"/>
      </frameset>
      <frameset rows="11%,*" border="0" scrolling="no">
         <frame src="mkheader.pl?uri=$cicuri" name="cicheader"/>
-        <frame src="mkindexcic.pl?cicuri=$cicuri" name="cicresult"/>
+        <frame src="mkindexcic.pl?cicuri=$cicuri&getterURL=$getterURL" name="cicresult"/>
      </frameset>
   </frameset>
 </frameset>