--- rpl/modules/motif/motif.rplc	2017/07/17 21:35:32	1.6
+++ rpl/modules/motif/motif.rplc	2017/08/23 12:21:59	1.11
@@ -6,13 +6,17 @@ libraryName(motif);
 
 exportExternalFunctions(
 		XSynchronize,
+		XStoreName,
+		XmSetIcon,
 		XtAddCallback,
 		XtAppExitMainLoop,
 		XtAppInitialize,
 		XtAppMainLoop,
 		XtCreatePopupShell,
+		XtCreateManagedWidget,
 		XtCreateWidget,
 		XtDestroyWidget,
+		XtOpenApplication,
 		XtPopdown,
 		XtPopup,
 		XtRealizeWidget,
@@ -70,7 +74,7 @@ declareSubroutine(onLoading)
 endSubroutine
 
 declareSubroutine(onClosing)
-	// Destruction des variables spécifiques
+	// Destruction des variables spécifiques et des callbacks
 	declareObject(variable);
 	declareDaisyChain(current);
 	declareDaisyChain(next);
@@ -78,8 +82,7 @@ declareSubroutine(onClosing)
 	current = lCallbacks;
 
 	repeatWhile(not nullified(current))
-		next = current;
-		nextElementOfDaisyChain(next);
+		next = nextElementOfDaisyChain(current);
 		variable = fetchElementFromDaisyChain(current);
 		freeObject(variable);
 		free(current);