mirror of
https://github.com/msberends/AMR.git
synced 2025-07-09 08:11:58 +02:00
(v1.4.0.9011) message formatting
This commit is contained in:
@ -100,7 +100,9 @@ atc_online_property <- function(atc_code,
|
||||
}
|
||||
|
||||
if (!has_internet()) {
|
||||
message("There appears to be no internet connection, returning NA.")
|
||||
message_("There appears to be no internet connection, returning NA.",
|
||||
add_fn = font_red,
|
||||
as_note = FALSE)
|
||||
return(rep(NA, length(atc_code)))
|
||||
}
|
||||
|
||||
|
Reference in New Issue
Block a user