tests/readZip.R

library(Rcompression)


if(FALSE) {
content = loadZip("inst/sampleData/Empty.docx")
d = zipArchive(content)
d[["word/document.xml"]]

# Equivalent, direct version
Rcompression:::getZipFileEntry(d, "word/document.xml")

ar = zipArchive("inst/sampleData/Empty.docx")
ar[["word/document.xml"]]
}
omegahat/Rcompression documentation built on Nov. 29, 2023, 12:45 a.m.