Changeset 1261

Timestamp:

11/05/14 12:35:23 (10 years ago)

Author:

nanardon

Message:

handle properly rename_object in synch mode

File:

• trunk/LATMOS-Accounts/lib/LATMOS/Accounts/SynchAccess/base.pm (modified) (1 diff)

trunk/LATMOS-Accounts/lib/LATMOS/Accounts/SynchAccess/base.pm

@@ -97 +97 @@
 }
 
+=head2 rename_object
+
+=cut
+
+sub rename_object {
+    my ($self, $otype, $uid) = @_;
+    foreach ($self->bases) {
+        if ($_->is_supported_object($otype)) {
+            $_->rename_object($otype, $uid) or do {
+                la_log(LA_ERR,
+                    "Cannot get object $otype/$uid in %s/%s",
+                    $_->type,
+                    $_->label
+                );
+                return;
+            };
+        }
+    }
+}
+
 sub DESTROY {}