From df88c4d4b011c09dd5f784fa57f3196ab6619fb1 Mon Sep 17 00:00:00 2001
From: unknown <ldecicco@usgs.gov>
Date: Tue, 9 Sep 2014 10:01:30 -0500
Subject: [PATCH] Unifying argument names.
---
R/formatCheckDate.r | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/R/formatCheckDate.r b/R/formatCheckDate.r
index a65d49a8..6d32a002 100644
--- a/R/formatCheckDate.r
+++ b/R/formatCheckDate.r
@@ -10,13 +10,13 @@
#' @export
#' @examples
#' Date <- '1985-01-01'
-#' dateString <- 'StartDate'
+#' dateString <- 'startDate'
#' formatCheckDate(Date, dateString, interactive = FALSE)
formatCheckDate <- function(Date, dateString,interactive=TRUE){
if(nzchar(Date)){
if (!dateFormatCheck(Date)){
if (interactive){
- cat("Date must be entered in the form YYYY-MM-DD (no quotes), you entered: ", Date, "as the StartDate.\n")
+ cat("Date must be entered in the form YYYY-MM-DD (no quotes), you entered: ", Date, "as the startDate.\n")
cat("Please re-enter ", dateString, ":\n")
Date <- readline()
} else {
--
GitLab