Revision Event storage locations.
This commit is contained in:
parent
d2b9be686c
commit
af2d858f68
3 changed files with 25 additions and 1 deletions
|
|
@ -65,6 +65,10 @@ sub addRevision {
|
|||
$sequenceNumber = 0;
|
||||
}
|
||||
$newRev->update({iCalSequenceNumber => $sequenceNumber});
|
||||
if ($newRev->get("storageId") && $newRev->get("storageId") eq $self->get('storageId')) {
|
||||
my $newStorage = WebGUI::Storage->get($self->session,$self->get("storageId"))->copy;
|
||||
$newRev->update({storageId => $newStorage->getId});
|
||||
}
|
||||
return $newRev;
|
||||
}
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue