register uri url;
return_html_msg "Register done" outchan
| _ -> assert false)
+ | "/clean_cache" ->
+ Http_getter_cache.clean ();
+ return_html_msg "Done." outchan
| "/update" ->
Http_getter_env.reload (); (* reload servers list from servers file *)
let log = update_from_all_servers () in