Changeset 74 for LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Unix.pm

Timestamp:

05/08/09 17:07:20 (15 years ago)

Author:

nanardon

Message:

• support object deletion
• fix synchro of delayed fields

File:

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

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

@@ -307 +307 @@
 }
 
+sub delete_object {
+    my ($self, $otype, $id, %data) = @_;
+
+    # objects are store into sub ref:
+    my $internal_obj = {
+        user => 'users',
+        group => 'groups',
+    }->{$otype};
+    delete $self->{$internal_obj}{$id};
+    1
+}
+
 1;