some bug fixing
This commit is contained in:
parent
086df4ef71
commit
b0ec9edf53
4 changed files with 25 additions and 6 deletions
|
|
@ -456,6 +456,15 @@ sub upgradeEMS {
|
|||
}
|
||||
}
|
||||
}
|
||||
$db->write("drop table EventManagementSystem_badges");
|
||||
$db->write("drop table EventManagementSystem_discountPasses");
|
||||
$db->write("drop table EventManagementSystem_metaData");
|
||||
$db->write("drop table EventManagementSystem_prerequisiteEvents");
|
||||
$db->write("drop table EventManagementSystem_prerequisites");
|
||||
$db->write("drop table EventManagementSystem_products");
|
||||
$db->write("drop table EventManagementSystem_purchases");
|
||||
$db->write("drop table EventManagementSystem_registrations");
|
||||
$db->write("drop table EventManagementSystem_sessionPurchaseRef");
|
||||
}
|
||||
|
||||
#-------------------------------------------------
|
||||
|
|
@ -565,6 +574,8 @@ sub convertTransactionLog {
|
|||
}, $oldItem->{itemId});
|
||||
}
|
||||
}
|
||||
$db->write("drop table oldtransaction");
|
||||
$db->write("drop table oldtransactionitem");
|
||||
}
|
||||
|
||||
#-------------------------------------------------
|
||||
|
|
|
|||
|
|
@ -82,19 +82,26 @@ sub view {
|
|||
my $session = $self->session;
|
||||
|
||||
# get other shelves
|
||||
my @children = ();
|
||||
my @childShelves = ();
|
||||
foreach my $child (@{$self->getLineage(['children'],{returnObjects=>1,includeOnlyClasses=>['WebGUI::Asset::Wobject::Shelf']})}) {
|
||||
my $properties = $child->get;
|
||||
$child->{url} = $self->getUrl;
|
||||
push @children, $child;
|
||||
push @childShelves, $child;
|
||||
}
|
||||
|
||||
# get other child skus
|
||||
my @childSkus = ();
|
||||
foreach my $child (@{$self->getLineage(['children'],{includeOnlyClasses=>['WebGUI::Asset::Wobject::Shelf']})}) {
|
||||
my $properties = $child->get;
|
||||
$child->{url} = $self->getUrl;
|
||||
push @childSkus, $child;
|
||||
}
|
||||
|
||||
# find products based upon keywords
|
||||
my @keywords = $self->get('keywords');
|
||||
my $p = WebGUI::Keyword->new($session)->getMatchingAssets({
|
||||
my $keywordBasedAsssetIds = WebGUI::Keyword->new($session)->getMatchingAssets({
|
||||
matchAssetKeywords => $self,
|
||||
isa => 'WebGUI::Asset::Sku',
|
||||
usePaginator => 1,
|
||||
});
|
||||
$p->setBaseUrl($self->getUrl('func=view'));
|
||||
|
||||
|
|
@ -115,7 +122,7 @@ sub view {
|
|||
}
|
||||
}
|
||||
my %var = (
|
||||
shelves => \@children,
|
||||
shelves => \@childShelves,
|
||||
products => \@skus,
|
||||
);
|
||||
$p->appendTemplateVars(\%var);
|
||||
|
|
|
|||
|
|
@ -234,6 +234,7 @@ sub getMatchingAssets {
|
|||
push @placeholders, '?';
|
||||
push @params, $word;
|
||||
}
|
||||
next unless scalar @placeholders;
|
||||
push @clauses, 'keyword in ('.join(',', @placeholders).')';
|
||||
}
|
||||
|
||||
|
|
|
|||
|
|
@ -709,7 +709,7 @@ sub setDataByQuery {
|
|||
($self->{_totalRows}) = $dbh->quickArray("select found_rows()");
|
||||
$self->{_columnNames} = [ $sth->getColumnNames ];
|
||||
|
||||
my @row;
|
||||
my @row = ();
|
||||
while (my $data = $sth->hashRef) {
|
||||
push(@row,$data);
|
||||
}
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue