--- rpl/modules/motif/example.rpl	2017/08/22 11:37:31	1.10
+++ rpl/modules/motif/example.rpl	2017/08/23 12:21:59	1.12
@@ -19,7 +19,7 @@ APPLICATION
 <<
 	"none" implicit
 
-	"Test application" XtAppInitialize
+	"RPL/2" XtAppInitialize
 	-> XT_APP TOPLEVEL_WIDGET
 	<<
 		0 0 0 0 0 0 0
@@ -122,7 +122,8 @@ APPLICATION
 			"XmNactivateCallback" 'POPUP_QUIT' XtAddCallback drop
 
 			TOPLEVEL_WIDGET XtRealizeWidget
-			TOPLEVEL_WIDGET "RPL/2" XStoreName
+			TOPLEVEL_WIDGET "rplIcon.xpm" XmSetIcon
+//			TOPLEVEL_WIDGET "RPL/2" XStoreName
 
 			"Début de la boucle Xt" disp
 			XT_APP XtAppMainLoop