The R Project SVN R-packages

Rev

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

Rev 1419 Rev 1490
Line 60... Line 60...
60 
	}
 60 
	}
61 
}
 61 
}
62 
 
 62 
 
63 
- (id)openDocumentWithContentsOfFile:(NSString *)aFile display:(BOOL)flag
 63 
- (id)openDocumentWithContentsOfFile:(NSString *)aFile display:(BOOL)flag
64 
{
 64 
{
65 
	int res = [[RController getRController] isImageData: aFile];
 65 
	int res = [[RController sharedController] isImageData: aFile];
66 
	if (res == -1)
 66 
	if (res == -1)
67 
		NSLog(@"File format: %@ not recognized by isImageData", aFile);
 67 
		NSLog(@"File format: %@ not recognized by isImageData", aFile);
68 
	else
68 
	else
69 
		if (res == 0 )
 69 
		if (res == 0 )
70 
			[[RController getRController] sendInput: [NSString stringWithFormat:@"load(\"%@\")", aFile]];
 70 
			[[RController sharedController] sendInput: [NSString stringWithFormat:@"load(\"%@\")", aFile]];
71 
	else
71 
	else
72 
		return [self openNamedFile: aFile display:flag];
 72 
		return [self openNamedFile: aFile display:flag];
73 
	return nil;
 73 
	return nil;
74 
}
 74 
}
75 
 
 75