From 1ad8d17e7385a7cc4f3a053f06edadbeab80b69e Mon Sep 17 00:00:00 2001
From: Mercier Pierre-Olivier <nemunaire@acu.epita.fr>
Date: Thu, 12 Sep 2013 13:40:30 +0200
Subject: [PATCH] Save butler.xml in right place

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

diff --git a/process/files/intradata_get.pl b/process/files/intradata_get.pl
index d00af83..4263340 100644
--- a/process/files/intradata_get.pl
+++ b/process/files/intradata_get.pl
@@ -64,7 +64,7 @@ sub update_project
 
     return $_ if (! create_tree($year, $project_id));
 
-    open my $out, ">", "$year/$project_id/butler.xml";
+    open my $out, ">", "$basedir/$year/$project_id/butler.xml";
     print $out $butler;
     close $out;