X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=scripts%2Fcocanwiki_ok.ml;h=08cd71a77fcb1e8835c7d678d09969cdef092fdb;hb=019c80476c64b5cd86b6e9d115c86162b2ae462c;hp=a1e43b63b896ac96401d68d2f94bb7e33a7686aa;hpb=afe5e5f759988c04d9b3bcee7cf75e2c15e1d1d5;p=cocanwiki.git diff --git a/scripts/cocanwiki_ok.ml b/scripts/cocanwiki_ok.ml index a1e43b6..08cd71a 100644 --- a/scripts/cocanwiki_ok.ml +++ b/scripts/cocanwiki_ok.ml @@ -1,7 +1,22 @@ -(* COCANWIKI scripts. +(* COCANWIKI - a wiki written in Objective CAML. * Written by Richard W.M. Jones . * Copyright (C) 2004 Merjis Ltd. - * $Id: cocanwiki_ok.ml,v 1.3 2004/09/07 14:58:34 rich Exp $ + * $Id: cocanwiki_ok.ml,v 1.5 2004/09/09 12:21:22 rich Exp $ + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2 of the License, or + * (at your option) any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place - Suite 330, + * Boston, MA 02111-1307, USA. *) open Apache @@ -14,7 +29,7 @@ open Cocanwiki_template (* Override StdPages.ok and StdPages.error with out our versions. * Also have some standard buttons around. *) -let ok_error_template = get_template "ok_error.html" +let ok_error_template = _get_template "ok_error.html" let error ?cookie ?cookies ?title ?(icon = "/_graphics/error.png") ?icon_alt ?back_button ?close_button q message =