From 9afb5758a626c0bc8c92b62c83b3aa5b8d199084 Mon Sep 17 00:00:00 2001
From: "Zhian N. Kamvar" <zkamvar@gmail.com>
Date: Fri, 24 Aug 2018 11:15:44 +0100
Subject: [PATCH] explicitly export get_dates

This was a solution from Winston Chang in 2014:

http://r.789695.n4.nabble.com/R-CMD-check-warning-with-S3-method-td4692255.html
---
 NAMESPACE     | 1 +
 R/accessors.R | 3 ++-
 2 files changed, 3 insertions(+), 1 deletion(-)

diff --git a/NAMESPACE b/NAMESPACE
index 69bbb9e..b7e6de4 100644
--- a/NAMESPACE
+++ b/NAMESPACE
@@ -10,6 +10,7 @@ S3method(print,projections)
 S3method(subset,projections)
 export(add_projections)
 export(build_projections)
+export(get_dates)
 export(project)
 importFrom(graphics,plot)
 importFrom(incidence,cumulate)
diff --git a/R/accessors.R b/R/accessors.R
index 436f6b1..56bfcb9 100644
--- a/R/accessors.R
+++ b/R/accessors.R
@@ -12,7 +12,6 @@
 #'
 #' @author Thibaut Jombart \email{thibautjombart@@gmail.com}
 #'
-#' @export
 #'
 #' @param x A \code{projections} object.
 #'
@@ -44,6 +43,8 @@
 #' @aliases get_dates.projections
 #' @aliases get_dates
 #' @importFrom incidence get_dates
+#' @export get_dates
+#' @export
 get_dates.projections <- function(x, ...) {
     attr(x, "dates")
 }