// Created: 26.07.99
// RCS-ID: $Id$
// Copyright: (c) wxWindows team
-// Licence: wxWindows license
+// Licence: wxWindows licence
/////////////////////////////////////////////////////////////////////////////
// ============================================================================
// headers
// ----------------------------------------------------------------------------
-#ifdef __GNUG__
+#if defined(__GNUG__) && !defined(NO_GCC_PRAGMA)
#pragma implementation "controlbase.h"
#pragma implementation "statbmpbase.h"
#endif
SetForegroundColour(GetParent()->GetForegroundColour());
#endif // 0
+#ifdef __WXPM__
+ //
+ // All OS/2 ctrls use the small font
+ //
+ SetFont(*wxSMALL_FONT);
+#else
SetFont(GetParent()->GetFont());
+#endif
}
void wxControlBase::Command(wxCommandEvent& event)