]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/interface/xsltProcessorHTTP.ml
some improvement for parameters, configuration
[helm.git] / helm / interface / xsltProcessorHTTP.ml
index 56096a314bf98137179ef8bfa71cf6023602a436..92888ed74eec017d727d675f256d1dd66f839d72 100644 (file)
@@ -40,13 +40,15 @@ let process uri usecache mode =
  let uri = UriManager.string_of_uri uri in
  let url = Configuration.getter_url ^ "get?uri=" ^ uri in
  let key_list = StyleConfiguration.key_list_of_mode_name mode in
- let string_to_send = Configuration.processor_url ^ "apply?xmluri=" ^ url ^ 
+ let string_to_send =
+  Configuration.processor_url ^ "apply?xmluri=" ^ url ^
+  "&param.getterURL=" ^ Configuration.getter_url ^
   (List.fold_right
    (fun key cmd -> "&key=" ^ key ^ cmd)
     key_list
     ""
    )
  in
-  ClientHTTP.get_and_save_to_tmp string_to_send
+  string_to_send
 ;;