diff --git a/merge.data.CANADA-fhv1.R b/merge.data.CANADA-fhv1.R
index 80e0699a99e516cf5a66f45c76adb736acdd1fb8..1ea8d9db69f17bf758972b0667632ad7b7fa24b1 100644
--- a/merge.data.CANADA-fhv1.R
+++ b/merge.data.CANADA-fhv1.R
@@ -110,6 +110,6 @@ data.BA.sp <- merge(data.frame(tree.id=data.canada[["tree.id"]],ecocode=data.can
 if(sum(!data.BA.sp[["tree.id"]] == data.tree[["tree.id"]]) >0) stop("competition index not in the same order than data.tree")
 
 ## save everything as a list
-list.spain <- list(data.tree=data.tree,data.BA.SP=data.BA.sp,data.traits=data.traits)
-save(list.spain,file="./data/process/list.spain.Rdata")
+list.canada <- list(data.tree=data.tree,data.BA.SP=data.BA.sp,data.traits=data.traits)
+save(list.spain,file="./data/process/list.canada.Rdata")