From af13ccda0b74b86e5f8ac1bf79d4ec7c4f8dfb30 Mon Sep 17 00:00:00 2001
From: Paolo Di Lorenzo <dilorenzo@hey.com>
Date: Sun, 12 May 2024 16:18:41 -0400
Subject: [PATCH] Add spelling checks

---
 DESCRIPTION           |  1 +
 R/usmapdata-package.R |  2 +-
 inst/WORDLIST         | 11 +++++++++++
 man/usmapdata.Rd      |  2 +-
 tests/spelling.R      |  6 ++++++
 5 files changed, 20 insertions(+), 2 deletions(-)
 create mode 100644 inst/WORDLIST
 create mode 100644 tests/spelling.R

diff --git a/DESCRIPTION b/DESCRIPTION
index 4d7c41e..54a1377 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -21,6 +21,7 @@ Imports:
 Suggests:
     covr,
     dplyr,
+    spelling,
     testthat (>= 3.0.0)
 Roxygen: list(markdown = TRUE)
 RoxygenNote: 7.3.1
diff --git a/R/usmapdata-package.R b/R/usmapdata-package.R
index f5a3319..cd605d1 100644
--- a/R/usmapdata-package.R
+++ b/R/usmapdata-package.R
@@ -3,7 +3,7 @@
 #' @description
 #' It is usually difficult or inconvenient to create US maps that
 #'   include both Alaska and Hawaii in a convenient spot. All map
-#'   data frames produced by this package use the Albers Equal Area
+#'   data frames produced by this package use the US National Atlas Equal Area
 #'   projection.
 #'
 #' @section Map data frames:
diff --git a/inst/WORDLIST b/inst/WORDLIST
new file mode 100644
index 0000000..65f015d
--- /dev/null
+++ b/inst/WORDLIST
@@ -0,0 +1,11 @@
+CRS
+GeoPackage
+Gert
+Rudis
+affine
+choropleths
+codecov
+csv
+pre
+usmap
+️
diff --git a/man/usmapdata.Rd b/man/usmapdata.Rd
index 9583025..36edf8e 100644
--- a/man/usmapdata.Rd
+++ b/man/usmapdata.Rd
@@ -8,7 +8,7 @@
 \description{
 It is usually difficult or inconvenient to create US maps that
 include both Alaska and Hawaii in a convenient spot. All map
-data frames produced by this package use the Albers Equal Area
+data frames produced by this package use the US National Atlas Equal Area
 projection.
 }
 \section{Map data frames}{
diff --git a/tests/spelling.R b/tests/spelling.R
new file mode 100644
index 0000000..88cbb0c
--- /dev/null
+++ b/tests/spelling.R
@@ -0,0 +1,6 @@
+if(requireNamespace('spelling', quietly = TRUE))
+  spelling::spell_check_test(
+    vignettes = TRUE,
+    error = FALSE,
+    skip_on_cran = TRUE
+  )