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

fixed a package deployement sequencing problem

Browse source
This commit is contained in:
JT Smith 2003-07-02 00:25:03 +00:00
parent 15ac233cca
commit 38be974f88
2 changed files with 6 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lib/WebGUI/Wobject.pm
View file

@ -263,6 +263,11 @@ sub duplicate {
tie %properties, 'Tie::CPHash';
%properties = %{$_[0]->get};
$properties{pageId} = $_[1] || 2;
$properties{sequenceNumber} = _getNextSequenceNumber($properties{pageId});
my $page = WebGUI::SQL->quickHashRef("select groupIdView,ownerId,groupIdEdit from page where pageId=".$properties{pageId});
$properties{ownerId} = $page->{ownerId};
$properties{groupIdView} = $page->{groupIdView};
$properties{groupIdEdit} = $page->{groupIdEdit};
if ($properties{pageId} == 2) {
$properties{bufferUserId} = $session{user}{userId};
$properties{bufferDate} = time();