Changeset 2359

Timestamp:

05/26/20 18:00:56 (4 years ago)

Author:

nanardon

Message:

Ask for template first at object creation

File:

• trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/OCHelper.pm (modified) (2 diffs)

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

@@ -69 +69 @@
 sub step {
     my ($self, $info) = @_;
+    my $otype = $self->otype;
     $info ||= {};
     $info->{step} ||= 0;
     $info->{ask} = [];
+
+    push(@{ $info->{ask} }, 'template') unless ( $otype eq 'templates' );
+
     $info->{name}{ask} = 0;
-    my $otype = $self->otype;
     foreach (keys %{ $self->base->{defattr} || {} }) {
         /^$otype\.(.*)/ or next;
@@ -95 +98 @@
         foreach ($self->base->list_canonical_fields($self->otype, 'w')) {
             /^oalias$/ and next;
+            /^template$/ and next;
             push(@{$info->{ask}}, $_);
         }