+extern void wxDoChangeFont(WXWidget widget, wxFont& font)
+{
+ // lesstif 0.87 hangs here, but 0.93 does not
+#if !defined(LESSTIF_VERSION) \
+ || (defined(LesstifVersion) && LesstifVersion >= 93)
+
+ Widget w = (Widget)widget;
+ XmFontList fontList = (XmFontList)font.GetFontList(1.0, XtDisplay(w));
+ XtVaSetValues( w,
+ XmNfontList, fontList,
+ NULL );
+#endif
+
+}
+