Pass the flavour to the Intranet when creating project

ACU/API/Projects.pm

@@ -10,9 +10,10 @@ use Carp;
 use ACU::API::Base;
 use ACU::LDAP;
 
-sub add($;$)
+sub add($$;$)
 {
     my $project_name = shift;
+    my $falvour = shift;
     my $year = shift;
 
     if ($year and $year != LDAP::get_year) {
@@ -21,7 +22,10 @@ sub add($;$)
 
     my $res = API::Base::send('ResultHandler',
 			      "projects/projects/add.xml",
-			      [ project_name => $project_name ]);
+			      [
+			       project_name => $project_name,
+			       flavour => $flavour,
+			      ]);
 
     if ($res->{result} ne '0') {
 	croak "Erreur durant l'ajout : ".$res->{message};