The R Project SVN R-packages

Rev

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

Rev 5707 Rev 5721
Line 204... Line 204...
204
	NSColor *c = [Preferences unarchivedObjectForKey: @"braceHighlightColor" withDefault: nil];
204
	NSColor *c = [Preferences unarchivedObjectForKey: @"braceHighlightColor" withDefault: nil];
205
	if (!c) c=[NSColor redColor];
205
	if (!c) c=[NSColor redColor];
206
	if (highlightColorAttr) [highlightColorAttr release];
206
	if (highlightColorAttr) [highlightColorAttr release];
207
	highlightColorAttr = [[NSDictionary alloc] initWithObjectsAndKeys:c, NSBackgroundColorAttributeName, nil];
207
	highlightColorAttr = [[NSDictionary alloc] initWithObjectsAndKeys:c, NSBackgroundColorAttributeName, nil];
208
	showMatchingBraces = [Preferences flagForKey:showBraceHighlightingKey withDefault: YES];
208
	showMatchingBraces = [Preferences flagForKey:showBraceHighlightingKey withDefault: YES];
209
	braceHighlightInterval = [[Preferences stringForKey:highlightIntervalKey withDefault: @"0.2"] doubleValue];
209
	braceHighlightInterval = [Preferences floatForKey:highlightIntervalKey withDefault:0.3f];
210
}
210
}
211
 
211
 
212
@end
212
@end