From e1235d08fc52ff4cb914efecda9b15c2b7943f5a Mon Sep 17 00:00:00 2001
From: "bbaetz%student.usyd.edu.au" <>
Date: Wed, 13 Feb 2002 10:27:20 +0000
Subject: Bug 100094 - use generic template handling code r=mattyt, afranke

---
 quips.cgi | 26 ++++++--------------------
 1 file changed, 6 insertions(+), 20 deletions(-)

(limited to 'quips.cgi')

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") {
-- 
cgit v1.2.3-24-g4f1b