X-Git-Url: https://git.donarmstrong.com/?p=don.git;a=blobdiff_plain;f=posts%2Fadding_toc_to_pdfs_in_R.mdwn;h=b78546ce340a0e4aca0e70d6ca113973859bd80f;hp=0b67f734a8b70bc0aee97239fd58dbb8bf98f2c2;hb=HEAD;hpb=9222b9235c138f15d0ab067574f6f9673af99a53

diff --git a/posts/adding_toc_to_pdfs_in_R.mdwn b/posts/adding_toc_to_pdfs_in_R.mdwn
index 0b67f73..b78546c 100644
--- a/posts/adding_toc_to_pdfs_in_R.mdwn
+++ b/posts/adding_toc_to_pdfs_in_R.mdwn
@@ -32,7 +32,7 @@ The R code then looks like the following:
          if (missing(page)|| is.null(page)) {
              page <- ..current.page+1
          }
-         bookmarks[[length(bookmarks)+1]] <-
+         bookmarks\[[length(bookmarks)+1]] <-
              list(text=text,
                   level=level,
                   page=page)
@@ -45,9 +45,9 @@ The R code then looks like the following:
              pdf.bookmarks <-
                  paste0(pdf.bookmarks,
                         "BookmarkBegin\n",
-                        "BookmarkTitle: ",bookmarks[[bookmark]]$text,"\n",
-                        "BookmarkLevel: ",bookmarks[[bookmark]]$level,"\n",
-                        "BookmarkPageNumber: ",bookmarks[[bookmark]]$page,"\n")
+                        "BookmarkTitle: ",bookmarks\[[bookmark]]$text,"\n",
+                        "BookmarkLevel: ",bookmarks\[[bookmark]]$level,"\n",
+                        "BookmarkPageNumber: ",bookmarks\[[bookmark]]$page,"\n")
          }
          temp.pdf <- tempfile(pattern=basename(pdf.file))
          temp.pdf.info <- tempfile(pattern=paste0(basename(pdf.file),"info_utf8"))