get rid of _render.R, and remove html_book/tufte_html_book formats so the HTML formats won't overwrite each other under the _book directory; also tweaked _publish.R so I can still publish bootstrap/tufte styles to bookdown.org

yihui · yihui · commit 772223e2a336 · 2016-03-30T01:31:53.000-05:00
diff --git a/_output.yml b/_output.yml
@@ -8,13 +8,9 @@ bookdown::gitbook:
         <li><a href="https://github.com/rstudio/bookdown" target="blank">Published with bookdown</a></li>
     edit:
       link: https://github.com/rstudio/bookdown-demo/edit/master/inst/examples/%s
-      text: "Edit"
-bookdown::tufte_html_book:
-  css: [style.css, toc.css]
 bookdown::pdf_book:
   includes:
     in_header: preamble.tex
   latex_engine: xelatex
   citation_package: natbib
-bookdown::html_book:
-  css: [style.css, toc.css]
+bookdown::epub_book: default
diff --git a/_publish.R b/_publish.R
@@ -1,7 +1,19 @@
-# publish the book with other styles
+# publish the book with differnet HTML styles; you should not need this script
+
+# default formats
+formats = c(
+  'bookdown::pdf_book', 'bookdown::epub_book', 'bookdown::gitbook'
+)
 
 unlink('_book', recursive = TRUE)
-bookdown:::Rscript('_render.R')
+
+# render the book to all formats unless they are specified via command-line args
+for (fmt in formats) {
+  cmd = sprintf("bookdown::render_book('index.Rmd', '%s', quiet = TRUE)", fmt)
+  res = bookdown:::Rscript(c('-e', shQuote(cmd)))
+  if (res != 0) stop('Failed to compile the book to ', fmt)
+}
+
 bookdown::publish_book('bookdown-demo')
 
 x = readLines('index.Rmd')
@@ -10,12 +22,18 @@ s = paste0('title: "A Minimal Book Example (', c('Bootstrap', 'Tufte'), ' Style)
 for (fmt in c('html_book', 'tufte_html_book')) {
   unlink('_book', recursive = TRUE)
   file.copy('index.Rmd', '_index.Rmd')
+  file.copy('_output.yml', '_output.yml2')
   writeLines(
     gsub('^title: ".*"', s[i], gsub('gitbook', fmt, x)), 'index.Rmd'
   )
+  cat(
+    'bookdown::', fmt, ':\n', '  css: [style.css, toc.css]\n', sep = '', file = '_output.yml',
+    append = TRUE
+  )
   cmd = sprintf("bookdown::render_book('index.Rmd', 'bookdown::%s', quiet = TRUE)", fmt)
   res = bookdown:::Rscript(c('-e', shQuote(cmd)))
   file.rename('_index.Rmd', 'index.Rmd')
+  file.rename('_output.yml2', '_output.yml')
   if (res != 0) stop('Failed to compile the book to ', fmt)
   i = i + 1
   bookdown::publish_book(paste0('bookdown-demo', i))
diff --git a/_render.R b/_render.R
diff --git a/bookdown-demo.Rproj b/bookdown-demo.Rproj
@@ -15,4 +15,4 @@ LaTeX: pdfLaTeX
 AutoAppendNewline: Yes
 StripTrailingWhitespace: Yes
 
-BuildType: Makefile
+BuildType: Website
diff --git a/index.Rmd b/index.Rmd
@@ -3,7 +3,8 @@ title: "A Minimal Book Example"
 author: "Yihui Xie"
 date: "`r Sys.Date()`"
 knit: "bookdown::render_book"
-site: true
+site: bookdown::bookdown_site
+output: bookdown::gitbook
 documentclass: book
 bibliography: [book.bib, packages.bib]
 biblio-style: apalike
