Launch grading in background
This commit is contained in:
parent
fe467fdd93
commit
cfd1cfd2e9
@ -232,7 +232,7 @@ sub tag_grades
|
||||
if ($_[4]) {
|
||||
# Check on year
|
||||
if ($_[4] !~ /^\d+$/) {
|
||||
log ERROR, "project:*:* second argument is the year. Tag format: project:id:year";
|
||||
log ERROR, "grades,*,*,* second argument is the year. Tag format: grades,version,id,year";
|
||||
}
|
||||
|
||||
$year = $_[4];
|
||||
@ -267,7 +267,7 @@ sub tag_grades
|
||||
|
||||
# Send data to intradata
|
||||
log INFO, "Attente d'un processus de publication...";
|
||||
if (my $err = Process::Client::launch("intradata_get", { action => "generate", type => "grades", id => $project_id, "year" => $year, "version" => $version }, { "grading.xml" => $content }))
|
||||
if (my $err = Process::Client::launch("intradata_get", { action => "generate", type => "grades", id => $project_id, "year" => $year, "version" => $version }, { "grading.xml" => $content }, 1))
|
||||
{
|
||||
if (${ $err } ne "Ok") {
|
||||
log ERROR, "Erreur durant le processus de publication : " . ${ $err };
|
||||
|
Reference in New Issue
Block a user