Metacat

#

sub handleRegister {

    if ($query->param('o') =~ "LTER") {

      fullTemplate( ['registerLter'] );

      exit(0);

    } 

        #exit();

    }

    else {

        my $errorMessage = "The verification code is wrong. Please input again.";

        fullTemplate(['register'], { stage => "register",

                                     allParams => $allParams,

    my @requiredParams = ( 'givenName', 'sn', 'o', 'mail', 

                           'uid', 'userPassword', 'userPassword2');

    if (! paramsAreValid(@requiredParams)) {

        my $errorMessage = "Required information is missing. " .

            "Please fill in all required fields and resubmit the form.";

        fullTemplate(['register'], { stage => "register",

        exit();

    } else {

         if ($query->param('userPassword') ne $query->param('userPassword2')) {

            my $errorMessage = "The passwords do not match. Try again.";

            fullTemplate( ['registerFailed', 'register'], { stage => "register",

                                                            allParams => $allParams,

                      'userPassword2' => $query->param('userPassword2'), 

                      'title' => $query->param('title'), 

                      'telephoneNumber' => $query->param('telephoneNumber') };

    createTemporaryAccount($allParams);

    exit();

}