--- rpl/modules/motif/callbacks.rplc	2017/07/10 07:25:24	1.1
+++ rpl/modules/motif/callbacks.rplc	2017/07/11 16:04:53	1.2
@@ -4,16 +4,11 @@
 void
 rplCallback(Widget x_objet, XtPointer argument, XtPointer call)
 {
-	declareObject(list);
-
-	list = argument;
-	// argument = { rpl_arguments callback }
+	sXtCallback		*sCallback;
 
+	sCallback = argument;
 	pthread_mutex_lock(&callbackMutex);
-
-	evaluation((*((struct_liste_chainee *) (*list).objet)).donnee,
-			(*(*((struct_liste_chainee *) (*list).objet)).suivant).donnee, 'E');
-
+	evaluation(sCallback->status, sCallback->callback, 'E');
 	pthread_mutex_unlock(&callbackMutex);
 	return;
 }