The R Project SVN R-packages

Rev

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

Rev 1483 Rev 1490
Line 97... Line 97...
97 
		return;
 97 
		return;
98 
	}
 98 
	}
99 
	NSString *url = [NSString stringWithFormat:@"file://%@",[x string]];
 99 
	NSString *url = [NSString stringWithFormat:@"file://%@",[x string]];
100 
	if(url != nil)
 100 
	if(url != nil)
101 
	 	[[HelpView mainFrame] loadRequest:[NSURLRequest requestWithURL:[NSURL URLWithString:url]]];
 101 
	 	[[HelpView mainFrame] loadRequest:[NSURLRequest requestWithURL:[NSURL URLWithString:url]]];
- 
 
 102
102 
	[helpWindow makeKeyAndOrderFront:self];
 103 
	[helpWindow makeKeyAndOrderFront:self];
103 
	[x release];
 104 
	[x release];
104 
}
 105 
}
105 
 
 106 
 
- 
 
 107 
- (NSWindow*) window
- 
 
 108 
{
- 
 
 109 
	return helpWindow;
- 
 
 110 
}
- 
 
 111 
 
106 
- (IBAction)showMainHelp:(id)sender
 112 
- (IBAction)showMainHelp:(id)sender
107 
{
 113 
{
108 
	 REngine *re = [REngine mainEngine];
114 
	 REngine *re = [REngine mainEngine];
109 
	 RSEXP *x = [re evaluateString:@"try(getOption(\"main.help.url\"))"];
 115 
	 RSEXP *x = [re evaluateString:@"try(getOption(\"main.help.url\"))"];
110 
 
 116