Changeset 407 for LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Controller/Ajax.pm

Timestamp:

08/31/09 17:11:21 (15 years ago)

Author:

nanardon

Message:

• attributes needing to have uniq value are now check online, showing img on field change

File:

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

LATMOS-Accounts-Web/lib/LATMOS/Accounts/Web/Controller/Ajax.pm

@@ -56 +56 @@
 }
 
+sub objattrexist : Local {
+    my ($self, $c, $otype, $attr) = @_;
+    my $base = $c->model('Accounts')->db;
+    my $val = $c->req->param('val');
+    my @obj = $base->search_objects($otype, "$attr=$val");
+
+    if (my $filter = $c->req->param('exclude')) {
+        @obj = grep { $_ ne $filter } @obj;
+    }
+    $c->stash->{'exists'} = join(', ', @obj);
+}
+
 sub end : Private {
     my ( $self, $c ) = @_;