epita-std/ACU
Archived
1
0
Fork 0
Code Releases Activity

Launch grading in background

Browse Source
This commit is contained in:
Mercier Pierre-Olivier 2013-09-22 06:11:02 +02:00
parent fe467fdd93
commit cfd1cfd2e9
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
hooks/subjects.pl
View File

@ -232,7 +232,7 @@ sub tag_grades
if ($_[4]) { if ($_[4]) {
# Check on year # Check on year
if ($_[4] !~ /^\d+$/) { 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]; $year = $_[4];
@ -267,7 +267,7 @@ sub tag_grades
# Send data to intradata # Send data to intradata
log INFO, "Attente d'un processus de publication..."; 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") { if (${ $err } ne "Ok") {
log ERROR, "Erreur durant le processus de publication : " . ${ $err }; log ERROR, "Erreur durant le processus de publication : " . ${ $err };