Merge pull request #14 from getwilds/bugsquash

edited error handling in education
getwilds · Feb 7, 2024 · 0681c7d · 0681c7d
2 parents 9afe9db + df758e7
commit 0681c7d
Showing 1 changed file with 4 additions and 2 deletions.
diff --git a/R/handle-education.R b/R/handle-education.R
@@ -20,10 +20,12 @@ handle_education <-function(education) {
   )
 
   edu_code <- edu_mapping[education]
+  print(edu_code)
 
-  if (is.null(edu_code)) {
-    stop("Invalid input")
+  if (is_na(edu_code)) {
+    stop("Invalid education input, please check the documentation for valid inputs")
   }
 
   return(as.character(edu_code))
 }
+