Changeset 2111

Timestamp:

10/05/17 10:29:26 (7 years ago)

Author:

nanardon

Message:

Never build filter based data with unexported object

File:

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

trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql.pm

@@ -325 +325 @@
     my ($self) = @_;
 
-    foreach (1 .. 5) {
-        $self->log(LA_DEBUG, "%d loop for PopulateDynData", $_);
-        my $res = 0;
-        $res += $self->_sync_dyn_group   || 0;
-        $res += $self->_sync_dyn_aliases || 0;
-
-        if ($res == 0) {
-            last;
+    $self->temp_switch_unexported(sub {
+
+        foreach (1 .. 5) {
+            $self->log(LA_DEBUG, "%d loop for PopulateDynData", $_);
+            my $res = 0;
+            $res += $self->_sync_dyn_group   || 0;
+            $res += $self->_sync_dyn_aliases || 0;
+
+            if ($res == 0) {
+                last;
+            }
         }
-    }
+
+    }, 0);
 
     return 1;