Changeset 49 for LATMOS-Accounts/lib/LATMOS/Accounts.pm

Timestamp:

04/25/09 21:18:18 (15 years ago)

Author:

nanardon

Message:

• support database revision, store current revision, allowing to synch only object changed since last sync

File:

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

LATMOS-Accounts/lib/LATMOS/Accounts.pm

@@ -47 +47 @@
     my $type = $self->val($section, 'type') or return;
     my %params = map { $_ => ($self->val($section, $_)) } $self->Parameters($section);
-    my $base = LATMOS::Accounts::Bases->new($type, %params);
+    my $base = LATMOS::Accounts::Bases->new($type, %params, label => $section);
     $base->load or return;
     $base;