%# $Id: form.mc,v 1.3 2008-01-29 14:49:02 mike Exp $
my @params = (obj => "Keystone::Resolver::DB::User",
submitted => defined(utf8param($r, "register")));
my $p1 = utf8param($r, "password1");
my $p2 = utf8param($r, "password2");
Please enter your details below to register as a user. The
fields marked with an asterisk (*)
are mandatory; the others are optional.