X-Git-Url: https://git.donarmstrong.com/?p=r%2FCairoHacks.git;a=blobdiff_plain;f=R%2Fbookmarks.R;h=c1d528103484cb8524c1062890e2eee35f300ead;hp=30bd12fef219559020032e1b33e9ae183cf52606;hb=e5bebf0ad92bc44a6a468ce99e691d3ffa7811b3;hpb=9144a53f07d57757f63dc26f655283c28cb2a973 diff --git a/R/bookmarks.R b/R/bookmarks.R index 30bd12f..c1d5281 100644 --- a/R/bookmarks.R +++ b/R/bookmarks.R @@ -19,7 +19,7 @@ CairoHacks.env$current_page <- 0 ##' @author Don Armstrong ##' @export ##' @examples -##' CairoPDF(file="example.pdf",onefile=TRUE) +##' Cairo::CairoPDF(file="example.pdf",onefile=TRUE) ##' plot(y~x,data.frame(x=1:5,y=1:5)) ##' bookmarks <- make.pdf.bookmark("First plot") ##' plot(y~x,data.frame(x=1:5,y=1:5)) @@ -28,7 +28,7 @@ CairoHacks.env$current_page <- 0 ##' write.pdf.bookmarks(file="example.pdf",bookmarks) make.pdf.bookmark <- function(text,level=1,page=NULL) { if (!CairoHacks.env$device_set_up) { - Cairo.onSave(device = grDevices::dev.cur(), + Cairo::Cairo.onSave(device = grDevices::dev.cur(), onSave=function(device,page){ ch <- getNamespace("CairoHacks") print(ls(envir=ch))