From 999cbf70f34df9b571b1c84274fce630f9a30fdd Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Mon, 15 Nov 2010 18:56:05 -0800
Subject: [PATCH] Update Upgrade packages so they'll work varless.

---
 lib/WebGUI/Upgrade/File/wgpkg.pm | 2 +-
 lib/WebGUI/Upgrade/Script.pm     | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/WebGUI/Upgrade/File/wgpkg.pm b/lib/WebGUI/Upgrade/File/wgpkg.pm
index 57a73754e..60fe70c66 100644
--- a/lib/WebGUI/Upgrade/File/wgpkg.pm
+++ b/lib/WebGUI/Upgrade/File/wgpkg.pm
@@ -46,7 +46,7 @@ sub run {
     }
 
     $versionTag->commit;
-    $session->var->end;
+    $session->end;
     $session->close;
 
     return $package;
diff --git a/lib/WebGUI/Upgrade/Script.pm b/lib/WebGUI/Upgrade/Script.pm
index 19810e71c..d46bf14de 100644
--- a/lib/WebGUI/Upgrade/Script.pm
+++ b/lib/WebGUI/Upgrade/Script.pm
@@ -113,7 +113,7 @@ sub _build_exports {
             if (WebGUI::VersionTag->getWorking($session, 'nocreate')) {
                 $version_tag_sub->()->commit;
             }
-            $session->var->end;
+            $session->end;
             $session->close;
         }
         undef $session;