Changeset 468

Timestamp:

10/03/09 14:08:20 (15 years ago)

Author:

nanardon

Message:

• add _get_attributes, skipping acl checks

File:

• LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Objects.pm (modified) (1 diff)

LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Objects.pm

@@ -210 +210 @@
     my ($self, $cfield) = @_;
     my $res = $self->get_c_field($cfield);
+    return ref $res ? @{ $res } : ($res);
+}
+
+sub _get_attributes {
+    my ($self, $cfield) = @_;
+    my $res = $self->_get_c_field($cfield);
     return ref $res ? @{ $res } : ($res);
 }