1 files changed, 6 insertions, 20 deletions

diff --git a/quips.cgi b/quips.cgi
index f1a41b4b9..1b5213e97 100755
--- a/quips.cgi
+++ b/quips.cgi
@@ -23,31 +23,17 @@
 
 use diagnostics;
 use strict;
-use vars ( %::FORM );
+
+use vars qw(
+  %FORM
+  $template
+  $vars
+);
 
 use lib qw(.);
 
 require "CGI.pl";
 
-# Use the template toolkit (http://www.template-toolkit.org/)
-use Template;
-
-# Create the global template object that processes templates
-my $template = Template->new(
-{
-    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,
-};
-
 my $action = $::FORM{'action'} || "";
 
 if ($action eq "show") {