Changeset 1801 for trunk/LATMOS-Accounts

Timestamp:

06/28/16 16:17:08 (8 years ago)

Author:

nanardon

Message:

Don't use ACL for task module

File:

• trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Task/Unexportexpired.pm (modified) (2 diffs)

trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Task/Unexportexpired.pm

@@ -32 +32 @@
 sub init {
     my ($self) = @_;
-    my $LA = LATMOS::Accounts->new($self->{config});
+    my $LA = LATMOS::Accounts->new($self->{config}, noacl => 1);
     my $labase = $self->{base} ? $LA->base($self->{base}) : $LA->base;
     $labase && $labase->load or die "Cannot load base";
@@ -53 +53 @@
             $self->{_base}->search_objects($otype, 'exported=t', "expire<$nowtext")) {
             my $obj = $self->{_base}->get_object($otype, $name);
-            la_log(LA_NOTICE, "Unexport %s/%s object due to expire (%s)", $otype, $name, $obj->get_attributes('expire') ||'');
+            la_log(LA_NOTICE, "Unexport %s/%s object due to expire (%s)", $otype, $name, $obj->_get_attributes('expire') ||'');
             $obj->_set_c_fields(unexported => 1);
             $self->{_base}->commit;