'KorAP' typo

Change-Id: I889a3cf55beb60414b1c61302106232f28ff6d8a
diff --git a/R/KorAPConnection.R b/R/KorAPConnection.R
index 0b52f96..d511d1b 100644
--- a/R/KorAPConnection.R
+++ b/R/KorAPConnection.R
@@ -70,8 +70,8 @@
   }
   if (status_code(resp) != 200) {
     message <- ifelse (!is.null(parsed$errors),
-                       sapply(parsed$errors, function(error) paste0(sprintf("\n%s: KoRAP API request failed: %s", error[1], error[2]))),
-                       message <- sprintf("%s: KoRAP API request failed.", status_code(resp)))
+                       sapply(parsed$errors, function(error) paste0(sprintf("\n%s: KorAP API request failed: %s", error[1], error[2]))),
+                       message <- sprintf("%s: KorAP API request failed.", status_code(resp)))
     stop(message, call. = FALSE)
   }
   parsed