Bug 100094 - use generic template handling code

r=mattyt, afranke

1 files changed, 5 insertions, 21 deletions

diff --git a/createaccount.cgi b/createaccount.cgi
index 86a994483..ecf3a68f6 100755
--- a/createaccount.cgi
+++ b/createaccount.cgi
@@ -32,27 +32,11 @@ use lib qw(.);
 require "CGI.pl";
 
 # Shut up misguided -w warnings about "used only once":
-use vars %::FORM;
-
-# Use the template toolkit (http://www.template-toolkit.org/)
-use Template;
-
-# Create the global template object that processes templates
-my $template = Template->new(
-{
-    # Colon-separated list of directories containing templates.
-    INCLUDE_PATH => "template/custom:template/default",
-    RELATIVE => 1,
-    PRE_CHOMP => 1,
-});
-
-# Define the global variables and functions that will be passed to the UI 
-# template. 
-my $vars = 
-{
-    'Param' => \&Param, 
-    'PerformSubsts' => \&PerformSubsts,
-};
+use vars qw(
+  %FORM
+  $template
+  $vars
+);
 
 ConnectToDatabase();