From 0d979983aa97e012817fe7c13055da81e28ff49f Mon Sep 17 00:00:00 2001 From: Jeroen Date: Sat, 27 Jul 2013 17:55:06 +0200 Subject: [PATCH] fixx --- R/httpget_doc.R | 2 +- R/httpget_package_man.R | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/R/httpget_doc.R b/R/httpget_doc.R index b7a62bee..4af93d43 100644 --- a/R/httpget_doc.R +++ b/R/httpget_doc.R @@ -3,6 +3,6 @@ httpget_doc <- function(requri){ res$setcache("lib"); #find doc dir - docdir <- Sys.getenv("R_DOC_DIR"); + docdir <- Sys.getenv("R_DOC_DIR", "/usr/share/R/doc"); httpget_file(file.path(docdir, paste(requri, collapse="/"))); } diff --git a/R/httpget_package_man.R b/R/httpget_package_man.R index 61cf829e..e4a2eb51 100644 --- a/R/httpget_package_man.R +++ b/R/httpget_package_man.R @@ -28,7 +28,7 @@ httpget_package_man <- local({ "text" = man_text(rdfile, package=reqpackage), "tex" = man_tex(rdfile), "pdf" = man_pdf(topic=reqobject, package=reqpackage,lib.loc=reqlib), - "R.css" = res$sendfile(system.file("pages/R.css", package=packagename)), + "R.css" = res$sendfile(system.file("test/R.css", package=packagename)), stop("Unknown man format: /", reqformat) ) }