ocaml 3.09 transition

[helm.git] / helm / uwobo-panel / control.js

diff --git a/helm/uwobo-panel/control.js b/helm/uwobo-panel/control.js
index 147f8bd2544bb5883c0a99b3460732a52213244e..9858fe1400c6d8a53f8a8e27d2b089ca37b33154 100644 (file)
--- a/helm/uwobo-panel/control.js
+++ b/helm/uwobo-panel/control.js
@@ -15,7 +15,7 @@ function getParam(name, def)
 
 function getInitialPort()
 {
-  return "68080";
+  return "38080";
 }
 
 function getInitialProcessorURL()
@@ -91,6 +91,44 @@ function selectPredefinedStylesheet(ss)
   document.loadEscape.elements[0].checked = true;
 }
 
+function getProfileParams()
+{
+  var password = document.getParamsProfilePassword.elements[0].value;
+  if (password != "") { password = "&password=" + password; };
+
+  top.result.location.replace(getUwoboURL() + "getparams?id=" + document.getParamsProfileID.elements[0].value + password);
+}
+
+function setProfileParam()
+{
+  var password = document.setParamProfilePassword.elements[0].value;
+  if (password != "") { password = "&password=" + password; };
+
+  top.result.location.replace(getUwoboURL() + "setparam?id=" + document.setParamProfileID.elements[0].value + "&key=" + document.setParamProfileKey.elements[0].value + "&value=" + document.setParamProfileValue.elements[0].value + password);
+}
+
+function createProfile()
+{
+  var id = document.createProfileID.elements[0].value;
+  if (id != "") { id = "&id=" + id; };
+
+  var password = document.createProfilePassword.elements[0].value;
+  if (password != "") { password = "&password=" + password; };
+
+  var clone = document.createProfileClone.elements[0].value;
+  if (clone != "") { clone = "&orig=" + clone; };
+
+  top.result.location.replace(getUwoboURL() + "createprofile?foo=x" + id + password + clone);
+}
+
+function removeProfile()
+{
+  var password = document.removeProfilePassword.elements[0].value;
+  if (password != "") { password = "&password=" + password; };
+
+  top.result.location.replace(getUwoboURL() + "removeprofile?id=" + document.removeProfileID.elements[0].value + password);
+}
+
 function getStylesheetURL()
 {
   var s;