X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/d84afea9d1ec41ee4e2ebb3bf6b87926cf5f04d1..5a2db5f1df5f0ac0a034366195c11047a416bf6a:/src/mac/font.cpp

diff --git a/src/mac/font.cpp b/src/mac/font.cpp
index d30015eaf9..d1b4798cc4 100644
--- a/src/mac/font.cpp
+++ b/src/mac/font.cpp
@@ -89,6 +89,10 @@ void wxFontRefData::MacFindFont()
 				::GetFNum( "\pMonaco" , &m_macFontNum) ;
 				break ;
 		}
+		Str255 name ;
+		GetFontName( m_macFontNum , name ) ;
+		CopyPascalStringToC( name , (char*) name ) ;
+		m_faceName = (char*) name ;
 	}
 	else
 	{
@@ -121,6 +125,10 @@ void wxFontRefData::MacFindFont()
 	//sequence in order to degrade gracefully while trying to maintain most of the style
 	//information, meanwhile we just take the normal font and apply the features after
 	OSStatus status = ::ATSUFONDtoFontID(m_macFontNum, normal /*qdStyle*/, (UInt32*)&m_macATSUFontID); 
+    /*
+    status = ATSUFindFontFromName ( (Ptr) m_faceName , strlen( m_faceName ) ,
+        kFontFullName,	kFontMacintoshPlatform, kFontRomanScript , kFontNoLanguage  ,  (UInt32*)&m_macATSUFontID ) ;
+    */
 	wxASSERT_MSG( status == noErr , "couldn't retrieve font identifier" ) ;
 }