The R Project SVN R-packages

Rev

Rev 5721 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5721 Rev 6049
Line 42... Line 42...
42
 
42
 
43
	if (_theFont) [_theFont release];
43
	if (_theFont) [_theFont release];
44
 
44
 
45
	_theFont = [font retain];
45
	_theFont = [font retain];
46
 
46
 
47
	[super setFont:[[NSFontManager sharedFontManager] convertFont:font toSize:11.0f]];
47
	[super setFont:[[NSFontManager sharedFontManager] convertFont:font toSize:9.0f]];
48
 
48
 
49
	NSMutableAttributedString *text = [[NSMutableAttributedString alloc] initWithString:[_theFont displayName]];
49
	NSMutableAttributedString *text = [[NSMutableAttributedString alloc] initWithString:[_theFont displayName]];
50
	NSMutableParagraphStyle *paraStyle = [[NSParagraphStyle defaultParagraphStyle] mutableCopy];
50
	NSMutableParagraphStyle *paraStyle = [[NSParagraphStyle defaultParagraphStyle] mutableCopy];
51
 
51
 
52
	[paraStyle setMinimumLineHeight:NSHeight([self bounds])];
52
	[paraStyle setMinimumLineHeight:NSHeight([self bounds])];