Added missing croak arg to use Carp line.
Stored recurId into the object and db after it is created in setRecurrence.
This commit is contained in:
parent
b9e6914f34
commit
e58f062114
2 changed files with 6 additions and 2 deletions
|
|
@ -9,6 +9,8 @@
|
||||||
- fix: Collaboration System not deleting getCSMail workflows (perlDreamer Consulting, LLC)
|
- fix: Collaboration System not deleting getCSMail workflows (perlDreamer Consulting, LLC)
|
||||||
- fix: Calendar event edit should inherit (perlDreamer Consulting, LLC)
|
- fix: Calendar event edit should inherit (perlDreamer Consulting, LLC)
|
||||||
http://www.plainblack.com/bugs/tracker/calendar-event-edit-should-inherit
|
http://www.plainblack.com/bugs/tracker/calendar-event-edit-should-inherit
|
||||||
|
- fix: Calendar: recurrance generates uncommitted version tag (perlDreamer Consulting, LLC)
|
||||||
|
http://www.plainblack.com/bugs/tracker/calendar-recurrance-generates-uncommitted-version-tag
|
||||||
|
|
||||||
|
|
||||||
7.3.13
|
7.3.13
|
||||||
|
|
|
||||||
|
|
@ -15,7 +15,7 @@ $VERSION = "0.0.0";
|
||||||
use strict;
|
use strict;
|
||||||
|
|
||||||
use Tie::IxHash;
|
use Tie::IxHash;
|
||||||
use Carp qw(cluck confess);
|
use Carp qw(croak);
|
||||||
use Storable qw(nfreeze thaw);
|
use Storable qw(nfreeze thaw);
|
||||||
|
|
||||||
use WebGUI::International;
|
use WebGUI::International;
|
||||||
|
|
@ -1540,7 +1540,9 @@ sub setRecurrence {
|
||||||
|
|
||||||
## Set to the database
|
## Set to the database
|
||||||
## Return the new recurId
|
## Return the new recurId
|
||||||
return $self->session->db->setRow("Event_recur","recurId",$data);
|
my $recurId = $self->session->db->setRow("Event_recur","recurId",$data);
|
||||||
|
$self->update({recurId => $recurId});
|
||||||
|
return $recurId;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue