Changeset 1074

Timestamp:

07/25/12 09:52:08 (12 years ago)

Author:

nanardon

Message:

Add 'description' attribute to aliases/revaliases

This attribute allow to add a description to an aliases object.
This attribute is set automatically when such object are created from user
object.

Location:

trunk/LATMOS-Accounts

Files:

• bin/la-sql-upgrade.in (modified) (1 diff)
• lib/LATMOS/Accounts/Bases/Sql/User.pm (modified) (4 diffs)

trunk/LATMOS-Accounts/bin/la-sql-upgrade.in

@@ -190 +190 @@
             q{
             ALTER TABLE request ADD COLUMN objrev bigint;
+            },
+            q{
+            ALTER TABLE aliases ADD COLUMN description text;
+            },
+            q{
+            ALTER TABLE revaliases ADD COLUMN description text;
             },
         ],

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

@@ -526 +526 @@
                     $res += $f->_set_c_fields(forward => $data{$attr});
                 } else {
-                    if ($self->base->_create_c_object('aliases', $self->id,
-                        forward => $data{$attr})) {
+                    if ($self->base->_create_c_object(
+                            'aliases', $self->id,
+                            forward => $data{$attr},
+                            description => 'automatically created for ' . $self->id,
+                        )) {
                         $res++;
                     } else {
@@ -561 +564 @@
                     }
                 } elsif ($aliases{$_} == 1) {
-                    if ($self->base->_create_c_object('aliases', $_,
-                        forward => [ $self->id ])) {
+                    if ($self->base->_create_c_object(
+                            'aliases', $_,
+                            forward => [ $self->id ],
+                            description => 'automatically created for ' . $self->id,
+                        )) {
                         $res++
                     } else {
@@ -579 +585 @@
                     my $ares = $obj->set_c_fields(
                         'as' => $data{$attr},
-                        'exported' => ($self->get_attributes('exported') || 0)
+                        'exported' => ($self->get_attributes('exported') || 0),
                     );
                     if (defined($ares)) {
@@ -591 +597 @@
                         'revaliases',
                         $self->id, as => $data{$attr},
-                        'exported' => ($self->get_attributes('exported') || 0)
+                        'exported' => ($self->get_attributes('exported') || 0),
+                        description => 'automatically created for ' . $self->id,
                     )) {
                         $res++;