if (FALSE) # we can't get this through the CRAN test - run it with copy/paste to console
wrd <- GetNewWrd()
WrdText("a)\n\n\nb)", fontname=WrdGetFont()$name, fontsize=WrdGetFont()$size)
WrdInsertBookmark("chap_b")
WrdText("\n\n\nc)\n\n\n", fontname=WrdGetFont()$name, fontsize=WrdGetFont()$size)
WrdGoto("chap_b")
WrdUpdateBookmark("chap_b", "Goto chapter B and set text")
WrdInsertBookmark("mybookmark")
ToWrd("A longer text\n\n\n")
# Now returning the bookmark
bm <- WrdBookmark("mybookmark")
# get the automatically created name of the bookmark
bm$name()
Run the code above in your browser using DataLab