ocaml 3.09 transition

[helm.git] / helm / DEVEL / profile-manager / response.ml

let quote_attribute s = s

let quote s = s

let error s = "<error>" ^ (quote s) ^ "</error>"

let ok () = "<ok/>"