From 607dd13e475f0e9175da2e454b7c15ebbb5b3a0d Mon Sep 17 00:00:00 2001
From: Gautier Hattenberger <gautier.hattenberger@enac.fr>
Date: Sun, 16 Feb 2014 14:16:30 +0100
Subject: [PATCH] [fix] node name for modules' datalink event

---
 create_module | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/create_module b/create_module
index 710213a5b0..eb939eb45a 100755
--- a/create_module
+++ b/create_module
@@ -158,7 +158,7 @@ let xml_of_event = fun l ->
   List.map (fun n -> Xml.Element ("event", [("fun", n)], [])) l;;
 
 let xml_of_datalink = fun l ->
-  List.map (fun (m, n) -> Xml.Element ("init", [("message", m); ("fun", n)], [])) l;;
+  List.map (fun (m, n) -> Xml.Element ("datalink", [("message", m); ("fun", n)], [])) l;;
 
 let xml_makefile_of_name = fun n ->
   [Xml.Element ("makefile", [], [