projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
rt 3.8.11
[freeside.git]
/
rt
/
lib
/
RT
/
Ticket_Overlay.pm
diff --git
a/rt/lib/RT/Ticket_Overlay.pm
b/rt/lib/RT/Ticket_Overlay.pm
index
2feed28
..
e8cb128
100644
(file)
--- a/
rt/lib/RT/Ticket_Overlay.pm
+++ b/
rt/lib/RT/Ticket_Overlay.pm
@@
-472,13
+472,13
@@
sub Create {
);
# Parameters passed in during an import that we probably don't want to touch, otherwise
);
# Parameters passed in during an import that we probably don't want to touch, otherwise
- foreach my $attr
qw(id Creator Created LastUpdated LastUpdatedBy
) {
+ foreach my $attr
(qw(id Creator Created LastUpdated LastUpdatedBy)
) {
$params{$attr} = $args{$attr} if $args{$attr};
}
# Delete null integer parameters
foreach my $attr
$params{$attr} = $args{$attr} if $args{$attr};
}
# Delete null integer parameters
foreach my $attr
-
qw(TimeWorked TimeLeft TimeEstimated InitialPriority FinalPriority
)
+
(qw(TimeWorked TimeLeft TimeEstimated InitialPriority FinalPriority)
)
{
delete $params{$attr}
unless ( exists $params{$attr} && $params{$attr} );
{
delete $params{$attr}
unless ( exists $params{$attr} && $params{$attr} );
@@
-815,7
+815,7
@@
sub _Parse822HeadersForAttributes {
}
}
- foreach my $date
qw(due starts started resolved
) {
+ foreach my $date
(qw(due starts started resolved)
) {
my $dateobj = RT::Date->new($RT::SystemUser);
if ( defined ($args{$date}) and $args{$date} =~ /^\d+$/ ) {
$dateobj->Set( Format => 'unix', Value => $args{$date} );
my $dateobj = RT::Date->new($RT::SystemUser);
if ( defined ($args{$date}) and $args{$date} =~ /^\d+$/ ) {
$dateobj->Set( Format => 'unix', Value => $args{$date} );
@@
-2701,7
+2701,7
@@
sub MergeInto {
}
# Update time fields
}
# Update time fields
- foreach my $type
qw(TimeEstimated TimeWorked TimeLeft
) {
+ foreach my $type
(qw(TimeEstimated TimeWorked TimeLeft)
) {
my $mutator = "Set$type";
$MergeInto->$mutator(
my $mutator = "Set$type";
$MergeInto->$mutator(
@@
-2709,7
+2709,7
@@
sub MergeInto {
}
#add all of this ticket's watchers to that ticket.
}
#add all of this ticket's watchers to that ticket.
- foreach my $watcher_type
qw(Requestors Cc AdminCc
) {
+ foreach my $watcher_type
(qw(Requestors Cc AdminCc)
) {
my $people = $self->$watcher_type->MembersObj;
my $addwatcher_type = $watcher_type;
my $people = $self->$watcher_type->MembersObj;
my $addwatcher_type = $watcher_type;
@@
-3327,7
+3327,7
@@
sub _ApplyTransactionBatch {
my $batch = $self->TransactionBatch;
my %seen;
my $batch = $self->TransactionBatch;
my %seen;
- my $types = join ',', grep !$seen{$_}++, grep defined, map $_->
Type
, grep defined, @{$batch};
+ my $types = join ',', grep !$seen{$_}++, grep defined, map $_->
__Value('Type')
, grep defined, @{$batch};
require RT::Scrips;
RT::Scrips->new($RT::SystemUser)->Apply(
require RT::Scrips;
RT::Scrips->new($RT::SystemUser)->Apply(