Initial commit.
This commit is contained in:
15
.emacs.d/elpa/ess-20160208.453/etc/ess-rutils-help-start.R
Normal file
15
.emacs.d/elpa/ess-20160208.453/etc/ess-rutils-help-start.R
Normal file
@@ -0,0 +1,15 @@
|
||||
## Hacked help.start() to use with ess-rutils.el
|
||||
.rutils.help.start <- function (update=FALSE, remote=NULL) {
|
||||
home <- if (is.null(remote)) {
|
||||
if (tools:::httpdPort == 0L)
|
||||
tools::startDynamicHelp()
|
||||
if (tools:::httpdPort > 0L) {
|
||||
if (update)
|
||||
make.packages.html()
|
||||
paste("http://127.0.0.1:", tools:::httpdPort, sep="")
|
||||
}
|
||||
else stop(".rutils.help.start() requires the HTTP server to be running",
|
||||
call.=FALSE)
|
||||
} else remote
|
||||
paste(home, "/doc/html/index.html", sep="")
|
||||
}
|
Reference in New Issue
Block a user