From 5ab8f59624e66c5be23b4bd6fd2bff3e8d5a7e02 Mon Sep 17 00:00:00 2001
From: John Muschelli <muschellij2@gmail.com>
Date: Fri, 8 Oct 2021 20:43:18 +0000
Subject: [PATCH] added copy export, to fix #171

---
 NAMESPACE         | 1 +
 R/Class-Copy.R    | 2 ++
 man/Copy-class.Rd | 1 +
 3 files changed, 4 insertions(+)

diff --git a/NAMESPACE b/NAMESPACE
index 38e1aa3..ae356e5 100644
--- a/NAMESPACE
+++ b/NAMESPACE
@@ -7,6 +7,7 @@ export(CMD_Render)
 export(CMD_Rscript)
 export(Cmd)
 export(Comment)
+export(Copy)
 export(Entrypoint)
 export(Expose)
 export(Label)
diff --git a/R/Class-Copy.R b/R/Class-Copy.R
index 29f8d25..c3c6a86 100644
--- a/R/Class-Copy.R
+++ b/R/Class-Copy.R
@@ -13,6 +13,7 @@
 #' @family instruction classes
 #' @examples
 #' #no example yet
+#' Copy("here", "/here")
 setClass("Copy",
          slots = list(src = "character", dest = "character"),
          contains = "Instruction")
@@ -26,6 +27,7 @@ setClass("Copy",
 #' @param addTrailingSlashes (boolean) add trailing slashes to the given paths if the source is an existing directory
 #'
 #' @return the object
+#' @export
 #' @importFrom fs dir_exists
 #' @importFrom stringr str_detect
 Copy <- function(src, dest, addTrailingSlashes = TRUE) {
diff --git a/man/Copy-class.Rd b/man/Copy-class.Rd
index 7772447..ebd235c 100644
--- a/man/Copy-class.Rd
+++ b/man/Copy-class.Rd
@@ -17,6 +17,7 @@ S4 Class representing a COPY-instruction
 }
 \examples{
 #no example yet
+Copy("here", "/here")
 }
 \seealso{
 Other instruction classes: