- 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 url = Configuration.getter_url ^ "getxml?uri=" ^ uri in
+ let first_key::key_list = StyleConfiguration.key_list_of_mode_name mode in
+ let string_to_send =
+ Configuration.processor_url ^ "apply?xmluri=" ^ url ^
+ "¶m.getterURL=" ^ Configuration.getter_url ^
+ "&keys=" ^ first_key ^