From 13434c4dcf20f72d16c6388e30429c761d2c7e37 Mon Sep 17 00:00:00 2001
From: Mercier Pierre-Olivier <nemunaire@acu.epita.fr>
Date: Fri, 20 Sep 2013 18:05:19 +0200
Subject: [PATCH] Add some debug string

---
 process/files/intradata_get.pl | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/process/files/intradata_get.pl b/process/files/intradata_get.pl
index a3f48db..9fb0b2c 100644
--- a/process/files/intradata_get.pl
+++ b/process/files/intradata_get.pl
@@ -73,6 +73,8 @@ sub grades_new_bonus
 
 	my @lines = ($args->{files}{$kfile} =~ tr/\n//);
 
+	log TRACE, $args->{files}{$kfile};
+
 	my $value = 1;
 	# Looking for a global value 
 	if ($lines[0] =~ /^(\d+)$/) {