--- rpl/modules/motif/XtPopup.rplc	2017/07/17 21:35:32	1.2
+++ rpl/modules/motif/XtPopup.rplc	2017/07/30 21:59:40	1.3
@@ -39,7 +39,7 @@ declareExternalFunction(XtPopup)
 				returnOnError(freeObject(grab); freeObject(widget));
 			endIf
 
-			XtPopup(target((Widget *) objectContainer(widget)), xt_gv);
+			XtPopup(target(objectContainer(Widget, widget)), xt_gv);
 
 			freeObject(widget);
 			freeObject(grab);