use rmarkdown func to suppress warnings

NAMESPACE

@@ -162,6 +162,7 @@ importFrom(pkgfilecache,erase_file_cache)
 importFrom(pkgfilecache,get_filepath)
 importFrom(pkgfilecache,get_pkg_info)
 importFrom(pkgfilecache,list_available)
+importFrom(rmarkdown,pandoc_available)
 importFrom(stats,dist)
 importFrom(stats,na.omit)
 importFrom(utils,read.table)

R/helpers.R

@@ -79,3 +79,15 @@ fs.surface.to.tmesh3d <- function(surface) {
 }
 
 
+#' @title Check for pandoc availability on system.
+#'
+#' @return logical, whether Pandoc is available.
+#'
+#' @importFrom rmarkdown pandoc_available
+#'
+#' @keywords internal
+has_pandoc <- function() {
+  return(rmarkdown::pandoc_available());
+}
+
+