diff --git a/hooks/subjects.pl b/hooks/subjects.pl
index 141a28a..972f72a 100755
--- a/hooks/subjects.pl
+++ b/hooks/subjects.pl
@@ -4,6 +4,7 @@ use strict;
 use warnings;
 use v5.10;
 
+use ACU::API::Projects;
 use ACU::LDAP;
 use ACU::Log;
 $ACU::Log::log_file = undef;
@@ -137,7 +138,8 @@ sub tag_project
 
 	# Send data to intradata
 	log INFO, "Attente d'un processus de publication...";
-	Process::Client::launch("intradata_get", { action => "update", type => "project", id => $project_id, "year" => $year }, { "butler.xml" => $content });
+	log ERROR, "Erreur durant le processus de publication : $_"
+	if (!Process::Client::launch("intradata_get", { action => "update", type => "project", id => $project_id, "year" => $year }, { "butler.xml" => $content }));
 
 	# Call API
 	my $err = API::Projects::add($project_id, $year);