more upgrade testing

This commit is contained in:
Graham Knop 2010-03-19 12:26:17 -05:00
parent d41dc5adb6
commit 15ed4f97e4
7 changed files with 37 additions and 4 deletions

View file

@ -69,7 +69,7 @@ sub session () {
require WebGUI::Session;
$session = WebGUI::Session->open(config);
$session->user({user => 3});
$session->user({userId => 3});
return $session;
}

View file

@ -14,7 +14,7 @@ sub run {
my ($configFile, $version, $file, $quiet) = @_;
my $session = WebGUI::Session->open($configFile);
$session->user({user => 3});
$session->user({userId => 3});
# Make a storage location for the package
my $storage = WebGUI::Storage->createTemp( $session );