Changeset 356 for LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql

Timestamp:

08/17/09 02:59:06 (15 years ago)

Author:

nanardon

Message:

• SQL: set attributes now make difference between no action and error

File:

• LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/objects.pm (modified) (3 diffs)

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

@@ -305 +305 @@
 sub set_fields {
     my ($self, %data) = @_;
+    my $updated_attributes = 0;
     my @fields;
     my @vals;
@@ -336 +337 @@
             return;
         };
+        $updated_attributes = scalar(@fields);
     }
     
@@ -388 +390 @@
                 };
             }
-        }
-    }
-
-    1;
+            $updated_attributes++;
+        }
+    }
+
+    $updated_attributes;
 }