diff options
| author | Johannes Ranke <jranke@uni-bremen.de> | 2016-09-27 17:50:34 +0200 |
|---|---|---|
| committer | Johannes Ranke <jranke@uni-bremen.de> | 2016-09-27 17:50:34 +0200 |
| commit | 0d958ab6f84b569b5437f231c56004890c4ae23b (patch) | |
| tree | 263bf0f3df0671bffd7af643d7a9cdd45a1e9536 /pkg/R/endpoint.R | |
| parent | 399383adcdb37c4a3e32f1a2133a2fa3663618d0 (diff) | |
Make the chents package optional
Diffstat (limited to 'pkg/R/endpoint.R')
| -rw-r--r-- | pkg/R/endpoint.R | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/pkg/R/endpoint.R b/pkg/R/endpoint.R index 68e47f7..314acd2 100644 --- a/pkg/R/endpoint.R +++ b/pkg/R/endpoint.R @@ -41,6 +41,9 @@ endpoint <- function(chent, raw = FALSE, signif = 3) { + if (!is(chent, "chent")) { + stop("Please supply a chent object as created using the package 'chents' available from jrwb.de") + } ep_list <- chent$chyaml[[medium]][[type]] if (!is.na(lab_field[1])) { ep_list <- ep_list[[lab_field]] |