From 6288d5b822185ed88a328f9783fd545410e2d3a3 Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Mon, 16 Jan 2006 00:55:49 +0000
Subject: [PATCH] update to work with session API

---
 t/mandatory_template_vars.t | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/t/mandatory_template_vars.t b/t/mandatory_template_vars.t
index ce76440f4..b19c0ba22 100644
--- a/t/mandatory_template_vars.t
+++ b/t/mandatory_template_vars.t
@@ -13,6 +13,7 @@ use strict;
 use lib '../lib';
 use Getopt::Long;
 use WebGUI::Asset;
+use WebGUI::Session;
 use File::Find;
 # ---- END DO NOT EDIT ----
 
@@ -198,7 +199,7 @@ diag("planning on $numTests tests");
 
 foreach my $tmpl ( @tmplVarTable ) {
 	my $tmplId = $tmpl->{id};
-	my $tmplAsset = WebGUI::Asset->newByDynamicClass($tmplId);
+	my $tmplAsset = WebGUI::Asset->newByDynamicClass($session, $tmplId);
 	my $tmplExists = is(ref($tmplAsset), 'WebGUI::Asset::Template', "$tmplId exists");
 	SKIP: {
 		skip("$tmplId could not be found",  $tmpl->{numTests} ) unless $tmplExists;
@@ -216,7 +217,7 @@ cleanup($session); # this line is required
 
 # ---- DO NOT EDIT BELOW THIS LINE -----
 
-nitialize {
+sub initialize {
         $|=1; # disable output buffering
         my $configFile;
         GetOptions(