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

fixing bugs

Browse source 
preparing for 6.2.7 bugfix cycle
This commit is contained in:
JT Smith 2004-10-03 19:47:25 +00:00
parent 1835437de4
commit b985eec1b1
9 changed files with 42 additions and 29 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lib/WebGUI/Operation/Package.pm
View file

@ -44,9 +44,9 @@ sub _recursePageTree {
my ($a, %package, %newParent,$currentPage,$page);
tie %newParent, 'Tie::CPHash';
tie %package, 'Tie::CPHash';
%newParent = WebGUI::SQL->quickHash("select * from page where pageId=$_[1]");
%newParent = WebGUI::SQL->quickHash("select * from page where pageId=".quote($_[1]));
_duplicateWobjects($_[0],$_[1]);
$a = WebGUI::SQL->read("select * from page where parentId=$_[0] order by sequenceNumber");
$a = WebGUI::SQL->read("select * from page where parentId=".quote($_[0])." order by sequenceNumber");
while (%package = $a->hash) {
$currentPage = WebGUI::Page->getPage($_[1]);
$page = $currentPage->add;