The R Project SVN R-packages

Rev

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

Rev 6408 Rev 7337
Line 116... Line 116...
116 
		int port = [[RController sharedController] helpServerPort];
 116 
		int port = [[RController sharedController] helpServerPort];
117 
		if (port == 0)
 117 
		if (port == 0)
118 
			urlText = [NSString stringWithFormat:@"file://%@", urlText];
 118 
			urlText = [NSString stringWithFormat:@"file://%@", urlText];
119 
		else {
 119 
		else {
120 
			if ([urlText hasPrefix:home]) urlText = [urlText substringFromIndex:[home length]];
 120 
			if ([urlText hasPrefix:home]) urlText = [urlText substringFromIndex:[home length]];
121 
			urlText = [NSString stringWithFormat:@"http://127.0.0.1:%d%@", port, urlText];
 121 
			urlText = [NSString stringWithFormat:@"http://localhost:%d%@", port, urlText];
122 
		}
 122 
		}
123 
	}
 123 
	}
124 
	SLog(@" - invoking help sub-panel with %@", urlText);
 124 
	SLog(@" - invoking help sub-panel with %@", urlText);
125 
	[[TopicHelpView mainFrame] loadRequest:[NSURLRequest requestWithURL:[NSURL URLWithString:urlText]]];
 125 
	[[TopicHelpView mainFrame] loadRequest:[NSURLRequest requestWithURL:[NSURL URLWithString:urlText]]];
126 
}
 126 
}