The R Project SVN R-packages

Rev

Rev 6128 | Rev 6238 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6128 Rev 6137
Line 63... Line 63...
63 
 
 63 
 
64 
}
 64 
}
65 
 
 65 
 
66 
- (void)drawGlyphsForGlyphRange:(NSRange)glyphsToShow atPoint:(NSPoint)origin
 66 
- (void)drawGlyphsForGlyphRange:(NSRange)glyphsToShow atPoint:(NSPoint)origin
67 
{
 67 
{
68 
 
 68 
	// <SPEED>
69 
	NSTextStorage *textStorage = [self textStorage];
 69 
	NSTextStorage *textStorage = [self textStorage];
70 
 
 70 
 
71 
	[(RScriptEditorTextStorage *)textStorage setLineFoldingEnabled:YES];
 71 
	[(RScriptEditorTextStorage *)textStorage setLineFoldingEnabled:YES];
72 
	[super drawGlyphsForGlyphRange:glyphsToShow atPoint:origin];
 72 
	[super drawGlyphsForGlyphRange:glyphsToShow atPoint:origin];
73 
	[(RScriptEditorTextStorage *)textStorage setLineFoldingEnabled:NO];
 73 
	[(RScriptEditorTextStorage *)textStorage setLineFoldingEnabled:NO];