Maintenance scripts
[buildfarm-server.git] / cgi-bin / register-form.pl
index 3281a1f0f117fc3f6236395c822dda4c64782129..91d0826a02d0b506a53b5bb1f9358bcf64f1299c 100755 (executable)
@@ -1,10 +1,18 @@
 #!/usr/bin/perl
 
+=comment
+
+Copyright (c) 2003-2010, Andrew Dunstan
+
+See accompanying License file for license details
+
+=cut 
+
 use strict;
 use Template;
 use Captcha::reCAPTCHA;
 
-use vars qw( $captcha_pubkey );
+use vars qw( $template_dir $captcha_pubkey );
 require "$ENV{BFConfDir}/BuildFarmWeb.pl";
 
 
@@ -12,8 +20,8 @@ my $c = Captcha::reCAPTCHA->new;
 
 my $captcha = $c->get_html($captcha_pubkey);
 
-
-my $template = new Template({INCLUDE_PATH => '/home/community/pgbuildfarm/templates' });
+my $template_opts = { INCLUDE_PATH => $template_dir };
+my $template = new Template($template_opts);
 
 print "Content-Type: text/html\n\n";