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

fixed bug 729711

Browse source
This commit is contained in:
JT Smith 2003-05-17 01:42:47 +00:00
parent 3531838ace
commit 15aa3403bb
6 changed files with 54 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

4
lib/WebGUI/Wobject.pm
View file

@ -258,7 +258,9 @@ If specified the wobject will be duplicated to this pageId, otherwise it will be
=cut
sub duplicate {
my %properties = %{$_[0]->get};
my %properties;
tie %properties, 'Tie::CPHash';
%properties = %{$_[0]->get};
$properties{pageId} = $_[1] || 2;
if ($properties{pageId} == 2) {
$properties{bufferUserId} = $session{user}{userId};