- MenuHandle menu ;
- Str255 p_name ;
- char c_name[256] ;
- short lines ;
-
- menu = NewMenu( 32000 , "\pFont" ) ;
- AppendResMenu( menu , 'FONT' ) ;
- lines = CountMenuItems( menu ) ;
-
- for ( int i = 1 ; i < lines+1 ; i ++ )
- {
- GetMenuItemText( menu , i , p_name ) ;
-#if TARGET_CARBON
- p2cstrcpy( c_name, p_name ) ;
-#else
- p2cstr( p_name ) ;
- strcpy( c_name, (char *)p_name ) ;
+ MenuHandle menu;
+ Str255 p_name;
+ short lines;
+
+ menu = NewMenu( 32000, "\pFont" );
+ AppendResMenu( menu, 'FONT' );
+ lines = CountMenuItems( menu );
+
+ for ( int i = 1; i < lines + 1; i ++ )
+ {
+ GetMenuItemText( menu, i, p_name );
+ wxString c_name = wxMacMakeStringFromPascal( p_name );
+
+#if 0
+ if ( m_fixedOnly )
+ {
+ // check that it's a fixed pitch font:
+ // there is *no* error here: the flag name is misleading!
+ if ( tm->tmPitchAndFamily & TMPF_FIXED_PITCH )
+ // not a fixed pitch font
+ return true;
+ }
+
+ if ( m_charset != -1 )
+ {
+ // check that we have the right encoding
+ if ( lf->lfCharSet != m_charset )
+ return true;
+ }