diff --git a/process/files/intradata_get.pl b/process/files/intradata_get.pl
index b095300..e077d58 100644
--- a/process/files/intradata_get.pl
+++ b/process/files/intradata_get.pl
@@ -329,7 +329,7 @@ sub update_trace
 	chmod 0755, "$basedir/$year/$project_id/traces/$rendu_id/";
     }
 
-    open my $out, ">", "$basedir/$year/$project_id/traces/$rendu_id/$login.xml" or croak("");
+    open my $out, ">", "$basedir/$year/$project_id/traces/$rendu_id/$login.xml" or croak("Unable to write to $rendu_id/$login.xml");
     print $out $trace;
     close $out;