oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fixes to tests suggested by Colin. Committing upgrade script

Browse source
This commit is contained in:
khenn 2009-10-30 17:19:58 -05:00
parent 2e5250bdc9
commit ef51fdd426
2 changed files with 13 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

12
docs/upgrades/upgrade_7.8.2-7.8.3.pl
View file

@ -40,9 +40,21 @@ addTrashAdminSetting($session);
addPickLanguageMacro($session); addPickLanguageMacro($session);
installSetLanguage($session); installSetLanguage($session);
i18nAbleToBeFriend($session); i18nAbleToBeFriend($session);
addEMSEnhancements($session);
finish($session); # this line required finish($session); # this line required
#----------------------------------------------------------------------------
sub addEMSEnhancements {
my $session = shift;
print "\tAdding EMS Enhancements, if needed... \n" unless $quiet;
my $sth = $session->db->read('describe EventManagementSystem printRemainingTicketsTemplateId');
if (! defined $sth->hashRef) {
$session->db->write("alter table EventManagementSystem add column printRemainingTicketsTemplateId char(22) not null default 'hreA_bgxiTX-EzWCSZCZJw' after printTicketTemplateId");
}
print "Done.\n" unless $quiet;
}
#---------------------------------------------------------------------------- #----------------------------------------------------------------------------
sub i18nAbleToBeFriend { sub i18nAbleToBeFriend {
my $session = shift; my $session = shift;

2
t/Asset/Wobject/EventManagementSystem.t
View file

@ -178,7 +178,7 @@ ok( $ems->can('www_printRemainingTickets'), 'Can call print remaining tickets' )
#Test that the default template is correct #Test that the default template is correct
my $printRemainingTicketsTemplateId = $ems->get('printRemainingTicketsTemplateId'); my $printRemainingTicketsTemplateId = $ems->get('printRemainingTicketsTemplateId');
ok($printRemainingTicketsTemplateId eq "hreA_bgxiTX-EzWCSZCZJw", 'Default print remaining tickets template id ok'); is($printRemainingTicketsTemplateId, "hreA_bgxiTX-EzWCSZCZJw", 'Default print remaining tickets template id ok');
#Make sure printRemainingTickets template returns the right data #Make sure printRemainingTickets template returns the right data
my $templateMock = Test::MockObject->new({}); my $templateMock = Test::MockObject->new({});