cleaning up site

CornellLabofOrnithology · Mar 20, 2018 · af654d9 · af654d9
1 parent 7fa5178
commit af654d9
Show file tree

Hide file tree

Showing 7 changed files with 6 additions and 4 deletions.
diff --git a/_pkgdown.yml b/_pkgdown.yml
@@ -6,9 +6,6 @@ navbar:
     href: articles/auk.html
   - text: Function Reference
     href: reference/index.html
-  right:
-  - icon: fa-github fa-lg
-    href: https://github.com/CornellLabofOrnithology/auk
 
 authors:
   Matthew Strimas-Mackey:

diff --git a/docs/articles/auk.html b/docs/articles/auk.html
diff --git a/docs/index.html b/docs/index.html
diff --git a/inst/doc/auk.R b/inst/doc/auk.R
@@ -107,6 +107,7 @@ awk_script <- system.file("extdata/ebd-sample.txt", package = "auk") %>%
   auk_filter(awk_file = "awk-script.txt", execute = FALSE)
 # read back in and prepare for printing
 awk_file <- readLines(awk_script)
+unlink("awk-script.txt")
 awk_file[!grepl("^[[:space:]]*$", awk_file)] %>% 
   paste0(collapse = "\n") %>% 
   cat()

diff --git a/inst/doc/auk.Rmd b/inst/doc/auk.Rmd
@@ -246,6 +246,7 @@ awk_script <- system.file("extdata/ebd-sample.txt", package = "auk") %>%
   auk_filter(awk_file = "awk-script.txt", execute = FALSE)
 # read back in and prepare for printing
 awk_file <- readLines(awk_script)
+unlink("awk-script.txt")
 awk_file[!grepl("^[[:space:]]*$", awk_file)] %>% 
   paste0(collapse = "\n") %>% 
   cat()

diff --git a/inst/doc/auk.html b/inst/doc/auk.html
@@ -332,6 +332,7 @@ <h3>Saving the AWK command</h3>
 <span class="st">  </span><span class="kw">auk_filter</span>(<span class="dt">awk_file =</span> <span class="st">&quot;awk-script.txt&quot;</span>, <span class="dt">execute =</span> <span class="ot">FALSE</span>)
 <span class="co"># read back in and prepare for printing</span>
 awk_file &lt;-<span class="st"> </span><span class="kw">readLines</span>(awk_script)
+<span class="kw">unlink</span>(<span class="st">&quot;awk-script.txt&quot;</span>)
 awk_file[<span class="op">!</span><span class="kw">grepl</span>(<span class="st">&quot;^[[:space:]]*$&quot;</span>, awk_file)] <span class="op">%&gt;%</span><span class="st"> </span>
 <span class="st">  </span><span class="kw">paste0</span>(<span class="dt">collapse =</span> <span class="st">&quot;</span><span class="ch">\n</span><span class="st">&quot;</span>) <span class="op">%&gt;%</span><span class="st"> </span>
 <span class="st">  </span><span class="kw">cat</span>()

diff --git a/vignettes/auk.Rmd b/vignettes/auk.Rmd
@@ -246,6 +246,7 @@ awk_script <- system.file("extdata/ebd-sample.txt", package = "auk") %>%
   auk_filter(awk_file = "awk-script.txt", execute = FALSE)
 # read back in and prepare for printing
 awk_file <- readLines(awk_script)
+unlink("awk-script.txt")
 awk_file[!grepl("^[[:space:]]*$", awk_file)] %>% 
   paste0(collapse = "\n") %>% 
   cat()