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

fixed some relativity bugs in them manager

Browse source
This commit is contained in:
JT Smith 2003-05-26 02:31:15 +00:00
parent 45d6746988
commit 4c86a32b70
1 changed files with 6 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

10
lib/WebGUI/Operation/Theme.pm
View file

@ -222,11 +222,12 @@ sub www_editTheme {
my @queries = (
"select style.name as name, themeComponent.themeComponentId as componentId, 'style' as componentType
from themeComponent, style
where style.styleId=themeComponent.id and themeComponent.type='style' order by name",
where style.styleId=themeComponent.id and themeComponent.type='style'
and themeComponent.themeId=$session{form}{themeId} order by name",
"select collateral.name as name, themeComponent.themeComponentId as componentId,
collateral.collateralType as componentType from themeComponent, collateral
where collateral.collateralId=themeComponent.id and themeComponent.type=collateral.collateralType
order by name"
and themeComponent.themeId=$session{form}{themeId} order by name"
);
foreach my $query (@queries) {
my $sth = WebGUI::SQL->read($query);
@ -496,11 +497,12 @@ sub www_viewTheme {
my @queries = (
"select style.name as name, themeComponent.themeComponentId as componentId, 'style' as componentType
from themeComponent, style
where style.styleId=themeComponent.id and themeComponent.type='style' order by name",
where style.styleId=themeComponent.id and themeComponent.type='style'
and themeComponent.themeId=$session{form}{themeId} order by name",
"select collateral.name as name, themeComponent.themeComponentId as componentId,
collateral.collateralType as componentType from themeComponent, collateral
where collateral.collateralId=themeComponent.id and themeComponent.type=collateral.collateralType
order by name"
and themeComponent.themeId=$session{form}{themeId} order by name"
);
foreach my $query (@queries) {
my $sth = WebGUI::SQL->read($query);