Changeset 388 for LATMOS-Accounts

Timestamp:

08/25/09 19:16:39 (15 years ago)

Author:

nanardon

Message:

• fix address creation (again)

File:

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

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

@@ -279 +279 @@
             my $fmainaddress = $self->get_c_field('mainaddress');
             if (!$fmainaddress) {
-                $fmainaddress = '$self->id' . '-' . map { ('a'..'z')[rand(26)] }
-                (0..4);
+                $fmainaddress = $self->id . '-' . join('', map { ('a'..'z')[rand(26)] }
+                (0..4));
                 $self->base->create_c_object(
                     'address', $fmainaddress,