(* COCANWIKI scripts.
 * Written by Richard W.M. Jones <rich@merjis.com>.
 * Copyright (C) 2004 Merjis Ltd.
 * $Id: create_host_form.ml,v 1.3 2004/09/08 15:46:53 rich Exp $
 *
 * NB. Because there might not be any hosts existing when this Wiki
 * is created, this is not a normal Cocanwiki.register_script script.
 * Instead, we're using the standard mod_caml Registry.
 *)

open Apache
open Registry
open Cgi
open Printf

let template = Cocanwiki_template._get_template "admin/create_host_form.html"

let run r =
  let q = new cgi r in
  (* let dbh = Cocanwiki._get_dbh r in *)
  q#template template

let () =
  register_script run