[Rt-commit] r4357 - in rt/branches/3.7-EXPERIMENTAL: .
ruz at bestpractical.com
ruz at bestpractical.com
Sun Dec 25 04:11:08 EST 2005
Author: ruz
Date: Sun Dec 25 03:19:58 2005
New Revision: 4357
Modified:
rt/branches/3.7-EXPERIMENTAL/ (props changed)
rt/branches/3.7-EXPERIMENTAL/lib/RT/ObjectCustomField_Overlay.pm
Log:
r1579 at cubic-pc: cubic | 2005-12-25 11:23:39 +0300
r1569 at cubic-pc: cubic | 2005-12-25 11:06:09 +0300
* indent
Modified: rt/branches/3.7-EXPERIMENTAL/lib/RT/ObjectCustomField_Overlay.pm
==============================================================================
--- rt/branches/3.7-EXPERIMENTAL/lib/RT/ObjectCustomField_Overlay.pm (original)
+++ rt/branches/3.7-EXPERIMENTAL/lib/RT/ObjectCustomField_Overlay.pm Sun Dec 25 03:19:58 2005
@@ -53,23 +53,23 @@
my %args = (
CustomField => '0',
ObjectId => '0',
- SortOrder => undef,
- @_);
+ SortOrder => undef,
+ @_);
if (!defined $args{SortOrder}) {
- my $CF = $self->CustomFieldObj($args{'CustomField'});
- my $ObjectCFs = RT::ObjectCustomFields->new($self->CurrentUser);
- $ObjectCFs->LimitToObjectId($args{'ObjectId'});
- $ObjectCFs->LimitToLookupType($CF->LookupType);
+ my $CF = $self->CustomFieldObj($args{'CustomField'});
+ my $ObjectCFs = RT::ObjectCustomFields->new($self->CurrentUser);
+ $ObjectCFs->LimitToObjectId($args{'ObjectId'});
+ $ObjectCFs->LimitToLookupType($CF->LookupType);
- $args{SortOrder} = $ObjectCFs->Count + 1;
+ $args{SortOrder} = $ObjectCFs->Count + 1;
}
$self->SUPER::Create(
CustomField => $args{'CustomField'},
ObjectId => $args{'ObjectId'},
SortOrder => $args{'SortOrder'},
- );
+ );
}
sub Delete {
@@ -82,9 +82,9 @@
# Move everything below us up
my $sort_order = $self->SortOrder;
while (my $OCF = $ObjectCFs->Next) {
- my $this_order = $OCF->SortOrder;
- next if $this_order <= $sort_order;
- $OCF->SetSortOrder($this_order - 1);
+ my $this_order = $OCF->SortOrder;
+ next if $this_order <= $sort_order;
+ $OCF->SetSortOrder($this_order - 1);
}
$self->SUPER::Delete;
More information about the Rt-commit
mailing list